Response.Verdadeiro.Anubis

<% dim VARIAVEL

VARIAVEL= "VARIAVEL"

conectar

sel="select * from TABELA where CAMPO like '" & VARIAVEL & "'"

RS.PageSize = 14
rs.open sel,cn,3,3
if rs.eof then%>

NADA AENCONTRADO

<%
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 IF

RS.AbsolutePage = intpagina
intrec=0
While intrec < RS.PageSize and not RS.EOF
%>

<!--------------------------------------------------- ABAIXO ENTRA TODO O CONTEUDO PAGINADO -->
<!--------------------------------------------------- ABAIXO ENTRA TODO O CONTEUDO PAGINADO -->


AKI VC POE O RESULTADO DA PAGINAÇÃO


<!--------------------------------------------------- ACIMA ENTRA TODO O CONTEUDO PAGINADO -->
<!--------------------------------------------------- ACIMA ENTRA TODO O CONTEUDO PAGINADO -->

<%
RS.MoveNext
intrec=intrec+1 
Wend
%>
	<% IF intpagina > 1 then %>	   
   <%response.write "<font class=NumberPaginacao>" & "[" & intpagina-1 & "]" & "</font>"%>
   <a href="SUA PÁGINA AKI PAGINA?pagina=<%=intpagina-1%>"><%response.write "<font class=NumberPaginacao>" & "< IMG SRC=SUA IMAGEM AKI>" & "</font>"%></a>
   <%response.Write "  -"%> 
<% 
END IF
'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página 
IF strcomp(intpagina,RS.PageCount) <> 0 then 
%> 
 
	  <a href="SUA PÁGINA AKI PAGINA?pagina=<%=intpagina+1%>"><%response.write "<font class=NumberPaginacao>" & "< IMG SRC=SUA IMAGEM AKI>" & "</font>"%></a>
	  <%response.write "<font class=NumberPaginacao>" & "[" & intpagina+1 & "]" & "</font>"%>
<% 
END IF
%>
     <%response.write "<font class=NumberPaginacao>" & "Página .: " & "</font>" & "<font class=NumberPaginacaoTotal>" & intpagina & "</font>" & "<font class=NumberPaginacao>" & " de " & RS.PageCount & "</font>"%>