Rubrik: Datenbanken | 15.01.03 |
Datenbanken: Laufzeitfehler 13 -Typen unverträglich VB-Version: VB5, VB6 | ||
Views: 18.245 |
Da haben Sie nun Ihre Datenbank und möchten eine Abfrage starten. Sie nehmenIhren Code, der ja schon öfter funktioniert hat, z. B.
Dim DB As Database Dim RS As Recordset Set DB = DBEngine.OpenDatabase(App.Path & "Adressen") Set RS = DB.OpenRecordset("SELECT Name FROM Adressen") ..... ' weiterer Code
und genau in dieser Zeile: Set RS = DB.OpenRecordset meckert VB und meldet:Typen unverträglich. Warum?
Meistens liegt es daran, dass in den Verweisen sowohl DAO als auch ADOaktiviert ist. Wenn Sie ADO nicht verwenden, können Sie einfach den Verweis aufADO deaktivieren - und das Problem ist erledigt.
Falls Sie aber - aus welchen Gründen auch immer - beide Verweise brauchen, dann muss die Recordset-Variable so deklariert werden:
Dim RS As DAO.Recordset
Damit erkennt VB, dass DAO gemeint ist und hat nichts mehr zum Meckern.