ADOX链接外部表出错

代码如下：

    Dim cat As ADOX.Catalog
    Dim tbl As ADOX.Table
    
    Set cat = New ADOX.Catalog
    cat.ActiveConnection = CurrentProject.Connection
    Set tbl = New ADOX.Table
    tbl.Name = "tblClients"
    Set tbl.ParentCatalog = cat
    tbl.Properties("Jet OLEDB:Create Link") = True
    tbl.Properties("Jet OLEDB:Link datasource") = CurrentProject.Path & "\客户档案.accdb"
    tbl.Properties("Jet OLEDB:Link provider string") = ";pwd=123"
    tbl.Properties("Jet OLEDB:Remote Table name") = "客户信息"
    cat.tables.Append tbl
运行报错，说是 密码无效 ，请问是什么原因？（客户档案数据库的密码是数字123）