Hay varias formas de conectar vb para acceder a la base de datos

El método es el siguiente:

La primera conexión y el conjunto de registros se declaran por separado

<%

db="db/ darden.mdb "

set conn=server.createobject("ADODB.connection")

connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Servidor .MapPath( "" & db & "")

conn.open connstr

%>

<%

set rs= server.createobject ("adodb.recordset")

sql="select * from ebook order by id desc"

rs.open sql,conn,3,3

rs.addnew

......

......

rs.update (rs.delete)

rs.close

set rs=nada

conn.close

set conn=nada

respuesta.write( "

Respuesta.Redirect "homepage.asp"

%>

El segundo tipo de conexión se declara junto con el conjunto de registros

<%

set rs=server.createobject("adodb.recordset")

sql=" seleccione * del pedido de libros electrónicos por id desc"

conn = "DBQ=" + server.mappath("book.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Controlador (*.mdb) };"

rs.open sql,conn,3,3

rs.addnew

......

......

rs.update (rs.delete)

rs.close

establecer rs=nada

respuesta .write("

%>

ASP tutorial de funcionamiento simple de la base de datos

<1>.Conexión de base de datos (utilizada para preparar el archivo de conexión conn.asp por separado)

<%

Establecer conn = Servidor. CreateObject(ADODB.Connection)

conn.Open DRIVER={Microsoft Access Driver (*.mdb)} & Server.MapPath(\bbs\db1\user.mdb)

%>