[推荐]ASP初学者常用的代码5

作者在 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()>
上一页

ASP | 阅读 1032 次
文章评论,共0条
游客请输入验证码