Muy bien, yo he hecho lo siguiente :
la base de datos se llama fondoarte.mdb
Sub Conexion()
dim StrRuta
'la ruta hasta la base de datos es la siguiente:
StrRuta="C:\Documents and Settings\terminal\Mis documentos\Lucrecia\base de datos\FONDOARTE\fondoarte.mdb"
Dim Con, Rec
Set Con = Server.CreateObject ("ADODB.Connection")
Con.Open StrRuta
Set Rec = Server.CreateObject("ADODB.Recordset")
Rec.open "select [obrasarte].[titulo] from [OBRASARTE];" , Con
rec.close
con.close
end sub
me da error, me dice que no está definida la variable "server", entonces le quito lo de server, y pongo sólo set Con=CreatObject("ADODB.Connection") pero entonces me da el siguiente fallo:
"La configuración de seguridad de este equipo prohíbe el acceso a un origen de datos en otro dominio."
Ufff ya no sé qué hacer, como sea un tema de permisos no podré hacer nada pq es el equipo de una empresa y no puedo administrar permisos. Pero en fin muchas gracias por todo, de verdad que se agradece la ayuda.