<output id="os3gq"><ruby id="os3gq"></ruby></output>

    1. <mark id="os3gq"></mark>
    2. Access培訓
      網站公告
      ·Access快速平臺QQ群號:84825014    ·Access快速開發平臺下載地址及教程    ·歡迎添加微信交流賬號:AccessoftChu    ·如何快速搜索本站文章|示例|資料    
      您的位置: 首頁 > 技術文章 > Access數據庫-模塊/函數/VBA

      【Access文章】更新/追加到臨時表記錄的常見問題

      時 間:2017-03-14 08:08:33
      作 者:楊雪   ID:42182  城市:南京
      摘 要:更新/追加到臨時表記錄的常見問題
      正 文:

       

      問題描述:

      這個是主子窗體,子窗體綁定的是臨時表 TMP_出庫流水明細表,現在要將  商品庫存分倉庫查詢.庫存數量  更新到  TMP_出庫流水明細表.庫存數量。

      以上代碼只更新第一條怎么回事?

      解答:

      rstTmp打開的整個表

      每次都定位在第一條數據

      不能更新全部的。

      解決辦法:

      循環里面執行更新查詢語句

      strSQL = "Select * FROM [商品庫存分倉庫查詢] "
          Set rst = OpenADORecordset(strSQL, , cnn)
          Set rstTmp = CurrentDb.OpenRecordset("TMP_庫存流水明細表")
      
          Do Until rst.EOF
              CurrentDb.Execute "Update TMP_庫存流水明細表 SET 庫存數量=" & rst!庫存數量 & " Where 商品ID=" & rst!商品ID & " and [倉庫]='" & Me.Parent.[出貨倉庫] & "'"
              rst.MoveNext
          Loop
      
          rst.Close
          rstTmp.Close 
      

      類似代碼:

      Private Sub Command1_Click()
      
          Dim strSQL As String
      
          strSQL = "insert into TMP_物料計劃明細表(BOM明細ID,訂單編號,業務單號,客戶名稱,產品型號編號,數量,要求交期,物料代碼,物料描述,單位,物料屬性,采購員,入庫提前期,采購提前期,單耗,生產損耗) select BOM明細ID,訂單編號,業務單號,客戶名稱,產品型號編號,數量,要求交期,物料代碼,物料描述,單位,物料屬性,采購員,入庫提前期,采購提前期,單耗,生產損耗 from BOM明細查詢 where 業務單號= '" & Me.業務單號 & "' and  BOM類別= '" & Me.BOM類別 & "'"
          DoCmd.RunSQL strSQL
          Dim rst: Set rst = CurrentDb.OpenRecordset("Select * FROM TMP_物料計劃明細表 Where 供應商編號 Is Null")
          Do Until rst.EOF
              rst.Edit
              rst!供應商編號 = DLookup("供應商編號", "最近生效最低有效報價查詢", "物料代碼='" & rst!物料代碼 & " '")
              rst!供應商名稱 = DLookup("供應商名稱", "供應商信息表", "供應商編號='" & rst!供應商編號 & " '")
              rst!單價 = DLookup("定價", "最近生效最低有效報價查詢", "物料代碼='" & rst!物料代碼 & " '")
              rst.Update
              rst.MoveNext
          Loop
          rst.Close
      
          Me.sfrDetail.Requery
          MsgBox "……"
      End Sub
      

       

       



      Access軟件網官方交流QQ群 (群號:198348076)       access源碼網店

      最新評論 查看更多評論(0)

      發表評論您的評論將提升作者分享的動力!快來評論一下吧!

      用戶名:
      密 碼:
      內 容:
       

      常見問答

      技術分類

      相關資源

      關于我們 | 服務條款 | 在線投稿 | 友情鏈接 | 網站統計 | 網站幫助