2012-11-29 23 views
0

我在postgreSql中創建了數據庫,並在使用Microsoft Access窗體的前端應用程序上工作。我想在按鈕的按下發送查詢:Hot將SQL查詢從Access窗體傳遞到外部數據庫?

Private Sub Command5_Click() 
Dim strSQL As String 
strSQL = "INSERT INTO public_failedestimate (est_num,issue_date) SELECT est_num,issue_date FROM public_estimate WHERE est_num=1 ;" 
DoCmd.RunSQL strSQL 
End Sub 

它時,調試工作,但不會當我點擊該按鈕。順便說一句,它位於按鈕的點擊事件。 thx

回答

1

你應該有什麼工作。如果表單的綁定記錄集中的當前記錄有可能是髒的,那麼您希望確保在您運行此代碼之前將記錄寫入表中。

您可以將RunSQL命令

If me.dirty = true then 
    Me.dirty = false 
End if 
+0

其實我已經嘗試了不同的方式前添加這3行代碼。我創建了一個查詢,然後將宏添加到按鈕以運行該查詢。它可以工作,但是我收到了這些可怕的警告信息「您即將更改表中的數據....」和「您即將添加1行......」 – Tomas

相關問題