UC知道asp连接SQL代码不知道是哪里的问题？
来源：百度知道 编辑：UC知道 时间：2024/06/08 16:25:11
<%
Set
conn=Server.CreateObject
("ADODB.Connection")
biyesheji =
"Provider=SQLOLEDB.1;data
source=(local);User
ID=sa;Password=sa;Initial
Catalog=biyesheji"
conn.open biyesheji
%>
运行时的提示是：
Microsoft OLE DB Provider for SQL Server '80004005'
用户 'sa' 登录失败。原因: 未与信任 SQL Server 连接相关联。
\wwwroot\conn.asp, line 4
Set
conn=Server.CreateObject
("ADODB.Connection")
biyesheji =
"Provider=SQLOLEDB.1;data
source=(local);User
ID=sa;Password=sa;Initial
Catalog=biyesheji"
conn.open biyesheji
%>
运行时的提示是：
Microsoft OLE DB Provider for SQL Server '80004005'
用户 'sa' 登录失败。原因: 未与信任 SQL Server 连接相关联。
\wwwroot\conn.asp, line 4
你用的DW做的吧！还是别用那个软件啊，手工编写吧，用那个代码垃圾太多了，况且还连不上， 以前我也一直连不上，便手工写了。
www.huihuibbs.cn
<%
Const SqlDatabaseName = "biyesheji" ' 数据库名字'
Const SqlPassword = "sa" '数据库密码'
Const SqlUsername = "sa" '数据库帐户'
Const SqlLocalName = "127.0.0.1" '数据库地址'
'数据库连接函数'
Sub ConnectionDatabase
Dim ConnStr
ConnStr = "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";"
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串!"
Response.End
End If
End