案例分析(第五章 ADO).docVIP

案例分析(第五章 ADO) ??案例分析以典型示例为据，重点分析程序特点及注意事项，点击每例后的(看运行结果)可以在本环境中显示结果，增强了案例的直观性。本部分重点介绍了以下几个案例：数据库简单筛选操作、动态信息的分面列表、具有分页功能的留言簿、网站精确查询系统、网站模糊查询系统、利用SQL Server存储过程实现密码验证、在线考试系统 例子5-1：输出数据库的表头 (看运行结果) %Set conn = Server.CreateObject(ADODB.Connection)conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(sample.mdb)Set rs = conn.Execute( 成绩单 )%HTMLBODY bgcolor=#6699ddSample.mdb 数据库“成绩单”数据表七栏的表头：UL%For I = 0 to 6Response.Write LI rs(I).NameNext%% rs.close %/UL/BODY/HTML 注:(1)程序输出结果为“成绩单”数据表的七个列名(第0到6列)；?? (2)程序创建连接对象conn,并调用conn的Open方法打开一个与Access数据库sample.mdb的连接；?? (3)再通过连接对象conn的Execute方法获得记录集rs，循环输出其列名(字段名)；?? (4)最后关闭记录集rs. 例子5-2：动态输出表头 (看运行结果)%Set conn = Server.CreateObject(ADODB.Connection)conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(Sample.mdb)Set rs = conn.Execute( 成绩单 )%HTMLBODY bgcolor=#6699ddSample.mdb 数据库成绩单数据表所有栏的表头！UL%For I = 0 to rs.Fields.Count - 1Response.Write LI rs(I).NameNext%% rs.close %/UL/BODY/HTML 注:(1)程序输出结果为“成绩单”数据表的全部列名；?? (2)第一条语句建立一个Connection连接对象；?? (3)第二条语句利用Connection对象打开数据库；?? (4)第三条语句利用其Execute方法产生一个记录集对象rs；?? (5)然后以列表的方式循环输出rs的全部列名。 例子5-3：输出一条记录 (看运行结果)%Set conn = Server.CreateObject(ADODB.Connection)conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(Sample.mdb)Set rs = conn.Execute( 成绩单 )%HTMLBODY bgcolor=#6699ddSample.mdb 数据库“成绩单”数据表所有栏的表头！UL%For I = 0 to rs.Fields.Count - 1Response.Write LI rs(I).Name rs(I)Next%/UL/BODY/HTML 注:(1)输出结果为“成绩单”数据表的第一条记录；?? (2)程序首先建立Connection对象conn，并利用conn打开与Access数据库Sample.mdb的连接；?? (3)然后利用conn的Execute方法产生一个记录集对象rs；?? (5)然后以列表的方式输出rs（即为“成绩单”数据表）的第一条记录的列名和列值。 例子5-4：以表格的形式输出 (看运行结果)%Set conn = Server.CreateObject(ADODB.Connection)conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(Sample.mdb)Set rs = conn.Execute( 成绩单 )% HTMLbody bgcolor=beigecentertable border=4 bordercolor=orangeTR bgcolor=orange align=middle% Part I输出表头名称/TR% Part II输出数据表的内容将目前