text="0123456789"
Rs.PageSize=MaxPerPage
for i=1 to len(request("page"))
checkpage=instr(1,text,mid(request("page"),i,1))
if checkpage=0 then
exit for
end if
翻译一下
以下是引用就这样子在2005-5-19 15:18:30的发言:
text="0123456789"
Rs.PageSize=MaxPerPage'每页显示的条数
for i=1 to len(request("page"))'循环次数为page的长度,如page=12,则循环2次
checkpage=instr(1,text,mid(request("page"),i,1))'不太明白,
if checkpage=0 then‘如果得到的值为0,退出循环
exit for
end if
next'少了这个
翻译一下