【收藏】ASP中各种数据库连接代码

　　MS Access数据库连接

用DSN连接并且没有用户名和密码：

<%set conn = Server.CreateObject("ADODB.Connection")conn.open "YourDSNName"%>

用DSN连接并且有用户名和密码：

<%set conn = Server.CreateObject("ADODB.Connection")conn.open "YourDSNName","username","passWord"%>

用实际的数据库绝对路径连接：

<%Set conn = Server.CreateObject("ADODB.Connection")Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "Strconn=Strconn & "DBQ=e:\yanhang\database.mdb"conn.Open Strconn%>

用实际的数据库相对路径连接：

<%Set conn = Server.CreateObject("ADODB.Connection")Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "Strconn=Strconn & "DBQ=" & Server.MapPath("/database/yanhang.mdb")conn.Open Strconn%>

MS SQL Server数据库连接

用DSN连接：

<%set conn = Server.CreateObject("ADODB.Connection")conn.open "DSN=MyDSN;UID=user;PWD=password;DATABASE=databasename"%>

不用DSN连接：

<%Set conn = Server.CreateObject("ADODB.Connection")DSNtemp="DRIVER={SQL Server};SERVER=ServerName;UID=USER;PWD=password;DATABASE=databasename"conn.open DSNtemp%>

FoXPro数据库连接

<%Set Conn = Server.CreateObject("ADODB.connection")ConnStr= "Driver=Microsoft Visual Foxpro Driver; UID=userID;SourceType=DBC;SourceDB=C:\yanhang\database.dbc"Conn.Open ConnStr%>

Oracle数据库连接：

<%set conn=server.createobject("adodb.connection")conn.cursorlocation=adUseClientDSNTemp="Provider=MSDAORA.1;Password=xxxxx;User ID=yanhang;Data Source=xxx.world"conn.open DSNtemp%>

（出处：http://www.sheup.com）