|
√ Google adsense申请技巧 √ 本站核心代理域名注册主机业务
√ 快速发布你的买卖域名买卖网站信息
√ 1元注册 cn域名
√ 站长每日新闻导读 √ ·推荐万网空间¥120元 150m √ 站长网:站长必上的网站 √ 网站联盟大全 √ 本站代理万网域名55空间120元 |
|
Microsoft OLE DB Provider for ODBC Drivers error ’80004005’
Const ReadOnly = False File = "\\server\share\file.mdb" Set Conn = CreateObject("DAO.DBEngine.35").Workspaces(0).OpenDatabase(File,,ReadOnly) Set RS = Conn.OpenRecordset(SQL)
Set Conn = CreateObject("ADODB.Connection") Conn.Provider = "Microsoft.Jet.OLEDB.4.0" Conn.Open "\\server\share\file.mdb" Set RS = Conn.Execute(SQL)
假定有权限的话,你亦可访问其它机器中的开放数据连接:
Set UM = CreateObject("UserManager.Server") UM.LogonUser "Login with the rights", "Password", "Domain" ... open database ... UM.RevertToSelf |