Supportnet / Forum / Datenbanken
Access / VisualBasic / In einer DB klappts, in der anderen nicht
Frage
Ich habe aus einer Beispiel-Datei folgende Funktion kopiert:
Public Sub Veränderbar()
Dim db As Database, rs As Recordset
Dim f As Field, upd As Boolean
Set db = CurrentDb
Set rs = db.OpenRecordset("Tabelle1")
upd = True
For Each f In rs.Fields
If f.DataUpdatable = True Then
Debug.Print "Veränderbar:"; f.Name
Else
Debug.Print "Nicht veränderbar:"; f.Name
upd = False
End If
Next f
Debug.Print upd
End Sub
Diese Funktion listet in der Beispiel-Datenbank die schreibgeschützten Felder einer Tabelle auf.
Wenn ich die Funktion aber in eine neue Datenbank kopiere und dort aufrufe, erhalte ich den Fehler:
13: Typen unverträglich für die Zeile
Set rs = db.OpenRecordset("Tabelle1")
Wo liegt das Problem?
Antwort 1 von trekking
Hast du in deiner Datenbank den Verweis auf DAO 3.6 oder je nach Version von Access 3.5 gesetzt?!
MAchst du unter Extras Verweise. Wichtig ist dann noch, dass du den Verweis vor den ADO (Active Access Objekts) Verweis setzt.
Gruß trekking
MAchst du unter Extras Verweise. Wichtig ist dann noch, dass du den Verweis vor den ADO (Active Access Objekts) Verweis setzt.
Gruß trekking
Antwort 2 von robby_43
Hast in der Neuen Datenbank eine Tabelle mit dem Namen
Tabelle1? wenn nicht anlegen dann gehts
Tabelle1? wenn nicht anlegen dann gehts