最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
Filter与updatebatch混合使用实现批量更新（原创）
时间：2022-06-30 10:34:11 编辑：袖梨 来源：一聚教程网
/*******部分代码*******/
/*******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) :当前所有数据***************/
/*******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) :当前所有数据***************/
相关文章
- 无期迷途主线前瞻直播总结 无期迷途主线前瞻直播内容介绍 11-22
- 以下哪种非遗技艺是用针在纸上绣画 蚂蚁新村11月21日答案 11-22
- 江南百景图听风塔怎么样 11-22
- 原神恰斯卡圣遗物怎么搭配 11-22
- 2024年霸王茶姬11月22日口令是什么 2024.11.22霸王茶姬口令介绍 11-22
- 光遇11.21季节蜡烛在哪里 光遇11月21日季节蜡烛位置攻略 11-22