用ASP连接读写ACCESS数据库实例

合集下载

asp对access数据库中数据的添加

asp对access数据库中数据的添加、修改、删除（已测试）1：首先建立一个access数据库保存为 xhnew.mdb 表名为aa字段如下：id 自动排序name 文本content 文本xhtime 日期默认值 now()title 文本2:打开DW 建立文件conn.asp文件代码如下：[code]<%set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver(*.mdb)};dbq="&server.mappath("xhnew.mdb")%> [/code]这段语句是连接数据库的语句 setconn=server.createobject("adodb.connection")创建一个connection对象用该对象的open方法打开数据库driver={microsoft access driver (*.mdb)};这句语句是access的驱动dbq="&server.mappath("xhnew.mdb")这句是数据库的路径建立conn.asp是为了方便接下来的教学。

我们可以任何要用到打开数据库连接的文件里加就可以调用是不是很方便。

第一个小时就学这么多。

当你弄明白上面的数据库还有代码后。

就继续跟着我学吧！（第2个小时）现在来学把数据库的信息输出来下面先建立一个主文件index.asp代码如下[CODE]<%exec="select * from aa order by id desc "set rs=server.createobject("adodb.recordset")rs.open exec,conn,1,1%><table width="628" height="24" border="1" align="center" cellpadding="1"cellspacing="0"><%if rs.eof and rs.bof thenresponse.write("暂时没有文章")elsedo while not rs.eof%><tr><td width="66" height="22" ><%=rs("id")%></td> <td width="66" ><%=rs("name")%></td><td width="66" ><%=rs("content")%></td><td width="273" ><%=rs("xhtime")%></td><td width="53" ><%=rs("title")%></td><td><a href="modify.asp?id=<%=rs("id")%>"target="_self">编辑</a></td><td width="32" ><ahref="del.asp?id=<%=rs("id")%>">删除</a></td></tr><%rs.movenextloopend if%></table><%rs.closeset rs=nothingconn.closeset conn=nothing%><td><a href="add.asp">添加</a></td>[/CODE]代码解释：(1)<%exec="select * from aa order by id desc "set rs=server.createobject("adodb.recordset")rs.open exec,conn,1,1%>上面的代码是创建一个recordset对象。

asp对access数据库中数据的添加

asp对access数据库中数据的添加、修改、删除（已测试1：首先建立一个access数据库保存为xhnew.mdb 表名为aa字段如下：id 自动排序name 文本content 文本xhtime 日期默认值now()title 文本2:打开DW 建立文件conn.asp文件代码如下：程序代码<%set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("xhnew.mdb") %>这段语句是连接数据库的语句set conn=server.createobject("adodb.connection")创建一个connection对象用该对象的open方法打开数据库driver={microsoft access driver (*.mdb)};这句语句是access的驱动dbq="&server.mappath("xhnew.mdb")这句是数据库的路径建立conn.asp是为了方便接下来的教学。

我们可以任何要用到打开数据库连接的文件里加就可以调用现在来学把数据库的信息输出来下面先建立一个主文件index.asp代码如下<%exec="select * from aa order by id desc "set rs=server.createobject("adodb.recordset")rs.open exec,conn,1,1%><table width="628" height="24" border="1" align="center" cellpadding="1" cellspacing="0"> <%if rs.eof and rs.bof thenresponse.write("暂时没有文章")elsedo while not rs.eof%><tr><td width="66" height="22" ><%=rs("id")%></td><td width="66" ><%=rs("name")%></td><td width="66" ><%=rs("content")%></td><td width="273" ><%=rs("xhtime")%></td><td width="53" ><%=rs("title")%></td><td><a href="modify.asp?id=<%=rs("id")%>" target="_self">编辑</a></td><td width="32" ><a href="del.asp?id=<%=rs("id")%>">删除</a></td></tr><%rs.movenextloopend if%></table><%rs.closeset rs=nothingconn.closeset conn=nothing%><td><a href="add.asp">添加</a></td>代码解释：(1)<%exec="select * from aa order by id desc "set rs=server.createobject("adodb.recordset")rs.open exec,conn,1,1%>上面的代码是创建一个recordset对象。

ASP连接Access数据库几种常见方法

ASP连接Access数据库几种常见方法在弹出来的“自定义连接字符串”对话框中，"连接名称"随便写一个。

