Recomendado: Interprete o código de um método para inserir datas graficamente Resultado: !doctypehtmlpublic-//W3C//DTDHTML4.0 html head titleNewDocument/title metaname=Generatorcontent=EditPlus metaname=Authorcontent= metaname=Keywordscontent= metaname=Descriptioncontent= /head body !--
| <!--#includefile=conn.asp--> <%PageShowSize=5'Quantas páginas são exibidas por página? MyPageSize=10'Quantos artigos são exibidos em cada página? IfNotIsNumeric(Request(página))OrIsEmpty(Request(página))OrRequest(página)<=0Então Minha página=1 Outro MinhaPágina=Int(Abs(Solicitação(página))) Endif setrs=servidor.CreateObject(ADODB.RecordSet) rs.Source=select*fromNewsorderbyNewsIDdesc rs.Openrs.Source,conn,3,1 IfNotrs.eofthen rs.PageSize=MeuTamanhoPágina MaxPages=rs.PageCount rs.absolutepage=MinhaPágina total=rs.RecordCount %><bodylink=#000000vlink=#000000alink=#000000> <tablewidth=100%border=0cellpadding=0cellspacing=1bgcolor=#000000style=border-collapse:collapse> <% fori=1tors.PageSize ifnotrs.EOFentão %> <trbgcolor=#FFFFFF> <tdwidth=63%height=30><%=trim(rs(title))%></td> <% rs.MoveNext fim próximo %> </tr></tabela> <tabela> <tr> <tdcolspan=2align=centerheight=30>Total <%=total%> itens, número atual <%=Mypage%>/<%=Maxpages%> Página <% url=index.asp? PageNextSize=int((MinhaPágina-1)/PageShowSize)+1 Pagetpage=int((total-1)/rs.PageSize)+1 ifPageNextSize>1então PagePrev=PageShowSize*(PageNextSize-1) Response.write<aclass=blackhref='&Url&page=&PagePrev&'title='Previous&PageShowSize&page'>Página anterior</a> Response.write<aclass=blackhref='&Url&page=1'title='Page 1'>Topo da página</a> fim ifMyPage-1>0then Prev_Page=MinhaPágina-1 Response.write<aclass=blackhref='&Url&page=&Prev_Page&'title='&Prev_Page&page'>Página anterior</a> fim ifMaxpages>=PageNextSize*PageShowSizethen PageSizeShow=PáginaShowSize Outro PageSizeShow=Maxpages-PageShowSize*(PageNextSize-1) Endif IfPageSizeShow<1ThenPageSizeShow=1 forPageCounterSize=1toPageSizeShow PageLink=(PageCounterSize+PageNextSize*PageShowSize)-PageShowSize ifPageLink<>MinhaPáginaEntão Response.write<aclass=blackhref='&Url&page=&PageLink&'>[&PageLink&]</a> outro Resposta.Write<B>[&PageLink&]</B> fim IfPageLink=MaxPagesThenExitfor Próximo |
Compartilhar: interprete a lista de funções ASP comumente usadas 1 Funções matemáticas 1.1 A função de arredondamento int(x) assume o maior número inteiro não maior que x. fix(x) arredonda a parte decimal de x. 1.2 Função de valor absoluto abs(x) encontra o valor absoluto de x. 1.3 Função de sinal sgn(x) encontra o código de sinal de x Quando x é um número negativo, o valor da função é -1. 1.4 Função raiz quadrada sqr(x) encontra a raiz quadrada aritmética de x, x deve ser maior que 0. 1.5 Função exponencial ex
Total de 2 páginas Página anterior 12 Próxima página