RE: [Talk] Using CreateObject to Open Access

[Brooks, Eric]

See if this works for you.   Private dbMdb As Database Private wsMdb As Workspace   Set wsMdb = CreateWorkspace("", "Admin", "", dbUseJet) Set dbMdb = OpenDatabase(App.Path & "\passwords.mdb", False, False, "MS Access;PWD=xx.123")   Thanks Eric Brooks (931) 551-1992   Confidentiality Notice: This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. -----Original Message----- From: Gloria Mallory [mailto:[EMAIL PROTECTED] Sent: Tuesday, November 30, 2004 11:18 AM To: '[EMAIL PROTECTED]' Subject: [Talk] Using CreateObject to Open Access Our Access databases require a password since we use the workgroup administrator.  Is there any way to code for this in Boston Workstation?   Thank you.   Gloria Mallory Good Shepherd Medical Center 903 315-5120 [EMAIL PROTECTED]