sunvit
29-11-2004, 13:44
Ho un problema sull'apertura di una tabella di un Database MDB.
Mi dà il seguente errore:
Errore di runtime 13..Tipo non corrispondente
Il codice che ho scritto è il seguente:
Private Sub cmd_Gestione_Click(Index As Integer)
Dim db As Database
Dim rs As Recordset
On Error Resume Next
Set db = OpenDatabase("c:\dati\dati.mdb")
If Err.Number <> 0 Then
MsgBox "Errore nell'apertura del Database"
End If
On Error GoTo 0
Set rs = db.OpenRecordset("Anagrafica", dbOpenTable)
form_inscli.Show
End Sub
Qualcuno è così gentile da aiutarmi?
Mi dà il seguente errore:
Errore di runtime 13..Tipo non corrispondente
Il codice che ho scritto è il seguente:
Private Sub cmd_Gestione_Click(Index As Integer)
Dim db As Database
Dim rs As Recordset
On Error Resume Next
Set db = OpenDatabase("c:\dati\dati.mdb")
If Err.Number <> 0 Then
MsgBox "Errore nell'apertura del Database"
End If
On Error GoTo 0
Set rs = db.OpenRecordset("Anagrafica", dbOpenTable)
form_inscli.Show
End Sub
Qualcuno è così gentile da aiutarmi?