Problem VBA Abfrage von kennwortgesch. Access-DB & Win11
12.01.2024 11:17:47
Volker
ich benötige mal wieder eure Hilfe.
Folgendes Problem:
Ich frage seit Jahr und Tag über die DAO.DBEngine.120 - Engine Daten aus Access ab.
Dabei waren die Datenbanken immer mit einem Kennwort verschlüsselt.
Nun habe ich festgestellt, dass ich ab Windows 11 23H2 nur noch ohne Verschlüsselung an die Daten komme.
Test mit Windows 11 21H2 haben noch problemlos funktioniert.
Die Datenbank liegt im selben Verzeichnis wie die Exceldatei, also keine externe Anwendung.
Das ist so der Abfragekopf:
Call PW_Archiv(Pass_Archiv)
Set DBEngine = CreateObject("DAO.DBEngine.120")
strFileName = ActiveWorkbook.Path & "\xxx.accdb"
Set DB = DBEngine.Workspaces(0).OpenDatabase(strFileName, False, False, "MS Access;pwd=" & Pass_Archiv)Ich kann zwar erst mal ohne Passwort arbeiten, aber ich möchte dem Kunden dann doch nicht alle Rechte für das Backend geben.
Google habe ich bereits ohne Ergebnis befragt.
Ich hoffe, Ihr könnt mir weiterhelfen.
Schon mal vielen Dank.
Gruß Volker