WEB数据库访问.ppt

5、用数组处理记录集数据 记录集的记录是可修改的，但有时希望保留记录集本身，修改操作在别处进行。ADO的Recordset对象有一个方法GetRows()，可以将一个记录集中的记录赋给一个数组，使得修改可以在数组中进行。 语法为： array=recordset.GetRows(Rows,Start,Fields) 其中， Rows:可选参数，指出需要得到的记录数。 Start：可选参数，GetRows操作将从这里开始取得记录。它可使用的常数值如下表： * 常数 常数值 说明 adBookmarkCurrent 0 缺省值，从当前记录开始 adBookmarkFirst 1 从首记录开始 adBookmarkLast 2 从最后一条记录开始 Fileds:可选参数，可以是一个字段名或字段的顺序位置。 Array是二维数组，第一维说明字段，第二维说明记录号。 * 例：将从表student中取出的记录放入一个数组中。 % @language=VBScript % html headtitle用数组处理记录集数据/title/head body % set cn=server.createobject(ADODB.connection) cn.open DSN=学生;UID=sa;PWD=sa set rs=cn.execute(select * from student) dim field(1) field(0)=学号 field(1)=姓名 * array=rs.GetRows(4,1,field) for i=0 to UBound(array,2) ‘指明记录数 for j=0 to UBound(array,1) ‘指明字段数 response.write(BR array(j,i)) next next rs.close cn.close % /body /html * 与数组相关的函数 与数组相关的函数主要有两个:Ubound和Lbound函数。 功能：Ubound函数返回数组在指定维数上数组下标的上界值，而Lbound函数则返回下界值。 格式：Ubound(数组名[，维数序号])或Lbound(数组名[，维数序号]) 如：Dim sum(3,6) 则函数Ubound(sum,2)的值为6，Lbound(sum,2)的值为0。 VBScript函数UBound()用来确定数组的维数。 * 6、指定记录集的最大容量 Recordset对象的MaxRecords属性可以限制记录集的存放记录数，即限制从一个数据库查询返回到一个记录集中的记录数目。 如要限制在站点上发布最近的n条信息，使记录集的MaxRecord属性值为n即可。 例：限制只在页面上显示前20条记录。 % set conn=server.creatobject(“adodb.connection”) set rs=server.creatobject(“adodb.recordset”) conn.open “DSN=学生” rs.MaxRecords=20 * rs.open “select * from student”, conn while not rs.eof response.write(rs(“姓名”)) rs.movenext wend rs.close conn.close % 使用MaxRecords属性时，必须在打开记录集之前设置该属性值。记录集打开之后，该属性将成为只读属性。 * 7、记录集记录的修改 向数据表添加记录，可以用SQL语句来实现。另外可用SQL语句更新数据库表的记录。但由于SQL语句本身有长度限制，无法操作大容量的字符串。 如 Insert into teacher(姓名，成绩） Values(“”,””) 故可用Recordset对象提供的一组方法来修改记录集中记录。如利用Addnew方法可实现大容量数据的输入，这是该方法的一大优势。 （1）Addnew方法 格式为: AddNew [Fields,Values] Fields为一个字段名，Values为要添加的记录对应字段的值。若无此选项，则为添加一条空记录。 * 如： rs.addnew ‘添加一条空记录 rs.addnew 学号, “09” * % @language=VBScript % html headtitle添加学生记录/title/head body % set rs=server.createobject(ADODB.recordset