关于在MSDASC中使用带密码的Access数据库测试连接时出错的问题

Question

我的意思是引用Microsoft OLE DB Service Component 1.0类型库：代码如下：
    Dim objDataLink As MSDASC.DataLinks
    Dim strConn as string
    
    Set objDataLink = New MSDASC.DataLinks 
    strConn = objDataLink.PromptNew
    MsgBox strConn
我的目的是要显示Data Link Properties属性页，然后可以选择Provider,Connection的内容自动产生一个连接字串strConn。但是当我在Connection项中选择一个带密码的Access库时，“测试连接“出错“（用户名:Admin（默认） 密码：123）出错提示“可能是工作组信息文件丢失...”，而取消密码后“测试连接”成功。我是见到一个用Dephi写的程序有这样的功能，想用VB实现他，现在问题就剩密码了，我实在想不出问题的原因何在，请各位大侠多费心再帮我看看吧。