aspÁ¬½ÓSQL2005 ³öÏÖ ÎÞЧµÄÁ¬½Ó(0x80004005) ´íÎó£¡

´íÎóÐÅÏ¢£º
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC SQL Server Driver][Shared Memory]ÎÞЧµÄÁ¬½Ó¡£
/bbsxp/test.asp, µÚ 24 ÐÐ

»úÆ÷ÅäÖÃ:xp sp3 ,SQL 2005(vs2008 ×Ô´ø)¡£

²âÊÔ´úÂ룺
<%
Dim Conn, Connstr
Dim strServer, strUid, strPwd, strDB

strServer = "(local)"        'SQLÊý¾Ý¿â·þÎñÆ÷µØÖ·
strUid = "sa"                'Êý¾Ý¿âÓû§Ãû
strPwd = "123456"        'Êý¾Ý¿âÃÜÂë
strDB = "bbsxp"                'Êý¾Ý¿âÃû

'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
%>
<