作者在 2007-05-09 06:45:00 发布以下内容
''创建表单MyForm,方法为Get
Response.Write("<form method=Get name=MyForm>")
Response.Write("<p align=center><font size=2 color=#008000>")
''设置翻页超链接
if rs.PageCount=1 then
Response.Write("[第一页] [上一页] [下一页] [最后一页] ")
else
if rs.AbsolutePage=1 then
Response.Write("[第一页] [上一页] ")
Response.Write("[<a href=java :PageNext()>下一页</a>] ")
Response.Write("[<a href=java :PageLast()>最后一页</a>] ")
else
if rs.AbsolutePage=rs.PageCount then
Response.Write("[<a href=java :PageFirst()>第一页</a>] ")
Response.Write("[<a href=java :PagePrior()>上一页</a>] ")
Response.Write("[下一页] [最后一页] ")
else
Response.Write("[<a href=java :PageFirst()>第一页</a>] ")
Response.Write("[<a href=java :PagePrior()>上一页