SendKeys to "Password Required" window

[dlcksc]

Access 2000:
I'm attempting to close Main.mde from Open.mde. Main.mde is set to compact on close. The "Password Required" window pops up because Main.mde is password-protected. When the code below is executed from Open.mde(to close Main.mde), the "Password Required" window pops up.

AccInstance.CommandBars("Menu Bar"). _
            Controls("Tools"). _
            Controls("Database utilities"). _
            Controls("Compact and repair database..."). _
            accDoDefaultAction

Is there a way to input the password and invoke the "enter" key using VBA?

 

[dlcksc]

See the Solution I posted for...

Open & CompactOnClose password-protected public db w/o passwrd prompts