Paginação X TimeOut
Olá Helpimaster!!!
Seguinte:
Tenho o seuguinte codiço de páginação
<%Set Conn = server.CreateObject("ADODB.Connection")Conn.open "DRIVER={Microsoft Access Driver (.mdb)};DBQ=" & server.MapPath("clientes.mdb")set RS = server.CreateObject("AdoDb.Recordset")Rs.pageSize = 5SQL = "Select From contatos"RS.open SQL,Conn,3,3 IF Rs.EOF then Response.write "Nenhum arquivo encontrado" response.End ELSE IF Request.QueryString("pagina")="" then intpagina = 1 ELSE IF cint(Request.QueryString("pagina"))<1 then intpagina = 1 ELSE IF cint(Request.QueryString("pagina"))> RS.PageCount then intpagina = RS.PageCount ELSE intpagina = Request.QueryString("pagina") END IF END IF END IF END IFRS.AbsolutePage = intpaginaintrec = 0while intrec < RS.PageSize And not RS.EOFresponse.write RS("nome") & " - " & RS("telefone") & " - " & RS("email") & "<BR>" IF RS.EOF then response.write "" END IFWendIF intpagina > 1 then%><a href="index.asp?pagina=<%=intpagina -1%>">Anterior</a><%END IFIF strcomp(intpagina,RS.PageCount) <> 0 then %> <a href="paginacao.asp?pagina=<%=intpagina + 1%>">Próxima</a> <% END IF%><%Recordset1.Close()Set Recordset1 = Nothing%>mas o que acontece é que ao invés de paginar que seria sea função principal, ele fica processando ate aparece a página "Esta página não pode ser exibida", logo abaixo vem as explicações, como o tempo expirou...
Tenho em minha maquina o windows XP, com IIS instalado rodando ASP e PHP...
Gostaria de saber se realmente o código aciamesta certo...
Agradeço a atenção.
Ythalo Rossy
Discussão (1)
Carregando comentários...