当分页时，做了一个小表单，可以输入页码，然后转到。
但是在表单中输入非数字或者数字比已有的页码要大，就会出现错误提示。
如何修改呢？

加个判断，是非数字或者数字超过页总数就不显示喽
判断是非数字用正则表达式
DIM regEx
SET regEx=NEW regExp

regEx.Pattern="[0-9]+"
regEx.global=true
IF regEx.replace(pageNo,"")<>"" THEN
'输入含有非法字符
ELSE
'判断是否超过页面总数
IF cint(pageNo)>rs.PageCount THEN
'分页出错
ELSE
'正常处理分页
END IF
END　IF

[此贴子已经被作者于2006-8-24 15:13:27编辑过]