Mostrar tablas de Access con ASP

Obviamente antes de mostrar una información en una tabla debemos conectarnos a ella. Ahora, después de conectarnos a la BD, abriremos una tabla de la BD y mostraremos su información por la pantalla.
Veamos como mostrar nuestros datos!...

<%
Dim oConn, RS
'conectamos a la tabla.
Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=D:WebsSoloaspdbmibd.mdb"
'Abrmios el RecordSet (accedemos a los datos de la BD).
Set RS = Server.CreateObject ("ADODB.RecordSet")
'entre " " va el nombre de la tabla, y luego de la "," se indica la BD que contiene esa tabla.
'El número que le sigue, el "1", es la forma de abrir la tabla.
RS.Open "contador", oConn, 1
'Mostramos los campos hasta que nuestro RS no termine.
'Cuando termine... sale del bulcle automaticamente.
Do While Not RS.EOF
Response.Write RS("hits") &"<BR>"
Response.Write RS("fecha")
'MoveNext nos movera al siguiente registro de la tabla. A la siguiete fila.
RS.MoveNext
Loop
'primero cerramos los objetos y luego los limpiamos.
RS.Close
oConn.Close
Set RS = nothing
Set oConn = nothing
%>

En resumen. con RS.Open "datos" estamos abriendo la tabla.
Con Do While Not RS.EOF... Loop, indicamos que se cumpla el bucle hasta que llegue al último registro. Justamente esto significa EOF. Cuando EOF es true, significa que estamos parados en la ultima posición de la tabla.
Con Response.Write RS("campo"), mostramos por pantalla el "campo"
RS.MoveNext nos pasa a la siguiente linea o fila.
Y por último nunca se olviden de cerra el RecordSet y la conexión a la BD. Y limpiarlos.

Autor: Guido Laghi
http://www.soloasp.com.ar/vertexto.asp?txt=19

Usuarios que han visto este tema también han visto...

- Insertar imágenes en una base de datos con ASP
- Como poner Wiewstate para optimizar Google
- Inyección SQL en ASP
- 20 tips para mejorar el rendimiento de aplicaciones ASP.NET
- Proteger páginas con contraseña

- Versión imprimible de este documento
- Enviar por e-mail este documento