繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 通过ASP与ACCESS数据库建立连接（附源码）(3)
- ASP
- 编写通用的asp防注入程序
- vbs(asp)下的Function 语句
- ASP中类Class相关内容的整理资料
- 字符批量替换程序asp服务器版
- 旁注-网站小助手旭方修改免杀asp版
- 用正则表达式写的HTML分离函数
- asp中"无限流"分页程序代码
- asp的一个日期格式化函数
- asp中创建多级目录的两段代码
- asp中去除内容HTML标签的三个function函数
- chr(9)、chr(10)、chr(13)、chr(32)、chr(34)讲解
- 方便的大家admin及admin888 经过 md5加密后16位和32位代码
- 可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集
- asp动态级联菜单代码
- ASP中经常使用的SQL语句与教程说明
- 实例分析之用ASP编程实现网络内容快速查找的代码
- 服务端 VBScript 与 JScript 几个相同特性的写法与示例
- ASP 环境下 VBS 事件应用 示例代码
- asp 之上传漏洞终结篇
- asp中一段防SQL注入的通用脚本
通过ASP与ACCESS数据库建立连接（附源码）(3)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 261 ::
收藏到网摘: n/a
<%
set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("customer.mdb")
dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
建立与数据库的连接，与上同。
SQL="select * from 客户 Order By 时间 DESC"
SET CustomerList=dbconnection.EXECUTE(SQL)
%>
建立SQL查询语句，表示从"客户"表中查询所有记录，Order By 时间 DESC表示"按时间降序排序，"这样最后添加的信息再最上面显示。下面一句执行SQL查询并将结果返回给Recordset对象CustomerList。
<html>
<body>
<FONT SIZE="5"><center>数据库记录</center></FONT>
<CENTER>
<TABLE BORDER=1>
<tr>
<td>编号</td>
<td>公司名称</td>
<td>联络人姓名</td>
<td>所在城市</td>
<td>电话号码</td>
</tr>
<% DO WHILE NOT CustomerList.EOF %>
检测记录是否到了最后一条。EOF表示End of File。
<TR>
<TD><% =CustomerList("客户编号") %></TD>
<TD><% =CustomerList("公司名称") %></TD>
<TD><% =CustomerList("联络人姓名") %></TD>
<TD><% =CustomerList("所在城市") %></TD>
<TD><% =CustomerList("电话号码") %></TD>
</TR>
<% =CustomerList("客户编号") %>可以说是Response.Write方法的简写。将"客户编号"字段内的数据写入TD标签间。
<% CustomerList.movenext
loop
%>
如果还没有到最后一条则指针移动到下一条。用Do While ... Loop循环逐一取得所有的记录。
</TABLE>
</CENTER>
<center>
<input type="button" onclick="javascript:location.href='add.htm'" value="添加数据">
</center>
</BODY>
</HTML>
缺陷：仅仅实现了最基本的功能。先不说其它功能，仅就数据的添加和查看功能来看，比较完美的还应该加入“分页功能”。否则数据大到一定程度显示全部数据基本上是不可能的。
本期至此全部完毕。
评论 (0) All
