在建立与服务器的连接时出错
来源:百度知道 编辑:UC知道 时间:2024/06/07 18:04:49
已经在SQL2005中的外围应用配置器中的服务和连接的外围应用配置器设置了远程连接和本地连接,并且重起了服务。可是依旧不行
<%
'定义连接数据库对象的相关变量
Dim ConnObj
Dim ConnString
'定义连接数据库对象的相关变量
Dim DatabaseSeverLocalName
Dim DatabaseServerUserName
Dim DatabaseServerUserPwd
Dim DatabaseServerDatabaseName
'给数据库连接的变量进行赋值
DatabaseServerLocalName = "***.***.***.***"
'IP地址
DatabaseServerUserName = "sa"
'数据库登陆名
DatabaseServerUserPwd = "******"
'登陆的密码
DatabaseServerDatabaseName = "DatabaseName"
'数据库名称
'创建数据库的连接对象
Set ConnObj = Server.CreateObject("Adodb.Connection")
'OLEDB的方式读取数据库,支持64位的操作系统
ConnString = "Provider=SQLOLEDB;Data Source=" &DatabaseServerLocalName& ";UID=" &DatabaseServerUserName& ";PWD=" &DatabaseServerUserPwd& ";Database=" &DatabaseServerDatabaseName& ""
ConnObj.Open Co