2014-08-28 69 views
0

我想在MS Access前端向MYSQL數據庫添加新記錄時找到#Deleted問題的解決方法。我想通過這個VBA做到這一點:#在MS Access前端刪除到MYSQL數據庫

Private Sub Surname_AfterUpdate() 
DoCmd.RunCommand acCmdSaveRecord 
Me.Refresh 
Dim rs As DAO.Recordset 
    Dim pk As Long 

    pk = Me.ID 
    Me.Requery 
    Set rs = Me.RecordsetClone 
    rs.FindFirst "[ID]=" & pk 
    Me.Bookmark = rs.Bookmark 
    Set rs = Nothing 



End Sub 

有了這個,我試圖讓本ID,將其存儲爲書籤,保存和刷新,並返回到書籤的ID。

但是,它好像VBA無法找到該ID,因爲它尚未傳輸到數據庫,所以我得到一個錯誤,如'無效使用null'。

我也嘗試添加TIMESTAMP等沒有成功 - 仍然得到中#Deleted ...

請幫助。

感謝

埃爾頓

+0

在插入事件後你可以試試這個命令me.recordSource = me.recourdSource,這與me.requery具有相同的效果。通過這種方式將最後一個條目顯示的查詢排序爲新的條目始終位於頂部? – 2014-08-28 13:16:22

回答

0

創建直通查詢在Access,

SELECT LAST_INSERT_ID(); 

這將能夠獲得最後插入的ID,你可以用它來指代記錄。希望這可以幫助。