“连接字符串”就要好好填写了。

当"使用此计算机上的驱动程序"时应用绝对路径：DRIVER={Microsoft Access Driver (*.mdb)};DBQ=d:\newgn\database\cnbruce.mdb否则“使用测试服务器上的驱动程序”采用Mappath转换路径："Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.mappath("/newgn/database/cnbruce.mdb")注：如果将要上传到网上去的页子就可以直接采用Mappath了点击“测试”，出现成功即爽。

附注：需要更多了解的，可以打开DW的帮助教程。

第一种连接和记录集分开声明<%db="db/darden.mdb"set conn=server.createobject("ADODB.connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("" & db & "")conn.open connstr%><%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingconn.closeset conn=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")Response.Redirect "homepage.asp"%>第二种连接和记录集一同声明<%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"conn = "DBQ=" + server.mappath("book.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")%>ASP数据库简单*作教程<1>.数据库连接(用来单独编制连接文件conn.asp)<%Set conn = Server.CreateObject(ADODB.Connection)conn.Open DRIVER={Microsoft Access Driver (*.mdb)}; DBQ= & Server.MapPath(\bbs\db1\user.mdb)%>(用来连接bbs\db1\目录下的user.mdb数据库)<2>显示数据库记录原理：将数据库中的记录一一显示到客户端浏览器，依次读出数据库中的每一条记录如果是从头到尾：用循环并判断指针是否到末使用: not rs.eof如果是从尾到头：用循环并判断指针是否到开始使用：not rs.bof  (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%set rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.movefirst ---->(将指针移到第一条记录)while not rs.eof ---->(判断指针是否到末尾)response.write(rs(name)) ---->(显示数据表message中的name字段)rs.movenext ---->(将指针移动到下一条记录)wend ---->(循环结束)------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%>其中response对象是服务器向客户端浏览器发送的信息<3>增加数据库记录增加数据库记录用到rs.addnew,rs.update两个函数 (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%set rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.addnew 新增加一条记录rs(name)=xx 将xx的值传给name字段rs.update 刷新数据库------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><4>删除一条记录删除数据库记录主要用到rs.delete,rs.update (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%dim namename=xxset rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)-------------------------------------------------------while not rs.eofif rs.(name)=name thenrs.deleters.update 查询数据表中的name字段的值是否等于变量name的值xx，如果符合就执行删除，else 否则继续查询,直到指针到末尾为止rs.movenextemd ifwend------------------------------------------------------------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><5>关于数据库的查询(a) 查询字段为字符型<%dim user,pass,qq,mail,messageuser=request.Form(user)pass=request.Form(pass)qq=request.Form(qq)mail=request.Form(mail)message=request.Form(message)if trim(user)&x=x or trim(pass)&x=x then (检测user值和pass 值是否为空，可以检测到空格)response.write(注册信息不能为空)elseset rs=server.CreateObject(adodb.recordset)sqlstr=select * from user where user='&user&' (查询user数据表中的user字段其中user字段为字符型)rs.open sqlstr,conn,1,3if rs.eof thenrs.addnewrs(user)=userrs(pass)=passrs(qq)=qqrs(mail)=mailrs(message)=messagers.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write(注册成功)end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write(注册重名)%>(b)查询字段为数字型<%dim numnum=request.Form(num)set rs=server.CreateObject(adodb.recordset)sqlstr=select * from message where id=&num (查询message 数据表中id字段的值是否与num相等，其中id为数字型) rs.open sqlstr,conn,1,3if not rs.eof thenrs.deleters.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write(删除成功)end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write(删除失败)。

#ASPAccess数据库连接(00002)

ASP与Access数据库连接【操作步骤】一、创建站点1. 配置好IIS后，打开Dreamweaver，选择“站点”—“新建站点”，设置如下所示：２.选择“文件”—“新建”，新建一动态ASP VBScript网页。

二、创建数据库1. 在网站根目录下建立一个Database文件夹用于存放数据库文件。

创建一个Access数据库，将其命名为db１.mdb存放在Database文件夹中。

2.打开db1.mdb数据库，双击“使用设计器创建表”，打开创建数据表窗口，在“字段名称”中输入id，在数据类型中选择“自动编号”。

单击快捷菜单中图标，设置id字段为主键。

应用相同的步骤，继续添加完相应的字段并创建好其它数据表后。

Access数据库就创建好了。

