站设计与开发 第五章.pptVIP

动态网站设计与开发 第五章 　课程引入与回顾 利用Recordset对象可实现添加、删除或更新记录操作 利用Recordset对象可实现数据记录的分页显示 目标 利用常见的sql语句来操作数据库 利用sql语句来实现精确和模糊查找 Select基本句型一 Select 字段串列 from 数据表 如： Select * from 成绩单 Select 学号，姓名 from 成绩单 Select 学号，姓名，语文+数学+英语 as 总成绩 from 成绩单 Select基本句型二 Select 字段串列 from 数据表 where 筛选条件 如： Select * from 成绩单 where asp60 Select * from 成绩单 where asp=300 or gre=300 or toefl=300 Select基本句型三 Select 字段串列 from 数据表 order by 字段串列 如： Select * from 成绩单 order by gre Select * from 成绩单 order by gre,toefl Select * from 成绩单 order by tse desc Select top 5 * from 成绩单 示例程序5-11.asp !--#include file=rstotab.asp -- % DB = Request(DB) If DB = Empty Then DB = Sample.mdb SQL = Request(SQL) If SQL = Empty Then SQL = Select * From 成绩单 Set conn = Server.CreateObject(ADODB.Connection) conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(db) Set rs = conn.Execute( sql ) % HTML BODY bgcolor=beige FORM Action=5-11.asp Method=POST 数据库：INPUT Type=Text Name=DB Value=%=DB%BR 指令：INPUT Type=Text Name=SQL Size = 60 Value=%=SQL%P INPUT Type=Submit Value= 执行 /FORM % If Not (rs Is Nothing) Then % % rstotable rs% %Else% HRFONT Color=RedSelect 指令错误!/FONT %End If% /BODY /HTML 网站精确查询系统程序一main.asp % Set conn = Server.CreateObject(ADODB.Connection) conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(sample.mdb) Set rs = conn.Execute(成绩单) % form method=POST action=handle.asp % Response.Write select size=1 name=name While Not rs.EOF Response.WRITE option rs.Fields(1).Value /option rs.MoveNext Wend Response.Write /select % pinput type=submit value=提交 name=B1input type=reset value=全部重写 name=B2/p /form 网站精确查询系统程序二handle.asp !--#include file=rstotab.asp -- % DB = Sample.mdb name = Request(name) SQL = Select * From 成绩单 where 姓名=name response.write sql Set conn = Server.CreateObject(ADODB.Connection) conn.Open driver={Microsoft Access Driver (*.mdb)};dbq= Server.MapPath(db) Set rs = conn.Execute( sql ) % HTML BODY bgcolor=beige % If Not