Recomendado: ASP para modificar el registro Registro de modificación ASP: Propósito de aprendizaje: Aprenda las operaciones básicas de la base de datos: primero busque el código de modificar el registro: (guarda como examen8.asp) % set conn = server.createObject (adodb.connection) conn.open controlador = {Microsoft Access Driver ( *.mdb)}; dbq = server.mappath (data/hechicle lobook.mdb) EXEC = select *SELECT *.
#FormattableId_0#
<html>
<Evista>
<title> Lista de noticias simplificada </title>
<Script Language = JavaScript>
<!-
// El control AJAX también se puede convertir en archivos separados y es conveniente para llamar a otros lugares.
función AJAX ()
{
var xhrobj = null;
if (window.xmlhttprequest)
{
xhrobj = nuevo xmlhttprequest ();
}
else if (window.activexObject)
{
intentar{
xhroBJ = new ActiveXObject (Microsoft.xmlhttp);
}
Catch (E1)
{
intentar{
xhroBJ = new ActiveXObject (msxml2.xmlhttp);
}
Catch (e2) {
intentar{
xhroBJ = new ActiveXObject (msxml3.xmlhttp);
}
Catch (E3) {
Alerta (Ajax Creation falló: +E3)
}
}
}
}
demás
{
alerta (el navegador que no se reconoce);
}
regresar xhrobj;
}
Función $ (ID)
{
return document.all [id];
}
</script>
<Script Language = JavaScript Difer>
var xhr = new Ajax ();
Página var = 0;
icono var = 0; // recuento de páginas actual
var pagecount; // Número total de páginas
Var Count = 0;
var pageCount = 0;
var pageSize = 5; // Número de registros que se muestran por página
var pp = 0;
Página var = 0;
var dom = null;
Función GetList (curpage)
{
if (pageCount! = 0)
{
página = parseInt ((curpage-1)/pageCount) +1;
}demás{
página = 1
};
página = curpage;
if (pp! = página)
{;
Dom = nulo;
pp = página;
xhr.open (get, data.asp? curpage =+pp, true);
XHR.OnreadyStateChange = $ Callback;
XHR.SEND (NULL);
}
demás
{
$ showList ();
}
}
function $ llamado ()
{
if (xhr.readyState == 1)
{
$ (lista de periódicos) .innerhtml = conectar el servidor;
}
else if (xhr.readyState == 2 || xhr.readyState == 3)
{
$ (lista de periódicos) .innerhtml = lectura de datos;
}
else if (xhr.readyState == 4)
{
if (xhr.status == 200)
{
Dom = xhr.Responsexml;
$ showList ();
}
}
}
función $ showList ()
{
var html =;
VAR items = dom.selectnodes (// item);
icon = dom.selectnodes (// item) .length; //Cantidad
count = dom.selectsinglenode (// data) .getAttribute (count); // número total
pageCount = parseInt ((icount-1)/pageSize) +1;
pageCount = parseInt ((count-1)/pageSize) +1;
startPosition = (Page-1)*PageSize;
endPosition = (página*PageSize)
if (endPosition> Count) EndPosition = Count
para (var i = startPosition; i <endposition; i ++)
{
html+= <div id = title> <a href =+elementos [i] .selectsinglenode (htmlurl) .text+>+elementos [i].
selectsingLenode (golpes) .Text+</a> </div>;
}
$ (lista de periódicos) .innerhtml = html;
var statushtml = <a href = javaScript: anteriorPage ()> página anterior </a> | <a href = javaScript: nextPage ()> página siguiente </a>;
if (pageCount <= 10)
{
para (var i = 1; i <= pageCount; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
más if (página+10 <pageCount && pageCount> 10)
{
if (página%10 == 0)
{
para (var i = page-9; i <= página+1; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
más if (página % 10 == 1 && página! = 1)
{
para (var i = page-1; i <= página+10; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
más if (página <= 11)
{
para (var i = 1; i <= 11; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
demás
{
para (var i = (página- (página % 10)); i <= página+(10- (página % 10))+1; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
}
else if (página+10> = pageCount && pageCount> 10)
{
if (página%10 == 0)
{
para (var i = page-9; i <= página+1; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
más if (página % 10 == 1 && página! = 1)
{
para (var i = page-1; i <= página+9; i ++)
{
if (i == página)
{
statushtml+= <b>+i+</b> & nbsp;
}
demás
{
statushtml+= <a href = javaScript: turnpage (+i+)>+i+</a> & nbsp;
}
}
}
}
document.getElementById (PAGESTATUS) .innerHtml = statushtml;
}
Función AnteriorPage ()
{
if (página> 1)
{
GetList (Página-1);
}
demás
{
alerta (ya la primera página);
}
}
función nextPage ()
{
if (página <pageCount)
{
GetList (página+1);
}
demás
{
alerta (ya llegó a la última página);
}
}
Función TurnPage (P)
{
GetList (P);
}
GetList (1);
</script>
</ablo>
<Body>
<Div ID = NewsList> </div>
<Div id = PAGESTATUS> </div>
</body>
</html>
Crear un archivo data.asp
Nota: Estoy usando la base de datos de acceso aquí, el nombre de la biblioteca es data.mdb. Por supuesto, esto puede definirse por sí mismo. Los campos en la biblioteca son ID (número automático), A, B, C y D (tipo de fecha)
< %@ Idioma = VBScript CodePage = 936 %>
<%
respuesta.cachecontrol = no-cache
Respuesta
respuesta.expires = -1
Respuesta.Expeesabsolute = ahora-1
respuesta.contentType = text/xml
'SQL Database Set Conn = Server.CreateObject (ADODB.Connection)
'Sconn = Driver = {SQL Server}; server = (local); uid = **; pwd = **; database = ***
'Conn.open sconn
Establecer conn = server.createObject (ADODB.Connection)
file = server.mappath (data.mdb)
Conn.open Driver = {Microsoft Access Driver (*.mdb)}; & dbq = & file%>
<? Xml versión = 1.0 codificación = GB2312?>
<%
Dim ipagesize, RS, SSQL, ICURPAGE, IPRESIZE, ICOUNT, IPAGECOUNT
ICEPAGE = TRIM (request.queryString (curpage))
ipageSize = 500 'Tamaño de página
establecer rs = server.createObject (ADODB.RecordSet)
'rs.open select Count (id) de ca_news donde status = 1, Conn, 1,1
Rs. Open Select Count (ID) De Info, Conn, 1,1
icon = rs (0) 'Número total de registros
rs.
pageCount = int ((icount-1)/ipagesize) +1 'Número total de páginas
Si IcePage = entonces
IcePage = 1
demás
ICEPAGE = Cint (ICURPAGE)
final si
Si IcePage <1 entonces
IcePage = 1
final si
Si iicurPage> ipageCount entonces iicurpage = ipageCount
iicurpage-1)*páginas
if idictize = 0 entonces
ssql = seleccionar * de información de información por ID DESC
demás
'SSQL = Seleccionar Top & Ipagesize e ID, Título, PostDate, Hits, Htmlurl de News Where Status = 1 e ID no In (Seleccione Top & iPresize e ID de News Where Status = 1 Orden por ID ASC) Pedido por ID ASC
SSQL = Seleccione Top & Pagesize & * De Info ID no en (Seleccione TOP e IPRESIZE & ID DESDE INFORME ORDER BY ID DESC) Pedido por ID DESC
final si
Rs.open SSQL, Conn, 1,1
%>
<data count = <%= icon%> pageSize = <%= PageSize%> PageCount = <%= PageCount%>>
<%
mientras que no rs.eof
%>
<item id = <%= rs (id)%>>
<title> & lt;! [cdata [<%= rs (a)%>]] & gt; </title>
<htmlurl> & lt;! [cdata [<%= rs (b)%>]] & gt; </htmlurl>
<SpostDate> < %= DateValue (RS (D)) %> </spostDate>
<ctits> < %= trim (rs (c)) %> </hits>
</item>
<%
Rs.Movenext
encaminarse a
%>
</sato>
<%
rs.
establecer RS = nada
Conn.clar
establecer conn = nada
%>
Compartir: Registro de consultas ASP Registros de consultas ASP: Propósito de aprendizaje: Aprenda las operaciones básicas de la base de datos: en el cuarto día de registros de consultas, utilizamos el siguiente programa: consultamos todos los registros, pero cuando queremos modificar y eliminar registros, no podemos ser todos los registros, necesitamos aprender a recuperar los registros apropiados. Primero mira a una declaración: a = aaa b = 1111110 exec = select * de invitado