三、连接数据库1.打开Dreamweaver，选中工具栏上“应用程序”选项，单击选项。

2.在打开的“记录集”对话框。

单击“定义……”，弹出链接到站点的对话框，单击“新建”按钮，选中“数据源名称<ＤＳＮ）”选项。

3.在弹出的“数据源名称<ＤＳＮ）”对话框中，单击“数据源名称<ＤＳＮ）”中选择右边的“定义……”。

4.在弹出的“ODBC数据源管理器”对话框中选择“系统ＤＳＮ”选项卡，选择“添加……”。

5.在弹出的对话框中选择“Microsoft Access Driver<*.mdb）”。

6.确定后在弹出的对话框里选择录入数据源名称，单击“选择”在弹出的“选择数据库”对话框中找到刚才我们建立的数据库，单击“确定”“确定”“确定”。

退回到“数据源名称<ＤＳＮ）”对话框。

7.在“数据源名称<ＤＳＮ）”对话框中选择“使用服务器上的ＤＳＮ”，单击“ＤＳＮ……”选择刚才新建立的数据源。

8.单击“测试”按钮，对数据源进行测试，测试成功后弹出成功创建连接脚本的对话框。

单击“确定”、“完成”，退回到“记录集”对话框。

9.在“连接”里选择刚才的数据库。

单击“确定”完成。

Asp操作ACC数据库

Asp操作ACC数据库一、首先是两个网页，一个用来收集用户如下图1.html二、另一个是接收并处理数据的页面，如下图2.asp注意，接收处理数据的页面必须是以asp接尾的文件（也就是我们所说的动态页面），否则无法接收。

图1注意，1.html中如下代码注意上面我选中的部份代码：action=””这里面就填上你用来处理数据的页面，也就是我们的2.asp了。

三、2.asp代码如下<%b1=request.form("v1")b2=request.form("v2")response.write "变量值为" &b1&b2strquery="insert into b1(k1,k2)" & "values('"&b1&"','"&b2&"')"set objconn=server.createobject("adodb.connection")objconn.open whichDSNobjconn.execute(strquery)response.write " 成功"objconn.closeset objconn=nothing%>完成，注意，的第一句为包函文件connet.asp，这样定义是方便以后修改，我们看下connet.asp 的内容如下：<% whichDSN="driver={Microsoft Access Driver (*.mdb)};"whichDSN=whichDSN&"DBQ="&server.MapPath("data\db1.mdb")%>就这两句，第一句说明数据库是ACCESS的mdb文件。

用ASP连接读写ACCESS数据库实例

（二）例子：我们建立一个“客户”数据库，需要保存如下的客户资料：客户名称、联络人姓名、所在城市、电话号码。

（1）首先建立ACCESS数据库customer.mdb(今后有用的)。

建立如下字段：客户名称、联络人姓名、所在城市、电话号码、客户编号、时间。

将表保存为"客户"(今后有用的,===>看看图)。

注意：建立字段时多作了2个(客户编号、时间)，因为在今后排序时要用到它们。

建议今后做数据库时最好都加上这2项，不会没用的。

此外，在保存表时ACCESS会询问是否建立一个住关键字，我们不需要它所以不必建立。

还有：时间字段的"默认值"设成"now()"，即去系统当时的时间。

同时将索引项设成"有(允许重复)"，含义：WEB 上极有可能同时存取数据，所以允许重复，索引设成"有"可以加快排序速度。

===>看看图（2）建立递交表单add.htm：源代码如下：<html><head><title>添加数据库记录</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body bgcolor="#FFFFFF"><p align="center"><font size="5">添加数据库记录</font></p><form method="post" action="adddatabase.asp"><div align="center"><table width="46%" border="0"><tr><td width="28%"><div align="right">公司名称： </div></td><td width="72%"><input type="text"></td></tr><tr><td width="28%"><div align="right">联络人姓名： </div></td><td width="72%"><input type="text" name="CName"></td></tr><tr><td width="28%"><div align="right">所在城市： </div></td><td width="72%"><input type="text"></td></tr><tr><td width="28%"><div align="right">电话号码：</div></td><td width="72%"><input type="text"></td></tr><tr><td width="28%"><div align="right"> </div></td><td width="72%"><input type="submit" value="Submit"><input type="reset" value="Reset"></td></tr></table></div></form></body></html>这与普通的HTML没有任何区别，关键部分已经用红色标记了。

ASP操作ACCESS数据库

ASP操作ACCESS数据库操作数据库请按照下面的步骤来操作。

一、建立一个ACCESS数据库，使用设计器设计一个表，加一个字段，字段名为ID，数据类型为自动编号，再增加一个字段，名字为NAME，数据类型为文本，然后保存，保存表名为BOOK。

关闭数据库，然后并把这个数据库文件名改为book.mdb。

二、建立一个文本文件，在里面输入如下信息<%' 连接数据库dim ConnStr,Conn,rs,iConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("book.mdb") On Error Resume NextSet conn = Server.CreateObject("ADODB.Connection")Conn.Open ConnStrIf Err ThenErr.ClearSet Conn = Nothingresponse.write "数据库连接失败..."Response.End()End If'查询数据库Sql="select * from book order by id desc"Set Rs = Server.CreateObject("Adodb.RecordSet")Rs.Open Sql,Conn,1,1if RS.eof thenresponse.write "还没有数据"elsefor i=0 to Rs.recordcountif rs.eof then exit forresponse.write "ID:"&RS("id")&" 名字："&RS("name")&""&chr(10)nextrs.closeconn.closeset rs=nothingset conn=nothingend if%>三、将这个文本文件保存并改成index.asp，再打开刚才的数据库，打开表book，在name 字段里面输入一些字符，然后关闭。

ASP与Access的连接语句讲解

掌握ACCESS数据库的连接和读取记录一：看下面两句话：<%set conn=server.createobject("adodb.connection") 定义了一个adodb数据库连接组件conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("example3.mdb")%> 连接了数据库，我们只要修改后面的数据库名字就可以了。

是不是很简单？二：下面再看三句：<%exec="select * from guestbook" 设置查询数据库的命令selectt后面加的是字段，如果都要查询的话就用*，from后面再加上表的名字，set rs=server.createobject("adodb.recordset") ：定义一个记录集组件，所有搜索到的记录都放在这里面，rs.open exec,conn,1,1%>这三句加在前面两句的后面，第二句第三句是打开这个记录集，exec 就是前面定义的查询命令，conn就是前面定义的数据库连接组件，后面参数“1，1”，这是读取，后面讲到修改记录就把参数设置为1，3，三：接下来我们读取记录。

<table width="100%" border="0" cellspacing="0" cellpadding="0"><%do while not rs.eof%><tr><td><%=rs("name")%></td><td><%=rs("tel")%></td><td><%=rs("message")%></td><td><%=rs("time")%></td></tr><%rs.movenextloop%></table>在一个表格中，我们用4列分别显示了上次建立的表里面的四个字段，用do循环，not rs.eof的意思是条件为没有读到记录集的最后，rs.movenext的意思是显示完一条转到下面一条记录，<%=%>就等于<%response.write%>用于在html代码里面插入asp代码，主要用于显示变量。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

（一）数据库的选择：有许多的数据库你可以选择，SQL SERVER、ACCESS(*.mdb)、EXCEL(*.xls)、FOXPRO(*.dbf)甚至普通的文本文件(*.txt)都可以达到存储数据的功能。

那么到底选择什么数据库最合适呢？其中SQL SERVER是服务器级的，足以应付每天上万次的访问量。

对于非服务器级的数据库建议使用ACCESS97。

因为：（1）只要安装了PWS或IIS4肯定有ACCESS的ODBC驱动，即你的系统肯定支持ACCESS数据库的存取。

（2）ACCESS支持的SQL指令非常齐全。

（3）ACCESS ODBC驱动程序的效率非常高。

虽然它不是服务器级的数据库，但是作为中小型企业内部网的数据库支持还是绰绰有余的。

（4）ACCESS97在OFFICE97中就有，非常方便得到和使用。

本文就以ACCESS数据库为准介绍基于WEB的数据库存取方法。

（二）例子：我们建立一个“客户”数据库，需要保存如下的客户资料：客户名称、联络人姓名、所在城市、电话号码。

（1）首先建立ACCESS数据库customer.mdb(今后有用的)。

建立如下字段：客户名称、联络人姓名、所在城市、电话号码、客户编号、时间。

将表保存为"客户"(今后有用的,===>看看图)。

注意：建立字段时多作了2个(客户编号、时间)，因为在今后排序时要用到它们。

