Acceso a BD desde ASP
Este es el tipico acceso a BD desde paginas ASP
El mas cutre: abrir una bd access que se encuentra en el mismo directorio que la pagina ASP.
El mas cutre: abrir una bd access que se encuentra en el mismo directorio que la pagina ASP.
<!-- ejemplo de acceso a BD -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Pagina ASP 09 - Acceso a BD access</title>
</head>
<body>
Ejemplo de acceso a BD<br>
<%
'definimos la variable de conexion y consulta
Dim Konexioa
Dim Consulta
Dim Resultados
'le asignamos un objeto de conexion
Set Konexioa = server.CreateObject("ADODB.Connection")
' abrimos la BD
Konexioa.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("prueba.mdb"))
Response.Write("Ok, conexion establecida <br>")
'Consulta SQL
Consulta = "select * from usuario"
set Resultados = Konexioa.Execute(Consulta)
Response.Write("<table><tr><th>Nombre</th><th>Apellidos</th><th>Descripcion</th><th>Booleano</th></tr>")
'Recorrido de resultados
While (not Resultados.Eof)
Response.Write("<tr><td>"&Resultados("nombre")&"</td><td>"&Resultados("apellidos")&"</td><td>"&Resultados("descripcion")&"</td><td>"&Resultados("booleano")&"</td></tr>")
Resultados.MoveNext
Wend
Response.Write("</table>")
' CERRANDO LA CONEXION
Konexioa.Close
Set Resultados = nothing
Set Konexioa = nothing
%>
</body>
</html>
pello.io