Preguntas sobre consultas asp

Esto puede cumplir con sus requisitos y también puede paginarse

lt;@LANGUAGE="VBSCRIPT" CODEPAGE="936"gt;

lt;htmlgt;

lt;headgt;

lt;meta http- equiv="Content-Type" content="text/html; charset=gb2312"gt;

lt;titlegt;Documento sin título lt ;/titlegt;

lt;/headgt;

lt; bodygt;

lt;

Establecer conn=server.CreateObject ( "adodb.connection")

connstr="provider=microsoft.jet.oledb.4.0; data source="amp; server.mappath("data.mdb") "Conexión de base de datos

conn.Open connstr

gt;

lt; table width="600" border="0" cellpacing=" 0" cellpadding="0"gt;

lt; p>

lt; tr align="center" valign="middle"gt;

lt; td width="200" height="25"gt;

lt;td width="200" height="25"gt;lt;/tdgt;

lt;td width="200" height="25"gt; lt;/tdgt;

lt;/trgt;

lt;/tablegt;

lt; en caso de error, reanudar siguiente

establecer rs=server.createobject( "adodb.recordset")

sql="select * from pro order by id desc" 'Declaración de consulta de tabla de datos.

También puede ser sql="select * from pro", que no es la última secuencia de conexión

rs.open sql, Conn, 1, 1

si rs.eof y rs .bof then

err.clear

end if

rs..pagesize=20 'Establece el número de elementos que se muestran en cada página

si solicitud ("pageno")lt;gt;"" entonces

pageno=cint(request("pageno"))

si pagenolt;1 entonces pageno=1

si pagenogt; rs.pagecount entonces pageno=rs.pagecount

else

pageno=1

end if

rs.absolutepage=pageno

gt;

lt; table width="780" border="0" cellpadding="0" cellspace="0" gt;

lt; p>

lt;trgt;lt;td align="center" valign="top"gt;lt;table width="95" border="0" cellpadding= "0" cellpacing="0" class=" css004"gt;

lt;trgt;

lt;tdgt;lt;table width="100" height="25" border="0" cellpadding="5" cellpacing ="1"gt;

lt; trgt;

para i=1 a rs.pagesize

si rs.bof o rs.eof entonces Salir

gt;

lt;td width="300" height="25" align="left" class="h1 "gt;

lt ;ligt;lt;=rs("bt")gt; lt;/ligt;lt;/tdgt;

lt;td align="centro" gt;lt;/tdgt;

lt; td ancho="200" align="center"gt; si mod 1=0 entonces

respuesta.Write("lt;/trgt;lt;trgt;")

finaliza si

gt;lt;

rs.movext( )

Siguiente

gt

trgt

lt; colspan="3" align="left"gt ;lt;table width="100" height="1" border="0" cellpadding="0" cellpacing="0" bgcolor="#FF9900"gt;

lt;trgt;

p>

lt;tdgt;lt;/tdgt;

lt;/trgt;

lt;/ta

blegt;lt;/tdgt;

lt;/tablegt;/tdgt;

lt;/tablegt;

lt;/tablegt;