第九讲 数据库高级操作

Part5 修改、添加、删除 动态网页制作

一.新增记录 1.利用Connection对象执行Insert语句 利用Connection对象的execute方法执行SQL语句 例子:使用execute执行insert语句 <% ……… Cn.execute (“insert into user(id,user)values(‘1’,’admin’)”) %> P153，例子8 add1.asp 动态网页制作

一.新增记录 2 利用Recordset对象执行Insert语句 只需要在Recordset的open方法是设置相应的SQL <% ……… Rs.Open “insert into user(id,user) values(‘1’,’admin’)”,cn %> 例子8 add2.asp 这里由于是执行添加记录,只使用了两个参数,没有设定光标和锁定 类型 动态网页制作

一.新增记录 但是直接利用Recordset对象的open方法设定执行相 应的Insert语句的时候,如果要添加的数据记录较多 的时候,会出现内容过长,不利用直观“维护“,但是这 种方法的效率还是较高,不过不推荐初学者使用,因 为不易于调试. 动态网页制作

一.新增记录 3.利用Recordset对象的AddNew方法新增记录 调用AddNew方法,新增一条空白记录,然后逐一对每 一个字段赋值,最后调用Update方法将值写入数据库, 达到插入新记录的目的. 动态网页制作

一.新增记录 例如: <% ……… Rs.Open “select * from db”,cn,1,3 Rs.AddNew Rs(“user”)=“admin” Rs(“pass”)=“admin” Rs.Update %> 例子8 add3.asp 这种方式比较直观, 可以容易”维护”所 添加的数据,但是效 率会稍逊一些;还要 特别注意,由于是执 行添加数据操作,锁 定类型为3. 动态网页制作

一.新增记录 4.Command命令对象 ASP提供了用ADO内置的3个主要对象Recordset、 Connection和Command对Web数据库进行操作。 Connection:与Web数据库的链接 Recordset:建立数据查询的记录集 Command:向Web数据库传送查询的请求。 动态网页制作

一.新增记录 ①command对象在数据查询方面具有强大功能，它不仅能将一般的SQL指令传送到Web数据库端，还能够传送带有参数的SQL指令，更重要的是能传送存储过程，具有更高的效率。 动态网页制作

一.新增记录 ②Recordset对象会要求数据库传送所有的数据， 当数据量很大的时候会造成网络的阻塞和数据库服务器的负荷过重，因此整体的执行效率会降低。 动态网页制作

一.新增记录 ③利用Command对象直接调用SQL语句，所执行的操作是在数据库服务器中进行的，会有更高的效率。特别是在服务器端执行完成的存储过程，可以降低网络流量，另外，由于事先进行了语法分析，可以提高整体的执行效率。 动态网页制作

一.新增记录 （1）创建命令对象 <% dim Comm Set Comm=Server.CreateObject(“ADODB.Command”) %> 使用命令对象要设置相应参数CommandText、 CommandType、ActiveConnection，然后调用Eecute 方法执行 动态网页制作

一.新增记录 （2）Command对象的属性 ① ActiveConnection属性 建立命令对象与链接对象的联系 Comm.ActiveConnection=Conn ② CommandText属性 指定要执行的SQL语句 Comm.CommandText=“SQL语句” ③ CommandType属性 指明要执行命令的命令文本的定义 Comm.CommandType=常量 动态网页制作

一.新增记录 CommandType属性中常量的含义： 常 量 说 明 AdCmdText 指定CommandText的类型为SQL命令 常 量 说 明 AdCmdText 指定CommandText的类型为SQL命令 AdCmdTable 指定CommandText的类型为数据库表的名称 AdCmdStoredProc 指定CommandText的类型为存储过程名称 AdCmdUnknown 默认值。CommandText属性中的命令类型未知 动态网页制作

一.新增记录 （3）Command对象的Execute方法 语法： cmd.execute RecordsAffected,Parameters,options Execute后面参数皆为可选参数 动态网页制作

一.新增记录 （4）利用命令对象返回一个记录集 ①利用命令对象创建一个记录集对象 Set RS=Comm.Execute( ) 注意：命令对象中的命令文本，是具有返回记录功能的SQL语句。 ②命令对象和一个已存在的记录集对象一起使用。 RS.Open Comm，游标类型，锁定类型 动态网页制作

一.新增记录 利用命令对象新增加一条记录 <% ……… dim Comm Set Comm=Server.CreateObject(“ADODB.Command”) Mysql=“insert into user(id,user) values(‘1’,’admin’)” Comm.ActiveConnection＝cn Comm.CommandText＝mysql Comm.Execute …… %> 例子8 add4.asp 动态网页制作

二.修改和删除记录 前面提到的新增记录的时候使用到的SQL语句是 Insert语句，其实修改记录和删除记录，只需要把 进行相应的操作了 ①修改：使用update…set语句 <% mysql=“update… set… where…” Rs.open mysql，cn %> 动态网页制作

二.修改和删除记录 ② 删除：使用delete语句 <% mysql=“delete… where…” Rs.open mysql，cn %> 动态网页制作

三.存储过程 动态网页制作

Part5 修改、添加、删除 动态网页制作

Part5 修改、添加、删除 添加 1.表单页面填写数据 add.htm 2.进行数据记录添加操作 add.asp 注意问题：安全性高的系统需要对填写的数据进行 数据验证，验证其是否符合要求。 动态网页制作

Part5 修改、添加、删除 在文本框填写内容的时候，回车键有没有效果？ add2.htm、add2.asp 像栏目类的信息，如何能够动态从数据库里面读取出来，而不是手动填写呢？ 动态网页制作

Part5 修改、添加、删除 动态网页制作 Function coder(str) Dim i If IsNull(str) Then :coder="" : Exit Function : End If For i = 1 to Len(str) Select case mid(str,i,1) Case "<" : coder= coder&"<" Case ">" : coder= coder&">" Case "&" : coder= coder&"&" Case chr(9) : coder= coder&"  " Case chr(13) : coder= coder&"<br>" Case chr(32) : coder= coder&" " Case chr(34) : coder= coder&""" Case chr(39) : coder= coder&"'" Case Else : coder= coder & mid(str,i,1) End Select Next End Function 特别注意：文本框换行方式有时会影响是否插入代码到数据库 动态网页制作

Part5 修改、添加、删除 修改：传递参数-“ID”？ 动态网页制作

Part5 修改、添加、删除 删除：传递参数-“ID”？ 动态网页制作

Part6 用户登录管理 动态网页制作

Part6 用户登录管理 原理：前面的状态内容 例子：用户登录管理 功能：对用户进行权限管理，某些页面需要 登录才能访问，如普通页面对所有人公开， 但权限页面则需要用户登陆之后才能访问 知识点：1.利用session判断用户的登录情况 2.结合if…then…else语句进行控制 难点：代码“控制时机”和 “判断时机”的把握 视频+源代码 动态网页制作

Part6 用户登录管理 登录流程 1.首页:index.htm 2.普通页面:public.htm 3.权限页面:private.asp 主页 普通页面 直接访问 已经登陆 权限页面 登录页面 没有登陆 登陆成功 登陆失败 出错页面 登录流程 1.首页:index.htm 2.普通页面:public.htm 3.权限页面:private.asp 4.出错页面:error.htm 5.登录及处理页面:login.htm、loginproc.asp 动态网页制作

Part6 用户登录管理 添加 1.表单页面填写数据 add.htm 2.进行数据记录添加操作 add.asp 注意问题：安全性高的系统需要对填写的数据进行 数据验证，验证其是否符合要求。 动态网页制作