打开带密码的数据库

请教
我初步学习到数据库
为打开一个带密码的mdb,我写了如下代码:
sub command1_click()
dim ws as workspace '(1)
dim db as database
set ws=dbengine.workspaces(0) '(2)
set db=ws.opendatabase("d:\db1\abc.mdb",,,";pwd=abc123") '(3)
text1.text="open!"
end sub
密码肯定没记错,也区分了大小写,但是运行时,总提示"密码无效",换成独占方式打开还是
说"密码错",但用access打开就可以用这个密码.这是为什么?

在别处请教时,提到了User,但讲的不是很详细
为什么不能打开呢???
谢谢了