在Access中,使用‘设计’视图建立参数查询: 一、打开留言数据库,在“数据库”窗口中单击“查询”选项卡,然后单击“新建”按钮 。 二、在“新建查询”对话框中,单击“设计视图”,然后单击“确定”按钮。 三、在“显示表”对话框中,选择“表”选项卡,然后单击“添加按钮或者双击“guestbook”表的名称,将它添加到“查询”窗口中,然后关闭“显示表”的对话框。 四、在“guestbook”表的字段列表中,单击“ID”字段的字段名,按住鼠标不放,将它拖到“查询设计网格”的第一列。同样,可以将“姓名”、“电话”、“EMAIL”、“主题”、“留言”和“时间”字段的字段名依次拖到“查询设计网格”的其它各列中。 五、在作为参数使用的“时间”字段下的“准则”单元格中,键入下列表达式: Between[请键入开始日期]And[请键入结束日期]。 六、单击工具栏上的“保存”按钮保存查询,这时会弹出一个“另存为”的对话框,我们在“另存为”对话框中输入该查询表的名称“留言记录日期查询”,然后单击“确定”按钮。
在留言数据库中建立了查询后,我们接下来将利用Command对象来执行日期查询的SQL命令编写如下(Date.asp): $#@60; !--#include file="adovbs.inc" --$#@62; $#@60; !--#include file="Search.asp" --$#@62; $#@60; % Head="留言簿查询" start=Request("start") last=Request("last") 读取用户输入的数据,然后指定给sta 發ast变量 If start="" Then start = #99-10-1# If last="" Then last = #99-12-30# 如果用户没有输入查询的开始时间和结束时间时,在“开始时间”和“结束时间”的查询框中显示这里定义的缺省值 99-10-1和99-12-30 % $#@62; $#@60; h2 Align="Center"$#@62; $#@60; %=Head%$#@62;$#@60; /h2$#@62; $#@60; hr noshade color="red"$#@62; $#@60; % Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("book2.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath Set cmd = Server.CreateObject("ADODB.Command") Set cmd.ActiveConnection = conn cmd.CommandText = "留言记录日期查询" 将 Connection对象及SQL命令设置给Command对象的ActiveConnection属性以及 CommandText属性 ReDim param(1) 声明含有两个元素的数组,因为该“留言日期查询”必须有查询的起始时间和结束时间,所以在这里必须声明一个含有两个元素的数组 param(0) = CDate(start) param(1) = CDate(last) Set rs = cmd.Execute( ,param ) 将start及last变量指定给param数组,然后传入cmd.Execute函数中,在这里函数cmd.Execute含有两个参数,其中第一个参数是用于希望返回的数据记录数,这里缺省表示希望返回所有的数据记录;参数二“param”是SQL命令的参数。 Search rs %$#@62; $#@60; hr noshade color="red"$#@62; $#@60; div align="center"$#@62; $#@60; a href="Datesearch.asp" class="text2"$#@62;返回留言查询$#@60; /a$#@62; 同理,利用Command对象来执行SQL命令,实现“留言簿过去五天留言记录查询”的原理与上述实现“留言记录日期查询”的原理是一样的,我们可以编写如下所示: Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("book2.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath Set cmd = Server.CreateObject("ADODB.Command") Set cmd.ActiveConnection = conn cmd.CommandText = "留言簿过去五天留言记录" Set rs = cmd.Execute Search rs
至此,两种实现查询的方法我们都已学习过了,大家能说出它们存在着什么区别吗? 打个比方,如果我们直接把某一个SQL命令写在ASP程序中,要知道该命令是否正确无误,我们必须启动浏览器浏览这个程序才能够测试出来,若SQL命令有错,我们必须修改ASP程序,然后再重新浏览直到正确为止;如果我们利用Command对象来执行SQL命令,则必须直到留言数据库中建立的查询完全正确才将SQL命令存储成“查询对象”,于是在ASP程序中我们只要将这个查询对象的名称指定给Command对象的CommandText参数,即可正确无误地执行SQL命令。
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18