ASP与ACCESS数据库建立连接(附源码)

上传者：黄沛杰
|
上传时间：2015-05-10
|
密次下载

ASP与ACCESS数据库建立连接(附源码)

前言：

如何通过ASP与数据库建立连接是一个非常现实的问题，我尽量写得非常详细。

相信看了这篇文章相信您已经能够写出类似的比较简单和实用的程序了。

（一）数据库的选择：

有许多的数据库你可以选择，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：

源代码如下：

例如爱喜千团网(换物网，物物交换网，闲置物品交易网，以物换物)http://wendang.chazidian.com/addhtm

<html>

<head>

<title>添加数据库记录</title>

</head>

<p align="center"><font size="5">添加数据库记录</font></p>

<tr>

</td>

</td>

</tr>

<tr>

<div align="right">联络人姓名： </div>

</td>

</td>

</tr>

<tr>

</td>

</td>

</tr>

<tr>

</td>

</td>

</tr>

<tr>

</td>

</td>

</tr>

</table>

</div>

</form>

</body>

</html>

这与普通的HTML没有任何区别，关键部分已经用黄色标记了。递交方法用POST，

递交后处理的程序是adddatabase.asp（下一步就重点讨论它）。还有就是给每

一个项目取一个名字（NAME，后面有用）。

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

据库中。

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

CompanyName = Request("CompanyName")

CName = Request("CName")

City = Request("City")

Tel = Request("Tel")

以上，首先取得表单中填写的数据，使用ASP的Request对象非常容易可以实现数

据的收集。双引号中的就是上一步建立的各个项目的名字（NAME）。所以今后为

每个项目起名字是个好习惯，尽管有时候并不一定用得到。这样取得的数据就保

存在等号坐侧的变量中了。

If CompanyName = "" Or CName = "" Or City = "" Or Tel = "" Then

'Response.Write "<html><body><center><font size=5>请将资料填写完整。

</font></center></body></html>"

Response.Redirect "error.htm"

Response.End

End If

这里是检测各个项目是否输入了东西，如果为空则不往下继续执行，显示错误信

息。注意：你可以使用两种方法。我都列出了。方法一：使用Response.Write方

法写一个出错页面，类似于javascripts的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:inetpubwwwrootcustomercustomer.mdb"，我们使用Server.MapPath的方法

取得数据库的完整路径。

Set rs = Server.CreateObject("ADODB.Recordset")

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

据还应该再建立Recordset对象。

rs.Open "客户", dbconnection, adOpenDynamic, 3

打开数据库中的表"客户"（客户是表名）。语法：

rs.open 数据表名或SQL指令，已经建立的Connection对象（这里是

dbconnection）, 锁定类型

rs.AddNew

rs("公司名称") = CompanyName

rs("联络人姓名") = CName

rs("所在城市") = City

rs("电话号码") = Tel

rs.Update

用AddNew向数据库请求添加数据。最后用Update写入。注意：等号右侧的变量保

存着用Request取得的表单数据。双引号内的就是数据库的字段，应该与数据库

的一致啊。否则会出错的。这样变量内的数据就写入了数据库对应的字段内了。

Response.Write "<html><body><center><font size=5>祝贺，您的数据已经添

加进数据库了！<p>"

Response.Write "<a href='viewdatabase.asp'>查看数据</a>"

Response.Write "</font></center></body></html>"

写入成功后显示祝贺信息并建立查看数据库记录的连接。

<html>

<head>

</head>

<body>

下载文档

网友关注

浙江杭州医院有线残卫紧急呼叫系统残疾人紧急报警器公共厕所紧急报警按钮分析说明

出国体检之留学加拿大

中医特色服务项目目录

改良Kugel补片在老年人腹股沟疝中的应用(附38例临床分析)

趣宝网(qooboo)网摘 - 产后“3种”后遗症如何摆脱

趣宝网(qooboo)网摘 - 别“误会”顺产

改良神经导管与粘合剂吻合技术修复损伤坐骨神经

人类未来或许也可以冬眠治疗创伤性脑损伤

紫外线循环风空气消毒机维护及监测

趣宝网(qooboo)网摘 - 9个容易被忽视的孕期严重疾病征兆

十种体检该定期做哪几项？

禽流感日常预防

趣宝网(qooboo)网摘 - 备孕期间准爸爸不能忽视的营养

趣宝网(qooboo)网摘 - 产后四疾注意调养

J Trop Pediatr

网友关注视频

苏科版数学八年级下册9.2《中心对称和中心对称图形》

冀教版小学数学二年级下册第二单元《有余数除法的简单应用》

【部编】人教版语文七年级下册《逢入京使》优质课教学视频+PPT课件+教案，辽宁省

沪教版八年级下册数学练习册21.4（1）无理方程P18

沪教版八年级下册数学练习册一次函数复习题B组（P11）

【部编】人教版语文七年级下册《过松源晨炊漆公店（其五）》优质课教学视频+PPT课件+教案，辽宁省

沪教版牛津小学英语（深圳用）五年级下册 Unit 1

冀教版小学数学二年级下册第二周第2课时《我们的测量》宝丰街小学庞志荣.mp4

冀教版小学数学二年级下册1

小学英语单词

外研版英语七年级下册module1unit3名词性物主代词讲解

【部编】人教版语文七年级下册《老山界》优质课教学视频+PPT课件+教案，安徽省

沪教版牛津小学英语（深圳用）四年级下册 Unit 4

【部编】人教版语文七年级下册《逢入京使》优质课教学视频+PPT课件+教案，安徽省

二年级下册数学第一课

六年级英语下册上海牛津版教材讲解 U1单词

第12章圆锥曲线_12.7 抛物线的标准方程_第一课时(特等奖)(沪教版高二下册)_T274713

沪教版牛津小学英语（深圳用）四年级下册 Unit 3

沪教版牛津小学英语（深圳用）四年级下册 Unit 2

青岛版教材五年级下册第四单元（走进军营——方向与位置）用数对确定位置（一等奖）

8.对剪花样_第一课时(二等奖)(冀美版二年级上册)_T515402

沪教版八年级下册数学练习册21.3（2）分式方程P15

第19课我喜欢的鸟_第一课时(二等奖)(人美杨永善版二年级下册)_T644386

化学九年级下册全册同步人教版第25集生活中常见的盐（二）

【部编】人教版语文七年级下册《逢入京使》优质课教学视频+PPT课件+教案，安徽省

人教版二年级下册数学

沪教版牛津小学英语（深圳用）五年级下册 Unit 10

冀教版英语五年级下册第二课课程解读

外研版英语三起6年级下册（14版）Module3 Unit2

外研版英语七年级下册module3 unit1第二课时

精品推荐

营造良好的企业文化

分类导航

生物学

黄沛杰

此文档贡献者

2015-05-10
贡献时间
密
下载次数

教育资源为主的文档平台

文档分类