Visual Basic para Aplicaciones - VB 6 + ACCESS 2000

Life is soft - evento anual de software empresarial
 
Vista:

VB 6 + ACCESS 2000

Publicado por Queridinho BRASIL (28 intervenciones) el 07/12/2001 09:23:56
Hola latinos:

Estoy con dificuldades en abrir la mi base de datos (Access 2000) desde el VB 6. Un de los motivos es que con el MICROSOFT DAO 3.6 no estoy conseguiendo abrir el Access 2000. Me gustaria saber cual otra biblioteca (dao / ado) que yo puedo utilizar para abrir. Quedaré muy agradecido siinformarenme cual otra bibilioteca puedo utilizar, y si possible tambien el código.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:VB 6 + ACCESS 2000

Publicado por Mauricio Baeza (262 intervenciones) el 07/12/2001 18:40:50
Haces una referencia a ADO y usas el siguiente código...

Option Explicit
Private sBase As String ' Nombre de la base de datos
Private cnnConexion As ADODB.Connection
Private WithEvents rstDatos As ADODB.Recordset

Private Sub Form_Load()

sBase = App.Path & "\Datos.mdb"

Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset

cnnConexion.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & sBase
rstDatos.Open "SELECT * FROM miTabla", cnn, adOpenDynamic, adLockOptimistic

End Sub

'En rstDatos tendras todos los registros que se encuentren en miTabla

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar