UC知道asp使用mssql数据必须在同一台服务器才可以运行？
来源：百度知道 编辑：UC知道 时间：2024/06/07 23:00:51
我过去请人开发的一套程序，只有asp网页程序与MSSQL在同一台服务器上才能正常运行。如果MSSQL在不通服务器上设置了IP进行远程连接，程序就无法运行，显示500错误或者空白页面？连接文件的代码如下，请教高人指点，谢谢了！
<%
'=========================================================
' 文件名: DBConn.asp
' 完成日期: 2005-10-15
' 功能说明：数据库链接类模块
'=========================================================
Class clsDBConn
Dim objCon
Private Sub Class_Initialize()
Dim strDBPath
Set objCon=CreateObject("Adodb.Connection")
strDBType="PROVIDER=SQLOLEDB;DATE SOURCE=数据服务器IP;UID=用户名;PWD=密码;DATABASE=数据库名"
objCon.Open strDBType
End Sub
Public Property Get ActiveConn()
Set ActiveConn=objCon
End Property
'返回一个静态数据集
Public Function ExecuteSql(strSql)
'On Error Resume Next
Set ExecuteSql=objCon.Execute(strSql)
If Err.number<>0 Then
Response.Write "发生错误!"
Response.End
<%
'=========================================================
' 文件名: DBConn.asp
' 完成日期: 2005-10-15
' 功能说明：数据库链接类模块
'=========================================================
Class clsDBConn
Dim objCon
Private Sub Class_Initialize()
Dim strDBPath
Set objCon=CreateObject("Adodb.Connection")
strDBType="PROVIDER=SQLOLEDB;DATE SOURCE=数据服务器IP;UID=用户名;PWD=密码;DATABASE=数据库名"
objCon.Open strDBType
End Sub
Public Property Get ActiveConn()
Set ActiveConn=objCon
End Property
'返回一个静态数据集
Public Function ExecuteSql(strSql)
'On Error Resume Next
Set ExecuteSql=objCon.Execute(strSql)
If Err.number<>0 Then
Response.Write "发生错误!"
Response.End
那是mssql服务器那端的问题
你没有连接到它的权限
mssql的防火墙设置一下，guest账户开一下
一般mssql和asp服务器在局域网内还好搞，如果是在外网，难度就大了
程序没问题.SQL服务器设置权限问题
首先,mssql可以在别的服务器上运行。
加个 on error resume next
然后：
if err then
response.write("错误原因：" & err.description)
end if
看一下，哪里错了。
看一下500错误的具体提示，在IE高级选项关闭http友情错误提示。