Open a password protected database

[cassie99]

Hello,

The code below successfuly opens a remote database. Is there an option that I can add to the path that opens XP_Foo.mdb if it is password protected? Thanks in advance.

Cassie

<SNIP>
Dim strAccDB As String
Dim strAccLoc As String

strAccDB = """" & "\\CRBL0F01\137\DQA_Time\XP\Management\XP_Foo.mdb" & """"
strAccLoc = SysCmd(acSysCmdAccessDir) & "msaccess.exe"
Call Shell(strAccLoc & " " & strAccDB, 1)
DoCmd.Quit acQuitSaveAll
<END SNIP>