现在越来越多的ASP新手提问ASP连接数据库的问题，我希望有经验者都写上自己的连接方式，跟帖者都有分……

请跟帖，谢谢！
---------------------------------------------------------------

ASP中五种连接数据库的方法

第一种 - 这种方法用在ACCESS中最多

strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("aspfree.mdb")

set conn = server.createobject("adodb.connection")

conn.open strconn

第二种－这种方法用在SQL SERVER中多

strconn = "Driver={SQL erver};Description=sqldemo;SERVER=127.0.0.1;UID=LoginID;&_
PWD=Password;DATABASE=Database_Name

set conn = server.createobject("adodb.connection")

conn.open strconn

第三种

strconn="Driver={MicrosoftAccessDriver(*.mdb)};" &_

"DBQ=F:\Inetpub\wwwroot\somedir\db1.mdb;DefaultDir=f:\Inetpub\wwwroot\somedir;

&_ uid=LoginID;" &_

"pwd=Password;DriverId=25;FIL=MSAccess;" set conn = server.createobject("adodb.connection")

conn.open strconn

第四种运用系统数据源

The following uses a Data Source Name:

set conn = server.createobject("adodb.connection")

conn.open "Example"

第五种运用ODBC数据源，前提是你必须在控制面板的ODBC中设置数据源

set rs = server.createobject("adodb.recordset")

rs.open "tblname", "DSNName", 3, 3
cmsoft帮你up
---------------------------------------------------------------

先建立系统DSN=students

1   
2set myconn=server.createobject("adodb.connection")   
3myconn.open "students"   
4set rs=myconn.execute("select * from mingdan order by name")

---------------------------------------------------------------

来晚了

---------------------------------------------------------------

1   
2Set conn = Server.CreateObject("ADODB.Connection")   
3connstr = "driver={SQL Server};server=61.143.3.245;uid=sa;pwd=1111111111;database=music"   
4conn.Open connstr

---------------------------------------------------------------

去这里看吧~~~~~~
http://www.able-consulting.com/ADO_Conn.htm
---------------------------------------------------------------

我不赞成mexp(秦汉风) 的！应该是有很多中方式

例如：ADO直接链接

ODBC链接。。。。
---------------------------------------------------------------

ADO连接数据库字符串大全（VP,Excel,文本,Sybase,.NET等)
http://www.activeedu.net/Develop/ShowArticle.asp?ArticleID=2460
cmsoft谢谢总算让我将各种都找齐了
帮你up
---------------------------------------------------------------

tunit=Request.QueryString("单位")

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\lwpost.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) as sum_device from device where 所在单位名称='"&tunit&"' "
rs.open sql,conn,3,3
---------------------------------------------------------------

to sook_l(sook)
方式很多，随你使用，我这是列举几种
ASP中五种连接数据库的方法，我是从这里找的
http://www.activeedu.net/Develop/ShowArticle.asp?articleid=1459

其实msdn中有各种连接字符串怎么写的例子，只不过大家不知道从何找起，找的中文的，也便于初学者上手

万变不离其宗

---------------------------------------------------------------

1.
set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("customer.mdb")
dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
SQL="select * from auth where id='" & user_id &"'"
SET uplist=dbconnection.EXECUTE(SQL)
2.
set dbconnection=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("customer.mdb")
dbconnection.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath
SQL="select * from auth where id='" & user_id &"'"
SET uplist=dbconnection.EXECUTE(SQL)
3.
DBPath = Server.MapPath("customer.mdb")
set session("rs")=Server.CreateObject("ADODB.Recordset")
' rs=Server.CreateObject("ADODB.Recordset")
connstr="provider=microsoft.jet.oledb.4.0;data source="&dbpath
SQL="select * from auth where id='" & user_id &"'"
session("rs").Open sql,connstr,1,3
4.
建odbc源xxx
set conn=server.createobject("Adodb.connection")
conn.open "DSN=xxx;UID=;PWD=;Database=customer

---------------------------------------------------------------

连接ACCESS：
set conn=server.CreateObject ("ADODB.Connection")
connstr="DBQ=" & server.MapPath ("XXX.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
conn.Open connstr
连接SQL SERVER：
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Driver={SQL Server};Server=servername;uid=sa;pwd=;database=dbname"
conn.Open connstr

---------------------------------------------------------------

跟一下，基本上楼上的都说清楚、全面了。。。
---------------------------------------------------------------

我最常用的
access：

1   
2DataBasePath = "dtabase.mdb"   
3ConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(DataBasePath)

SQL：

1   
2ConnString = "Provider=SQLOLEDB.1;Data Source=(服务器名);User ID=用户名;Password=用户密码;Initial Catalog=数据库名"

---------------------------------------------------------------

我只有一种万能而且万无一失的连接方式，access,sql通吃，实际上我根本记不住连接语句，但我从不失手，我经常来这里推销这个办法，有人会看到很多次了，谁让总有人问呢？有一个办法保证你万无一失，你用vb的ado控件连接该库，（不用写任何代码！也不用设置dns）在vb里右键点击ado控件，在创建里连接一个库，然后检测连接成功就会自动生成正确的sql连接语句，拷贝出来用就可以了。我的qq号28963147。哈哈，我又推销了一次，万能狗皮膏药！！独家专利！！