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
| ||||||
>> 相关新闻 全部相关新闻 | ||||||
打开页面就是全屏... (2001-04-18) |
网站简介 - 动网先锋 - 动网论坛 - 动网主机 - 联系方式 海口动网先锋网络科技有限公司版权所有 Copyright © 2000 - 2003 AspSky.Net 中华人民共和国电信与信息服务业务经营许可证编号 琼 ICP 020077 24小时服务热线:0898-68592294 68592224 传真:68556467 |