ASP 如何连接到SQL SERVER？ (100分)

ASP 如何连接到SQL SERVER？
希望写的具体一点，我试了很久但就是成功。

<%
set cnn = server.createobject("ADODB.Connection")
cnn.open "PROVIDER=SQLOLEDB;DATA SOURCE=sqlservername;UID=username;PWD=password;DATABASE=databasename "
%>

我就是这么做的但总是报错！
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

不知是为什么？

OLE DB的连接方式无需要设ODBC呀，可能是OLE DB的驱动出了点问题！
要不你试试ODBC连接：
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "DSN=your_dsn;UID=user_name;PWD=password;"
不过OLE DB 连接数据库比 ODBC 快，检索数据比 ODBC 快。

做个global文件好使
Sub Application_OnStart()
'==Visual InterDev Generated - startspan==
'--Project Data Connection
Application("sql_conn") = "DRIVER={SQL Server};DSN=;SERVER=zxh-obv5chssexf;DATABASE=aspdata;UID=sa;PWD=wdl;"

Application("count")=0
End Sub
文件中如下
Set conn = Server.Createobject("ADODB.connection")
Set rs = Server.CreateObject("ADODB.Recordset")
conn.Open Application("sql_conn")
sql = "select top 1000 * From t_data order by c_time desc"

ADO连接：
<%
set cnn = server.createobject("ADODB.Connection")
cnn.open "PROVIDER=SQLOLEDB;DATA SOURCE=sqlservername;UID=username;PWD=password;DATABASE=databasename "
%>
ODBC连接：
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "DSN=your_dsn;UID=user_name;PWD=password;"

谢谢各位，我将用户名写错了！ 咳。。。。。。。。。