落伍者站长论坛's Archiver

sunnykylin 发表于 2008-5-8 19:39

asp连接sql错误 在线求人

类型:
Microsoft OLE DB Provider for SQL Server (0x80004005)
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或拒绝访问。
/Include/Class_Conn.asp, 第 15 行
代码如下:
<%
Response.Buffer = True
'On Error Resume Next
Dim Conn,Connstr
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source

Sqldatabase="sdyjs"            
Sql_pass_word="123456"   
Sql_User_ID="sa"      
Sql_Data_Source="127.0.0.1"        
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data

Source='"&Sql_Data_Source&"'"       
Conn.Open Connstr

Function CloseDB
Conn.close
Set conn = Nothing
End Function

Function CloseRs
Rs.Close
Set Rs = Nothing
End Function

If Err Then
        err.Clear
        Set Conn = Nothing
        Response.Write "数据库连接出错,请检查连接字串。"
        Response.End
End If

%>
急求

weio33 发表于 2008-5-8 19:52

把空格控制好,不要分开了
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data
Source='"&Sql_Data_Source&"'"

zhujie 发表于 2008-5-8 20:28

不是太懂。楼下的来吧。

05809com 发表于 2008-5-11 13:36

ConnStr = "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlHostIP & ";"

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.