Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Dao und zugriffsrechte
Autor: Barnes
Datum: 13.01.05 19:47
hallo miteinander. ich hab mal wieder ein kleines problem mit meiner datenbank. die datenbank liegt in einem folder, auf dem manche nur lesezugriff haben. und da ist mein problem. wenn jemand das programm startet wird in die XXX.ldb kreiert. somit kann ich auch nicht die mdb readonly öffnen, da die ldb abgefragt wird und die fehlermeldung "file in use" kommt. hier ma mein code: Const sql = "select * from Userlogs" passwort = "XXXXXXXXXXX" On Error GoTo errordb Set db = OpenDatabase(App.Path & "\Tins.mdb", vbNormal, False, "MS Access;PWD=" & passwort) Set rs = db.OpenRecordset(sql) Exit Sub errordb: If Err.Number = "3024" Then MsgBox XXXXXXXXXX End End If If Err.Number = "3051" Then MsgBox XXXXXXXXX Const sql1 = "select * from Userlogs" passwort = "XXXXXXX" Set db = OpenDatabase(App.Path & "\Tins.mdb", True, True, "MS Access;PWD=" & passwort) Set rs = db.OpenRecordset(sql) danke schon mal im voraus grüsse barnes

Dao und zugriffsrechte

1.245

Barnes

13.01.05 19:47

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