Programación General > Visual Basic para principiantes

 Problemas Con Visual, Access97 Y Access2000

(1/1)

ikiki:
hola a todos, a ver si me explico bien. tengo una aplicacion hecha con vb, que utiliza una conexion ODBC para llamar a una BBDD en Access 97. Lo que pasa es que quiero que se abra en Access 2000 y no se como hacerlo. Ya no tengo instalado en el PC Access 97 (no puedo volver a instalarlo) y con el Access 2000 me da error. No se si sera problema de Dll o en la llamada a la BBDD desde Visual, igual deberia retocar esto pero no se como.

aqui es donde tengo la conexion y me da el error.

Function existe(codigo As String) As Boolean
Dim registro_temp As Recordset
Set registro_temp = BD.OpenRecordset("select num_invt from userid.equipo " & _
          "where num_invt='" & codigo & "'", dbOpenDynamic)
         
existe = Not (registro_temp.EOF)
registro_temp.Close

End Function


Function abre_base(b_datos As String) As Boolean
On Error GoTo errror
Set wrkjet = CreateWorkspace("", "admin", "", dbUseODBC)
wrkjet.BeginTrans

   
Set BD = wrkjet.OpenDatabase(b_datos, _
        dbDriverNoPrompt, True, _
        "ODBC;DATABASE=" & b_datos & ";UID=;PWD=;DSN=" & b_datos)

abre_base = True
Exit Function
errror:
abre_base = False
 
End Function

Angel38:
Por ahora te puedo decir que Access 2000 y 97 no son compatibles por ello el error.

Creo que tienes que descargar un paquete que te soluciona este error, investiga o espera que alguien te dé más información.

Epa:
Microsoft DAO 3.51 Object Library  <--- Access 97
Microsoft DAO 3.6 Object Library    <--- Access 2000

Navegación

[0] Índice de Mensajes