Ejemplo de uso de bases de datos con ASP y ADO

<% Dim oConn,strSQL, objRS Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("datos.mdb")) strSQL = "SELECT id, Nombre, Apellidos FROM prueba" Set objRS = oConn.Execute(strSQL) %> <% while (not objRS.Eof) Response.Write("") objRS.MoveNext wend oConn.Close set objRS = nothing set oConn = nothing %>
 id Nombre Apellidos 
 " & objRS("id") & " " & objRS("Nombre") & " " & objRS("Apellidos") & "