Error 430
Publicado por Romulo (3 intervenciones) el 23/09/2005 22:24:29
Hola mundo tengo la siguinnte conexion a una base de datos Acces 97, funciona bien en windows 98 y 2000 pero al instalar la aplicacion en WindwsXP SP2 sale el sgiuiente erorr Run-time error '430': Class does not suppot Automation. Estoy usando mdac2.7
Public db As New ADODB.Connection
Public strcnn As String
strcnn = "provider=Microsoft.Jet.OLEDB.4.0;data source=" & App.Path & "\Basedatos\ViMedida.mdb"
db.ConnectionString = strcnn
db.Open
db.CursorLocation = adUseClient
Public db As New ADODB.Connection
Public strcnn As String
strcnn = "provider=Microsoft.Jet.OLEDB.4.0;data source=" & App.Path & "\Basedatos\ViMedida.mdb"
db.ConnectionString = strcnn
db.Open
db.CursorLocation = adUseClient
Valora esta pregunta
0