UC知道网站制作中的与SQL Server 2000数据库的连接
来源：百度知道 编辑：UC知道 时间：2024/05/24 18:42:23
我是xp 的系统 上面装的是SQL Server 2000 我现在在我的上面怎么不能实现网站与数据库的连接啊!!是什么原因啊 连接程序是这样写的
dim conn,connstr,strSQLServerName,strSQLDBUserName,strSQLDBPassword,strSQLDBName
strSQLServerName = "127.0.0.1"
strSQLDBUserName = "sa"
strSQLDBPassword = ""
strSQLDBName = "snsn"
userid=1
response.buffer=true
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionTimeout = 10
conn.CommandTimeout = 20
conn.CursorLocation = 3
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
conn.Open connstr
dim conn,connstr,strSQLServerName,strSQLDBUserName,strSQLDBPassword,strSQLDBName
strSQLServerName = "127.0.0.1"
strSQLDBUserName = "sa"
strSQLDBPassword = ""
strSQLDBName = "snsn"
userid=1
response.buffer=true
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionTimeout = 10
conn.CommandTimeout = 20
conn.CursorLocation = 3
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
conn.Open connstr
On Error Resume Next
strSQL="provider=SQLOLEDB.1;server=服务器名称（本机可写localhost）;database=数据库名称;uid=用户名;pwd=密码;"
Set Conn=Server.CreateObject("ADODB.CONNECTION")
Conn.CursorLocation=3
Conn.Open strSQL
If Err.Number > 0 Then
Set Conn=Nothing
Err.Clear
Response.Write "数据库连接失败."
Response.End
End If
换ACEESS的了 比较简单