Mensaje enviado por Humberto Rosario Díaz <hrcomputers@eldish.net>

Hola:
            El Compañero Alberto Rodriguez Calvo ha planteado la solucion dos veces, de la cual extracto este pedazo de mail:

No hay ningun problema para usar MDB de access 20000.
Solo hay que seleccionar la versión adecuada de las librerías de acceso a datos:

Si usas DAO, la 3.6
Si usas ADO, la 2.1

Las dos se instalan con Access 2000.

Ve a Proyecto-Referencias y marca la que utilices.

---------------------------------------------------------------------

Si utilizas DAO, (Visual Basic 5 y Office 97) puedes hacerlo, seleccionando "Microsoft DAO 3.6" en Refencias
_____________________________________________________________________________

Que soluciones tu problema, Amigo.
Y hazle llegar la solucion a muchos.
Saludos.

Humberto Rosario Díaz
hrcomputers@unete.com.ve
__________________________________________

Mensaje enviado por "Josep A. Ferrando" <jfcarpi@wanadoo.es>

Hola, aqui teneis una solucion para acceso a bases de datos Access 2000

El DataControl del VB5/VB6 no se puede usar directamente con BD Access 2000.
Si se puede usar el nuevo AdoDataControl del VB6.
Para usar el DataControl del VB5 hay que usar un metodo alternativo a saber

1.- En referencias del Proyecto ponemos DAO3.6
2.- Dibujamos el DataControl (No ponemos nada)
3.- Dibujamos un TextBox
4.- En Propiedades DataSource lo enlazamos al DataControl
5.- En Propiedades DataField ponemos el Campo que queremos (o si dibujamos
un DataGrid solo el punto 4)

escribimos nuestro codigo como sigue:

Option Explicit
Private daoDB36 As Database
Private rs As Recordset
Dim sPath As String

Private Sub Form_Load()
sPath = App.Path & "\MiBaseDatosAccess2000.mdb"
Set daoDB36 = DBEngine.OpenDatabase(sPath)
Set rs = daoDB36.OpenRecordset("TablaDeseada")
Set Data1.Recordset = rs
End Sub

Saludos,
Josep A. Ferrando