asp连接数据库其实是Vbs建立数据库连接对象

有四种常用的连接方法：


1.
set conn=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("db.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

2.
set conn=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("db.mdb")
conn.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath




3.
DBPath = Server.MapPath("db.mdb")
set rs=Server.CreateObject("ADODB.Recordset")
connstr="provider=microsoft.jet.oledb.4.0;data source="&dbpath
SQL="select * from auth where id="" & user_id &"""
rs.Open sql,connstr,1,3



4.
建odbc源xxx,即dsn连接
set ateobject("tion")
conn.open "DSN=xxx;UID=;PWD=;Database=customer"



上面只是建立数据库连接对象。
用得最多的是第一种方法。
之后要建立记录集，记录集也就是好几条数据的集合。

建立并打开记录集：
set ateobject("dset")
rs.open SQL语句,conn,1,1


其中sql语句为查询数据库的语句。

如：
select * from 数据表名 where id<10




之后就可以使用记录对象了
rs("数据表中的列名")



实例：

假如你有一个Access数据库（文件名为db.mdb），里面有一张表名为UserName，有三个字段（id，UserName，PassWord）。数据库文件与asp文件在同文件夹下。并且数据库中至少已有一条数据。


asp代码：
<%
' 创建数据库对象
Set Conn = Server.CreateObject("ADODB.Connection")
' Accessasp数据数据库
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db.mdb")
' 创建一个记录集对象
Set Rs = Server.CreateObject( "ADODB.Recordset" )
'sql语句
Sql = "SELECT * FROM User"
'打开记录集
Rs.Open Sql, Conn, 1, 1
'如果刻录有记录
If Not oRs.Eof Then
'直到记录集末尾
Do While Not oRs.Eof
'输出
Response.Write "用户id："&rs("id")&" 用户名："&rs("UserName")&" 密码："&rs("Password")&"<br>"
Loop
'记录为空
Else
Response.Write "现在数据库中还没有用户！"
End If
'关闭记录集对象
Rs.Close
'释放记录集对象
Set Rs = Nothing
'关闭数据库连接对象
Conn.Close
'释放数据库连接对象
Set Conn = Nothing
%>

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。