/*******部分代码*******/
/*******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) :当前所有数据***************/
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器