asp [DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或拒绝访问。

今天做网站遇到了这个问题，当然这个问题是在出现“用户 'sa' 登录失败。原因: 未与信任 SQL Server 连接相关联”这个问题后，解决（解决办法见]http://gpcgpan.blog.51cto.com/713912/146758）后才出现的，这个问题以前没遇见过，上网查了许多资料，找了好多解决办法，都不行，时间不知不觉的过去了，问题还没有解决，唉 ，眼看着就块24点了，心想如果不解决就不睡觉，最后看到，才知道：点击开始 程序 Microsoft sql server 2005 选择配置工具 然后再选择sql server configuration manager 弹出如图所示对话框：



tcp/ip启用，启用之后，要重新启动 sql server 服务，重新启动之后即可解决，如果还不能解决，看看你的连接代码有错误吗？
是不是连接代码的问题，就换了代码试一下：还真行，解决了
以前的代码：
'Set conn = CreateObject("ADODB.Connection")
'Dim strConn
' Const SqlDatabaseName = "ceshi"
' Const SqlPassword =00000
' Const SqlUsername = "sa"
' Const SqlLocalName = "(127.0.0.1)"
'strConn = "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";"
'conn.Open strConn
现在的代码：
Dim Conn, Connstr
Dim strServer, strUid, strPwd, strDB
strServer = "(local)" 'SQL数据库服务器地址
strUid = "sa" '数据库用户名
strPwd = 00000 '数据库密码
strDB = "ceshi" '数据库名
'On Error Resume Next
Set Conn = Server.CreateObject("ADODB.Connection")
Connstr = "driver={sql server};server="&strServer&";uid="&strUid&";pwd="&strPwd&";database="&strDB
Conn.Open Connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "<div id=""DBError"">数据库服务器端连接错误，请与网站管理员联系。</div>"
Response.End
End If
呵呵，真不知道是怎么回事 local和127.0.0.1应该是一个意思啊 难道他们两个不是？
希望高手给予指点本文出自 “MyPan's blog” 博客，请务必保留此出处http://mypan.blog.51cto.com/713912/146759