推荐:解读一个图形化输入日期的方法代码结果: !doctypehtmlpublic-//W3C//DTDHTML4.0 html head titleNewDocument/title metaname=Generatorcontent=EditPlus metaname=Authorcontent= metaname=Keywordscontent= metaname=Descriptioncontent= /head body !--
| <!--#includefile=conn.asp--> <%PageShowSize=5’每页显示多少个页 MyPageSize=10’每页显示多少条文章 IfNotIsNumeric(Request(page))OrIsEmpty(Request(page))OrRequest(page)<=0Then MyPage=1 Else MyPage=Int(Abs(Request(page))) Endif setrs=server.CreateObject(ADODB.RecordSet) rs.Source=select*fromNewsorderbyNewsIDdesc rs.Openrs.Source,conn,3,1 IfNotrs.eofthen rs.PageSize=MyPageSize MaxPages=rs.PageCount rs.absolutepage=MyPage total=rs.RecordCount %><bodylink=#000000vlink=#000000alink=#000000> <tablewidth=100%border=0cellpadding=0cellspacing=1bgcolor=#000000style=border-collapse:collapse> <% fori=1tors.PageSize ifnotrs.EOFthen %> <trbgcolor=#FFFFFF> <tdwidth=63%height=30><%=trim(rs(title))%></td> <% rs.MoveNext endif next %> </tr></table> <table> <tr> <tdcolspan=2align=centerheight=30>共<%=total%>条,当前第<%=Mypage%>/<%=Maxpages%> 页 <% url=index.asp? PageNextSize=int((MyPage-1)/PageShowSize)+1 Pagetpage=int((total-1)/rs.PageSize)+1 ifPageNextSize>1then PagePrev=PageShowSize*(PageNextSize-1) Response.write<aclass=blackhref=’&Url&page=&PagePrev&’title=’上&PageShowSize&页’>上一翻页</a> Response.write<aclass=blackhref=’&Url&page=1’title=’第1页’>页首</a> endif ifMyPage-1>0then Prev_Page=MyPage-1 Response.write<aclass=blackhref=’&Url&page=&Prev_Page&’title=’第&Prev_Page&页’>上一页</a> endif ifMaxpages>=PageNextSize*PageShowSizethen PageSizeShow=PageShowSize Else PageSizeShow=Maxpages-PageShowSize*(PageNextSize-1) Endif IfPageSizeShow<1ThenPageSizeShow=1 forPageCounterSize=1toPageSizeShow PageLink=(PageCounterSize+PageNextSize*PageShowSize)-PageShowSize ifPageLink<>MyPageThen Response.write<aclass=blackhref=’&Url&page=&PageLink&’>[&PageLink&]</a> else Response.Write<B>[&PageLink&]</B> endif IfPageLink=MaxPagesThenExitfor Next |
分享:解读ASP常用函数列表1数学函数 1.1 取整函数 int(x) 取不大于x的最大整数。 fix(x) 舍去x的小数部分。 1.2 绝对值函数 abs(x) 求x的绝对值。 1.3 符号函数 sgn(x) 求x的符号代码,x为负数时函数值为-1 。 1.4 平方根函数 sqr(x) 求x的算术平方根,x必须大于0 。 1.5 指数函数 ex
共2页上一页12下一页