云外归鸟工作室网站

标题: ASP连接各种数据库的代码 [打印本页]

---

作者: 阿杰    时间: 2010-10-11 17:21
标题: 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
%>
或
<%
db="data.mdb"
set conn=server.CreateObject("adodb.connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.open connstr
%>


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;U
ID=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=adUseClient
DSNTemp="Provider=MSDAORA.1;Password=xxxxx;
User ID=yanhang;Data Source=xxx.world"
conn.open DSNtemp
%>

ASP与mysql连接

<%
DIM CONN,MYSQL
SET CONN = SERVER.CREATEOBJECT("ADODB.CONNECTION")
MYSQL="DRIVER={MYSQL ODBC 3.51 DRIVER};DATABASE=jxgl;
SERVER=localhost;UID=root;PASSWORD=;"
CONN.OPEN MYSQL
%>

---

作者: zxsong007    时间: 2010-10-12 11:04
看看

---

欢迎光临 云外归鸟工作室网站 (http://www.ywgn.net/)

Powered by Discuz! X3