How can I change the workgroup file (mdw) (run time) in vb6?

ex.
dim AppAccess as new Access.Application

AppAccess.opencurrentdatabase "C:\Employee.mdb"
AppAccess.visible = true


The employee file need to joint a workgroup file.
I would like to specify the path of my mdw file and user id and password through my custom dialog box.

Any idea??? Thanks!