Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Laufzeitfehler 3112
Autor: Gregor K
Datum: 05.01.05 19:57
Hallo, in der Firma, in der ich arbeite werden Produktionsdaten (S:\. . . .\PCG.mdb) in einer Access 2.0 Datenbank im Netz gespeichert. In der Datenbank befinden sich mehrere Tabellen, darunter auch die Tabelle "Produktionsdaten", aus der ich Daten lesen möchte. Der Zugriff auf die Datenbank in der Firma ist durch Benutzerkennung und Paßwort (ist aber immer leer) nur bestimmten Anwendern gestattet. Zu Hause kann ich diese Datenbank problemlos mit Access97 öffnen und zwar ohne die Eingabe einer Benutzerkennung/Paßwort. Wenn ich versuche, diese Tabelle mit VB6.0 zu lesen (sowohl in der Firma als auch zu Hause) bekomme ich die Fehlermeldung Laufzeitfehler '3112' : Datensätze können nicht gelesen werden. Keine Leseberechtigung auf 'Produktionsdaten'. obwohl ich zumindest in der Firma eine Leseberechtigung habe. Ich verwende folgenden Code: Dim DB As Database Dim Tabelle As Recordset Dim dbFile As String Rem Datenbank öffnen dbFile = "D:\PCG.mdb" Set DB = Workspaces(0).OpenDatabase(dbFile, False, False) Set Tabelle = DB.OpenRecordset("Produktionsdaten") While Tabelle.RecordCount > 0 And Not Tabelle.EOF Print Tabelle("Feld1") Print Tabelle("Feld2") Print Tabelle("Feld3") Tabelle.MoveNext Wend Das o. a. Programm funktioniert, wenn ich die Datenbank zu Hause mit Access97 öffne und wieder speicher. Wie kann ich die Datenbank öffnen (ohne sie vorher neu zu speichern)? Ich verzweifel langsam! Grüße Gregor

Laufzeitfehler 3112	2.808	Gregor K	05.01.05 19:57
Re: Laufzeitfehler 3112	1.220	Zero-G.	10.01.05 15:50

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen