资讯文章

应用
游戏
首页 应用 游戏 资讯
Filter与updatebatch混合使用实现批量更新 来源:佚名 2004/6/17 12:08:00

"狼性团队"跪地互扇耳光视频

훔쳐보기(透视图)漫画

"赌侠"上身 直播玩"斗地主"超级加倍搞笑视频

!X3.1翻滚吧DZ论坛 v1.0 绿色版

#7Z(7-Zip简化版) 0.9.1 英文官方安装版
/*******部分代码*******/
/*******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) :当前所有数据***************/


最新精选推荐

推荐


小米枪战

星际冲突

问道手游

QQ华夏手游

腾讯跑跑卡丁车手游

QQ手机版2018

蜗牛睡眠

段友吧APP(内涵段子吧)

段友暂住地(内涵段子暂住地)

北京时间APP