当前位置: 首页 > 图文教程 > 网络编程 > ASP > Filter与updatebatch混合使用实现批量更新

ASP
用密码保护页面 (II)
用密码保护页面 (III)
简单的文件目录浏览源程序
ASP中的函数应用方法及应用举例(一)
ASP中的函数应用方法及应用举例(二)
完整的访问统计系统(一:数据库篇)
完整的访问统计程序(二 程序篇)
完整的访问统计程序(三 应用篇)
一个提供用户输入时期的绝好程序之(一)
一个提供用户输入时期的绝好程序之(二)
构建你的网站新闻自动发布系统之五
构建你的网站新闻自动发布系统之六
完整的访问统计程序(二 程序篇)
完整的访问统计程序(三 应用篇)
ASP环境下邮件列表功能的实现 (一)
ASP环境下邮件列表功能的实现 (二)
ASP环境下邮件列表功能的实现 (三)
ASP环境下邮件列表功能的实现 (四)
ASP进阶之文章在线管理更新(1)
ASP进阶之文章在线管理更新(2)

ASP 中的 Filter与updatebatch混合使用实现批量更新


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-28   浏览: 165 ::
收藏到网摘: n/a

 
/*******部分代码*******/
/*******idArr()和codeArr()为两个数组,其中,idArr()为filter数据过滤条件,codeArr()作为更新数据**********/
.......

dim CRs,sql,FStr
sql=""

conn.begintrans
set CRs=server.CreateObject("adodb.recordset")
CRs.ActiveConnection=conn
CRs.CursorType=1
CRs.LockType=3
CRs.Source="select * from MB_DCManage"
CRs.Open

for i=0 to ubound(codeArr)-1
FStr="DCM_ID="&idArr(i) '定义数据过滤
CRs.Filter=FStr
CRs("DCM_Code")=codeArr(i)
next
CRs.UpdateBatch(3) '批量更新

........

/***********避免重复的进行open操作,但是filter本身也有效率问题;应该结合事务处理;filter可进行多条件选择;updateBatch各参数-----adAffectCurrent(1):当前位置;
adAffectGroup(2) :符合filter的数据
adAffterAll(3) :当前所有数据***************/