Problemas al conectar con access
Quiero conectar access con visual 6 y no he podido estoy usando este c贸digo y me da error de compilaci贸n cuando declaro la referencia
Referencias: Microsoft Activex Data Objects Recordset Library 2.5
Public Cn As New ADODB.connection
Public Sub Conextion()
sql = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;Persist Security Info=False; DATA SOURCE=" & App.Path & "prueba.mdb"
If Cn.State = adStateClose Then
Cn.Open sql
End If
End Sub
Referencias: Microsoft Activex Data Objects Recordset Library 2.5
Public Cn As New ADODB.connection
Public Sub Conextion()
sql = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;Persist Security Info=False; DATA SOURCE=" & App.Path & "prueba.mdb"
If Cn.State = adStateClose Then
Cn.Open sql
End If
End Sub
