📄 0069.htm
字号:
<html>
<head>
<title>新时代软件教程:操作系统 主页制作 服务器 设计软件 网络技术 编程语言 文字编辑</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
<!--
body, table {font-size: 9pt; font-family: 宋体}
a {text-decoration:none}
a:hover {color: red;text-decoration:underline}
.1 {background-color: rgb(245,245,245)}
-->
</style>
</head>
<p align="center"><script src="../../1.js"></script></a>
<p align="center"><big><strong>第六章：给留言簿加留言查询功能（二）</strong></big></p>
<table border="0" width="100%">
<tr>
<td width="100%"> <table border="0" width="100%">
<TBODY>
<tr>
<td height="21"><span class="text"> 我们接上一部分继续讲解如何利用Command对象来执行SQL命令，实现“留言记录日期查询”和“留言簿过去五天留言记录查询”。但在应用Command对象来执行SQL命令之前我们必须在留言数据库中先建立查询，假如我们要查询的是“留言簿过去五天留言记录”，那么在留言数据库中建立查询的具体方法如下所示。（对于数据库，在Access中可以建立五种不同类型的查询，因为我们要查询两个日期之间的留言记录，因此我在这里只以“使用‘设计’视图建立参数查询”为例，当然你也可以“使用向导建立查询”。使用“设计”视图建立查询要比使用向导灵活得多，例如，在“设计”视图中，既可以建立像“选择查询”之类的简单查询，又可以建立像“参数查询”和“操作查询”之类的复杂查询，而且在“查询设计网格”中既能够增加、移动、插入和删除字段，也能够设置准则和排序次序，计算总和和平均值，等等）</span></td>
</tr>
<tr>
<td height="24"><p align="left"><span class="text"> 在Access中，使用‘设计’视图建立参数查询：<br>
一、打开留言数据库，在“数据库”窗口中单击“查询”选项卡，然后单击“新建”按钮
。<br>
二、在“新建查询”对话框中，单击“设计视图”，然后单击“确定”按钮。<br>
三、在“显示表”对话框中，选择“表”选项卡，然后单击“添加按钮或者双击“guestbook”表的名称，将它添加到“查询”窗口中，然后关闭“显示表”的对话框。<br>
四、在“guestbook”表的字段列表中，单击“ID”字段的字段名，按住鼠标不放，将它拖到“查询设计网格”的第一列。同样，可以将“姓名”、“电话”、“EMAIL”、“主题”、“留言”和“时间”字段的字段名依次拖到“查询设计网格”的其它各列中。<br>
五、在作为参数使用的“时间”字段下的“准则”单元格中，键入下列表达式：<br>
Between[请键入开始日期]And[请键入结束日期]。 <br>
六、单击工具栏上的“保存”按钮保存查询，这时会弹出一个“另存为”的对话框，我们在“另存为”对话框中输入该查询表的名称“留言记录日期查询”，然后单击“确定”按钮。 </span></td>
</tr>
<tr>
<td height="20"><span class="text"> 在留言数据库中建立了查询后，我们接下来将利用Command对象来执行日期查询的SQL命令编写如下(Date.asp)：<br>
< !--#include file="adovbs.inc" --> <br>
< !--#include file="Search.asp" --> <br>
< %<br>
Head="留言簿查询"<br>
start=Request("start")<br>
last=Request("last")<br>
'读取用户输入的数据，然后指定给start及last变量 <br>
If start="" Then start = #99-10-1# <br>
If last="" Then last = #99-12-30#<br>
'如果用户没有输入查询的开始时间和结束时间时，在“开始时间”和“结束时间”的查询框中显示这里定义的缺省值
99-10-1和99-12-30<br>
% > <br>
< h2 Align="Center"> < %=Head%>< /h2> <br>
< hr noshade color="red"> <br>
< % <br>
Set conn = Server.CreateObject("ADODB.Connection") <br>
DBPath = Server.MapPath("book2.mdb")<br>
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath <br>
Set cmd = Server.CreateObject("ADODB.Command") <br>
Set cmd.ActiveConnection = conn<br>
cmd.CommandText = "留言记录日期查询"<br>
'将 Connection对象及SQL命令设置给Command对象的ActiveConnection属性以及
CommandText属性<br>
ReDim param(1) <br>
'声明含有两个元素的数组，因为该“留言日期查询”必须有查询的起始时间和结束时间，所以在这里必须声明一个含有两个元素的数组<br>
param(0) = CDate(start) <br>
param(1) = CDate(last)<br>
Set rs = cmd.Execute( ,param )<br>
'将start及last变量指定给param数组，然后传入cmd.Execute函数中，在这里函数cmd.Execute含有两个参数，其中第一个参数是用于希望返回的数据记录数，这里缺省表示希望返回所有的数据记录；参数二“param”是SQL命令的参数。<br>
Search rs <br>
%><br>
< hr noshade color="red"> < div align="center"><br>
< a href="Datesearch.asp" class="text2">返回留言查询<
/a> </span></td>
</tr>
<tr>
<td><span class="text"> 同理，利用Command对象来执行SQL命令，实现“留言簿过去五天留言记录查询”的原理与上述实现“留言记录日期查询”的原理是一样的，我们可以编写如下所示：<br>
Set conn = Server.CreateObject("ADODB.Connection") <br>
DBPath = Server.MapPath("book2.mdb") <br>
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath<br>
Set cmd = Server.CreateObject("ADODB.Command") <br>
Set cmd.ActiveConnection = conn <br>
cmd.CommandText = "留言簿过去五天留言记录" <br>
Set rs = cmd.Execute<br>
Search rs </span></td>
</tr>
<tr>
<td height="23"><span class="text">
至此，两种实现查询的方法我们都已学习过了，大家能说出它们存在着什么区别吗？<br>
打个比方，如果我们直接把某一个SQL命令写在ASP程序中，要知道该命令是否正确无误，我们必须启动浏览器浏览这个程序才能够测试出来，若SQL命令有错，我们必须修改ASP程序，然后再重新浏览直到正确为止；如果我们利用Command对象来执行SQL命令，则必须直到留言数据库中建立的查询完全正确才将SQL命令存储成“查询对象”，于是在ASP程序中我们只要将这个查询对象的名称指定给Command对象的CommandText参数，即可正确无误地执行SQL命令。
</span></td>
</tr>
</TBODY>
</table>
</table>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -