Supportnet / Forum / Datenbanken
INSERT INTO bei Kennwortgeschützter Zieldatenbank
Frage
Hallo zusammen,
ich habe in Access eine Anfügeabfrage erstellt und möchte die Daten an eine Kennwörtgeschützte Datenbank anhängen.
INSERT INTO tblKunden IN 'c:\datenbank.mdb' [;pwd=123abc]
SELECT tblKunden.*
FROM tblKunden;
Es kommt immer die Fehlermeldung "kein gültiges Kennwort". Das Datenbankkennwort von datenbank.mdb ist aber mit "123abc" korrekt.
Kann mir hier vielleicht einer Helfen.
Vielen Dank
Kloppi
Antwort 1 von Marie
CurrentDb.Execute "SELECT ............ WITH OWNERACCESS OPTION"
Gruß Marie
Gruß Marie
Antwort 2 von Marie
Natürlich CurrentDb entsprechend abändern, wenn Du die Tabellen nicht verlinken kannst oder willst.
Allerdings, wenn auch die Tabellen geschützt sind, dann kommst Du auch mit WITH OWNERACCESS OPTION nicht dran. Im anderen Falle ist das Kennwort unerheblich, Du kannst die Tabellen verlinken und die Datensätze ändern, löschen oder welche anfügen, nur den Tabellenentwurf kannst Du nicht ändern.
gruß Marie
Allerdings, wenn auch die Tabellen geschützt sind, dann kommst Du auch mit WITH OWNERACCESS OPTION nicht dran. Im anderen Falle ist das Kennwort unerheblich, Du kannst die Tabellen verlinken und die Datensätze ändern, löschen oder welche anfügen, nur den Tabellenentwurf kannst Du nicht ändern.
gruß Marie
Antwort 3 von kloppi
Hallo Marie,
dein Tip hat mich auf eine Idee gebraucht. So funktioniert es:
Dim dbAusgabedatei As Database
Dim strSQL As String
strSQL = "INSERT INTO tabelle IN 'c:\datenbank.mdb' SELECT tabelle.* FROM tabelle;"
Set dbAusgabedatei = OpenDatabase(strAusgabedatei, _ False, False, ";pwd=123abc")
db.Execute strSQL
dbAusgabedatei.Close
Vielen Dank
dein Tip hat mich auf eine Idee gebraucht. So funktioniert es:
Dim dbAusgabedatei As Database
Dim strSQL As String
strSQL = "INSERT INTO tabelle IN 'c:\datenbank.mdb' SELECT tabelle.* FROM tabelle;"
Set dbAusgabedatei = OpenDatabase(strAusgabedatei, _ False, False, ";pwd=123abc")
db.Execute strSQL
dbAusgabedatei.Close
Vielen Dank