Conexio access 2000 y visual basic 6.0

newprogrammer
24 de Febrero del 2004
si fueran tan amables de decirme como conectar
access 2000 y visual basic 6.0

Hefzi-ba
24 de Febrero del 2004

'EJEMPLO:
'Primero declaras tus variables:

Public Cnn As ADODB.Connection 'Tipo Connection
Public Rst As ADODB.Recordset 'Tipo RecordSet

'Despu茅s haces la conexi贸n con la base de datos:

Set Cnn = New ADODB.Connection
Cnn.ConnectionString "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "MiBasedeDatos.mdb"
Cnn.CursorLocation = adUseClient
Cnn.Open 'Al final se habre la conexi贸n

'Conectas el RecordSet con la Conexi贸n:

Set Rst = New ADODB.Recordset
Rst.ActiveConnection = Cnn
Rst.CursorType = adOpenStatic
Rst.LockType = adLockOptimistic

'Despu茅s utilizas el recordset para abrir la tabla que gustes, tambi茅n lo puedes hacer con una consulta SQL:

Rst.Open ("Mi_Tabla")
'贸:
Rst.Open ("SELECT * FROM Mi_Tabla ORDER BY Campo")

'Para cerrar el RecordSet:
Rst.Close

'Espero te sirva

Shalom.