<form id="hz9zz"></form>
  • <form id="hz9zz"></form>

      <nobr id="hz9zz"></nobr>

      <form id="hz9zz"></form>

    1. 明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

      Filter與updatebatch混合使用完成大局部更新

      [摘要]/*******部分代碼*******//*******idArr()和codeArr()為兩個數組,其中,idArr()為filter數據過濾條件,codeArr()作為更新數據*********...
      /*******部分代碼*******/
      /*******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) :當前所有數據***************/





      日韩精品一区二区三区高清