一个连接数据库的问题啊。

我用ASP连SQL时，就是连不上，我直接连和用DSN连都不行，大家帮我看看。
其中一段：

 1   
 2set ConnObj = Server.Createobject("ADODB.Connection")   
 3'ConnStr= " DSN=DocSearch; database=DocSearch; uid=sa; pwd=wzl; "   
 4ConnStr= "Provider=SQL Server;Data Source=Chison;Uid=sa;Pwd=wzl;Initial Catalog=DocSearch;"   
 5ConnObj.Open ConnStr   
 6SQLQuery = "SELECT * FORM document"   
 7Set RS = ConnObj.Execute(SQLQuery)   
 8Set session("rs")=RS   
 9'将查询结果以表的方式输出   
10Response.Write "

<table border="1">"
Response.Write "<tr>"
for i=0 to Session("rs").fields.count-1
Response.Write "<td>" & Session("rs")(i).Name &"</td>"
next
Response.Write "</tr>"

Do While Not session("rs").EOF

 1\---------------------------------------------------------------   
 2  
 3ConnStr= "Provider=SQL Server;Data Source=Chison;Uid=sa;Pwd=wzl;Initial Catalog=DocSearch;"   
 4  
 5连接语句有误，改为：   
 6strconn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1;" _   
 7&amp;"UID=LoginID;Password=;DATABASE=Database_Name"   
 8\---------------------------------------------------------------   
 9  
10缺少记录集Set Rs=Server.CreateObject("ADODB.Recordset")   
11\---------------------------------------------------------------   
12  
13ConnStr= "Driver={SQL Server};server=(local);Uid=sa;Pwd=wzl;database=database"   
14  
15把链接字符改成这样试试呢?   
16  
17\---------------------------------------------------------------   
18

set con = server.createobject("adodb.connection")
set rs = server.createobject("adodb.recordset")
con.open"netbsdsn","sa","aee" 'netbsdsn位数据源名称，sa为数据库管理员账号,aee为管理员密码,密码不能少

1\---------------------------------------------------------------   
2

set ConnObj = server.createobject("adodb.connection")
set RS = server.createobject("adodb.recordset")
con.open"netbsdsn","sa","aee" 'netbsdsn位数据源名称，sa为数据库管理员账号,aee为管理员密码,密码不能少
SQLQuery = "SELECT * FORM document"
Set RS = ConnObj.Execute(SQLQuery)

 1  
 2用这个试试   
 3  
 4  
 5\---------------------------------------------------------------   
 6  
 7用ODBC试试   
 8c)ODBC Driver for SQL Server   
 9i)普通安全模式   
10oConn.Open "Driver={SQL Server};" &amp; _   
11"Server=你的服务器名;" &amp; _   
12"Database=DocSearch;" &amp; _   
13"Uid=sa;" &amp; _   
14"Pwd=;"   
15ii)使用信任安全模式：   
16oConn.Open "Driver={SQL Server};" &amp; _   
17"Server=你的服务器名;" &amp; _   
18"Database=DocSearch;" &amp; _   
19"Uid=;" &amp; _   
20"Pwd=;"   
21注意：要使用空白的Uid和Pwd   
22\---------------------------------------------------------------   
23

set ConnObj = Server.Createobject("ADODB.Connection")
ConnStr= "driver={SQL Server};server=ervername;Uid=sa;Pwd=wzl;database=DocSearch;"
ConnObj.Open ConnStr

 1\---------------------------------------------------------------   
 2  
 3我教你一個方法不用自己寫connectionstring的,你在工程里引用一個ado data library   
 4然後把改控件添加到窗體上,點激控件屬性,裡面有使用數據源和連接字串兩種方法,你選擇一種點激建立,根據配置做出相應的選擇.然後測試連接,如果連接成功,選擇確定.這時連接自段會寫在剛才的屬性對話框上,你只要複製連添就行了.千萬記住加一對引號.   
 5\---------------------------------------------------------------   
 6  
 7这句有问题，那肯定是联上了   
 8\---------------------------------------------------------------   
 9  
10请将你出错的那句换成：   
11Set Rs=Server.CreateObject("ADODB.RecordSet")   
12Rs.Open SQLQuery,ConnStr,1,1   
13请试一试，如果还不能够连接，我综合前面所有人的程序来判断是你的数据库服务器出毛病了。</table>