dega

Experiencia

Conozco dos maneras.
Ambas utilizando Server.MapPath, que responde la ruta completa del servidor de una archivo con ruta relativa.
Que es lo que se necesita para que el servidor pueda saber donde se encuentra la base de datos access.
La primera:
strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dirDB/consulta.mdb")
set conn = Server.Createobject("adodb.connection")
conn.open strconn
set rs =server.CreateObject ("adodb.recordset")
rs.Open "tblConsulta",conn,3,3
(los 3,3 son necesarios si no quiero incluir las constantes de ADODB)
La segunda:
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionTimeout = 15
conn.CommandTimeout = 30
conn.Open "DBQ=" & Server.MapPath("dirDB/consulta.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;MaxBufferSize=8192;Threads=20;"
Set cmdDC = Server.CreateObject("ADODB.Command")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "tblConsulta",conn, 3, 3
Funcionan de manera impecable en IIS de W2000 y w2000 server. No funcionan en ISS de XP, si alguien sabe por qué no, me encantaría saberlo"