建议今后做数据库时最好都加上这2项，不会没用的。

此外，在保存表时ACCESS 会询问是否建立一个住关键字，我们不需要它所以不必建立。

还有：时间字段的"默认值"设成"now()"，即去系统当时的时间。

同时将索引项设成"有(允许重复)"，含义：WEB上极有可能同时存取数据，所以允许重复，索引设成"有"可以加快排序速度。

===>看看图（2）建立递交表单add.htm：源代码如下：<html><head><title>添加数据库记录</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body bgcolor="#FFFFFF"><p align="center"><font size="5">添加数据库记录</font></p><form method="post" action="adddatabase.asp"><div align="center"><table width="46%" border="0"><tr><td width="28%"><div align="right">公司名称：</div></td><td width="72%"><input type="text" name="CompanyName"></td></tr><tr><td width="28%"><div align="right">联络人姓名：</div></td><td width="72%"><input type="text" name="CName"></td></tr><tr><td width="28%"><div align="right">所在城市：</div></td><td width="72%"><input type="text" name="City"></td></tr><tr><td width="28%"><div align="right">电话号码：</div></td><td width="72%"><input type="text" name="Tel"></td></tr><tr><td width="28%"><div align="right"> </div></td><td width="72%"><input type="submit" name="Submit" value="Submit"> <input type="reset" name="reset" value="Reset"></td></tr></table></div></form></body></html>这与普通的HTML没有任何区别，关键部分已经用红色标记了。

递交方法用POST，递交后处理的程序是adddatabase.asp（下一步就重点讨论它）。

（3）关键部分：建立与数据库的联系并将表单中收集到的信息添加到ACCESS数据库中。

ASP代码放在〈%和%>之间。

adddatabase.asp程序内容:<%CompanyName = Request("CompanyName")CName = Request("CName")City = Request("City")Tel = Request("Tel")%>以上，首先取得表单中填写的数据，使用ASP的Request对象非常容易可以实现数据的收集。

双引号中的就是上个文件中建立的各个输入框中的名字红色部分（NAME=）。

所以今后为每个输入框起名字是个好习惯，尽管有时候并不一定用得到。

这样取得的数据就保存在等号坐侧的变量中了。

If CompanyName = "" Or CName = "" Or City = "" Or Tel = "" ThenResponse.Write "<html><body><center><font size=5>请将资料填写完整。

</font></center></body></html>"'Response.Redirect "error.htm"Response.EndEnd If这里是检测各个项目是否输入了东西，如果为空则不往下继续执行，显示错误信息。

注意：你可以使用两种方法。

我都列出了。

方法一：使用Response.Write方法写一个出错页面，类似于java scripts的document.write写法，只是ASP使用Response.write罢了。

方法二：使用Response.Redirect方法导向出错页面error.htm。

我在方法一的代码前加上单引号表示注释。

（'ASP中表示注释用单引号'）。

<%set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")DBPath = Server.MapPath("customer.mdb")dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath%>程序解释:（1）建立Connection对象：dbconnection，建立一个连接(Connection)是数据库存取的开始。

我们使用ASP的内建对象方法Server.Createobject建立与数据库的连接。

ADODB是ASP的数据库存取组件，不必担心只要有ASP就有它了，是内置的。

（2）使用dbconnection.open方法打开数据库customer.mdb。

driver参数语法：driver={Microsoft Access Driver (*.mdb)}必须这么写。

告诉系统使用ACCESS ODBC驱动处理。

dbq参数用来指定打开的数据库文件，它必须是完整的路径。

例如"c:\inetpub\wwwroot\customer\customer.mdb"，我们使用Server.MapPath 的方法取得数据库的完整路径。

<%Set rs = Server.CreateObject("ADODB.Recordset")%>建立Recordset对象rs。

Connection仅仅是建立了与数据库间的连接，要存取数据还应该再建立Recordset 对象。

rs.Open "客户", dbconnection, adOpenDynamic, 3打开数据库中的表"客户"（客户是表名）。

语法：rs.open 数据表名或SQL指令，已经建立的Connection对象（这里是dbconnection）, 锁定类型<%rs.AddNewrs("公司名称") = CompanyNamers("联络人姓名") = CNamers("所在城市") = Cityrs("电话号码") = Telrs.Update%>用AddNew向数据库请求添加数据。