title image


Smiley Re: Benutzername und Kennwortübergabe im OpenRecordset
Das geht so:



Dim DB As DAO.Database, RS As DAO.Recordset

Set DB = DBEngine(0).OpenDatabase("c:\xxx\DBGesichert.mdb", dbDriverNoPrompt, False, ";PWD=xxx")

Set RS = DB.OpenRecordset("Tabelle1", dbOpenSnapshot)

Debug.Print RS(1)

RS.Close

DB.Close


Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: