Acceso a tablas del sistema de Access desde vb6

Sus
31 de Agosto del 2005
No consigo acceder a la tabla de access MsysRelationShips mediante un recordset desde visual basic. Lo intento de la siguiente manera:
dim rs as recordset
Set rs = db.OpenRecordset("SELECT * FROM MSysRelationships", dbOpenSnapshot)
donde db es un objeto database con la ruta de la base de datos.
Me sale error de permiso de lectura.
Gracias por anticipado.

marcos
31 de Agosto del 2005
jijijiji,.... buen problema,.... supongo que lo querras para poder
cambiar las relaciones de un BD de Access,....
dos consejos,....
si lo que quieres es leer las relaciones,... utiliza ADOX
y ADODB,... openschema('adforeignkeys'/*creo que se llama asi el esquema' )
si vas a cambiar las relaciones,... tienes dos opciones,... utilizas el objeto Key de ADOX ò generas una consulta DDl para generar la relacion...

atentamente un beso....

Robersan
31 de Agosto del 2005
Es un comentario de SAS Technical Support.

To read and view the system tables of Access through ODBC you need to change the settings in Access. To make system objects visible, click Options on the Tools menu, click the View tab, and then select the System Objects check box.
To read the system table of Access through ODBC Open the Database and to set the permissions, click Security on the Tools menu and click User and Group Permissions and select each of the System Objects one at a time and then in the Permissions section select the Read Data check Box. Repeat this for all System Objects. Save and Exit the Access database.

Yo lo he hecho y he accedido de forma remota en lectura a MSYSRELATIONSHIPS
Gracias a SAS Technical Support.

Angel
31 de Agosto del 2005
no sé no entiendo muy bien...

con un driver odbc puedes acceder a las tablas de las BBDD con un objeto recordset....

objRecordset.Open(<select>, <miconexion>, <mibloqueo>, <miacceso>

y asignar este recordset a otro y trabajar con él, por ejemplo....

has probado lo que te digo?

a lo mejor no entiendo la pregunta...
salu2!!