《SQL Server程序设计 教学课件 ppt 作者 卢奕 第14章 使用ASP数据库对象操作数据库》由会员分享，可在线阅读，更多相关《SQL Server程序设计 教学课件 ppt 作者 卢奕 第14章 使用ASP数据库对象操作数据库（63页珍藏版）》请在金锄头文库上搜索。
1、第14章 使用ASP数据库对象操作数据库,学习目标： 1）能说出ADO的作用 2）能够使用connection对象实现数据库的 连接 3）能使用connection对象、RecordSet对 象、Command对象操作数据库,14.1 ADO简介,ADO（ActiveX Data Objects 即ActiveX数据对象）是微软提供的使ASP具有访问数据库功能的组件。 ADO组件提供了7个对象和4个数据集合。,ADO组件来访问数据库的具体流程,14.2 使用Connection对象,14.2.1 什么是connection对象 Connection对象描述了到数据源的物理连接，Connecti
2、on对象是与数据存储进行连接的对象代表一个打开的、与数据源的连接。ADO组件的其他对象都必须依赖Connection对象的连接才能发挥其功效。,Connection对象的方法,Connection对象的属性,14.2.2 使用Connectiont对象连接数据库,创建Connectiont对象后并没有真正实现连接数据库，使用Connectiont对象的open方法可以实现数据库的连接。语法格式如下： coon.Open “ConnectionString, UserID, Password”,连接字符串,14.2.2.1用Connection对象创建SQL Server数据库的OLE DB连接
3、, OLEDB连接SQL Server数据库 % Dim myConn Set myConn=Server.CreateObject(“ADODB.Connection“) 创建一个Connection对象 Myconn.ConnectionString = “Provider=SQLOLEDB;Data Source=192.168.5.230;“,连接字符串 MyConn.open 直接打开数据库连接 if MyConn.State=1 then response.Write“连接数据库成功“ 调用Connection对象的State属性，判断连接数据库是否成功，连接成功则输出连接数据库成
4、功字符串 MyConn.close 关闭连接 Set MyConn = Nothing 撤消连接 % ,OLEDB连接SQL Server数据库,14.2.2.2用Connection对象创建SQL Server数据库的ODBC连接, ODBC连接SQL Server数据库 % Dim myConn Set myConn = Server.CreateObject(“ADODB.Connection“) 创建一个Connection对象 myConn.ConnectionString=“Driver=SQL Server;server=192.168.5.230;UID=sa;“DATABAS
5、E=xydb“,连接字符串 MyConn.open 直接打开数据库连接 if MyConn.State = 1 then response.Write“连接数据库成功“ 调用Connection对象的State属性，判断连接数据库是否成功，连接成功则输出连接数据库成功字符串 MyConn.close 关闭连接 Set MyConn = Nothing 撤消连接 % ,ODBC连接SQL Server数据库,使用Connection对象执行SQL语句,Connection 对象的Excute方法能够执行指定的SQL语句、存储过程或特定提供程序的文本内容。语法格式如下： 连接对象.Execute
6、ComandText,RecordsAffected,options,例14-1用Connection对象Execute方法添加记录, Connection对象Execute方法的使用添加记录 % Dim myConn,mySQL Set myConn=Server.CreateObject(“ADODB.Connection“) 创建一个Connection对象 Myconn.ConnectionString=“Provider=SQLOLEDB;Data Source=192.168.5.230;“,连接字符串 MyConn.open 直接打开数据库连接 if MyConn.State=1
7、 then response.Write“连接数据库成功“ 调用Connection对象的State属性，判断连接数据库是否成功，连接成功则输出连接数据库成功字符串 mySQL = “Insert into XSQK values(计算机,计算机0203,计算机应用与维护,02020105,罗琴,女,1983-8-9,22,修完)“ 定义一个Insert的SQL语句，向xydb数据库的XSQK表插入一条记录 myConn.Execute mySQL Execute方法执行SQL语句 MyConn.close 关闭连接 Set MyConn = Nothing 撤消连接 % ,用Connecti
8、on对象Execute方法添加记录,例14-2删除修改学号, Connection对象Execute方法的使用删除、修改记录 % Dim myConn,mySQL Set myConn=Server.CreateObject(“ADODB.Connection“) 创建一个Connection对象 Myconn.ConnectionString=“Provider=SQLOLEDB;Data Source=192.168.5.230;“,连接字符串 MyConn.open 直接打开数据库连接 if MyConn.State=1 then response.Write“连接数据库成功“ 调用Co
9、nnection对象的State属性，判断连接数据库是否成功，连接成功则输出连接数据库成功字符串 mySQL=“delete from XSQK where 学号=02020105“ 定义一个Delete的SQL语句，删除XSQK表中学号为02020105的记录 myConn.Execute mySQL Execute方法执行SQL语句 mySQL=“update XSQK set 姓名=黄罗琴 where 学号=02020201“ 定义一个update的SQL语句，更新XSQK表中学号为02020201的姓名为黄罗琴 myConn.Execute mySQL Execute方法执行SQL语句
10、 MyConn.close 关闭连接 Set MyConn = Nothing 撤消连接 % ,Connection对象Execute方法的使用删除、修改记录,14.3 使用Error对象,Error对象记录了连接过程中所发生的错误或警告信息。Error对象有七个属性，我们可以通过这些属性来了解错误或警告的来源（原因）、错误代码等信息，并获得解决方法或说明文件。,Error对象的属性表,例14-3：该程序试图与一个不存DSN连接, 使用Error对象 % Dim i,jgcwbz,Mycon on Error resume next 通知编译器不必理会发生的错误 set Mycon = ser
11、ver.CreateObject(“ADODB.connection“) Mycon.open “DSN=Teacher_DSN;User ID=sa; Password=123456“,if Mycon.errors.count0 then for i=0 to Mycon.errors.count-1 if Mycon.errors(i)0 then jgcwbz=“错误“ else jgcwbz=“警告“ end if response.Write“第“& Mycon.errors.count& “个“& jgcwbz& “描述“ response.Write jgcwbz&“号码:“&
12、 Mycon.errors(i).Number&“ response.Write jgcwbz&“信息发生的原因：“& Mycon.errors(i).description&“ response.Write “引起“& jgcwbz&“发生的对象来源:“& Mycon.errors(i).source&“ response.Write “引起“& jgcwbz&“发生的数据提供者代码错误代码:“& Mycon.errors(i).nativeError&“,response.Write jgcwbz&“发生时SQL的运行状态：“& Mycon.errors(i).SQLstate&“ res
13、ponse.Write“解决“& jgcwbz&“的帮助文件:“ if len(MYcon.error(i).helpfile)=0 then response.Write “未提供“&“ else response.Write Mycon.errors(i).helpfile& “ response.Write “解决“& jgcwbz&“相关主题:“& Mycon.errors(i).helpcontext end if next Mycon.Error.clear end if Mycon.close Set Mycon = nothing % ,Error对象的使用,14.4 使用Re
14、cordSet对象,RecordSet对象是ADO组件中使用最为频繁的一个对象，因为它包含了从数据库查询获得的数据。不仅如此，也可以使用RecordSet对象进行数据的更新、插入。RecordSet对象对象就像一个二维表格，表格的每一列表示数据库中的一个数据列，而每个数据列包含一个或多个数据值，每个数据表示一个Field对象。,RecordSet对象的属性,RecordSet对象的方法,14.4.1 记录集的打开关闭,1Open方法：打开记录集 Reeordset对象提供了Open方法来打开数据表的记录集。这个方法允许用户向数据库发 出请求，通常是运行一个SQL命令，启动一个指定的数据表或者调
15、用一个指定的存储过程， 其语法如下： Reeordset.Open Source,Cormection对象名,游标类型,锁定类型,打开Recordset对象,2Close方法,用于关闭Recordset对象并释放相关资源。同Connection一样，在调用 Set RecordSet=Nothing以前，它仍然存在，只需重新打开，而不需重新创建。,14.4.2 使用Recordset对象,1通过Recordset对象检索数据 通过Recordset对象检索数据 % Dim ConnStr,myConn,myRec Set myConn=Server.CreateObject (“ADODB.C
16、onnection“) myconn.ConnectionString=“Provider=SQLOLEDB;Data Source=192.168.5.230;“,MyConn.open 直接打开数据库连接 response.Write“学生基本信息表“ set MyRec=Server.CreateObject(“ADODB.RecordSet“) MyRec.open “XSQK“,Myconn,1,1 打开记录集 response.Write“ response.Write“学号姓名“ response.Write“性别出生年月总学分“ 以表格形式表示，首先输出字段标题 do while not Myrec.eof 表示当前记录不是最后 response.Write“ & Myrec(“学号“) & “& Myrec(“姓名“) & “ response.Write“& Myrec(“性别“
