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 * 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  Borrar
 " & objRS("id") &"
 " & objRS("Nombre") & " " & objRS("Apellidos") & " borrar