sql - 将 SQL 查询从 Access 表单传递到外部数据库很热？

Question

我在 postgreSql 中创建了数据库，并使用 Microsoft 访问表单处理前端应用程序。我想按一下按钮发送查询：

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

它在调试时有效，但在我单击按钮时无效。顺便说一句，它位于按钮的点击事件中。谢谢

Answer 1

你所拥有的应该工作。如果表单绑定记录集中的当前记录有任何可能是脏的，那么您需要确保在运行此代码之前将记录写入表。

您可以在 RunSQL 命令之前添加这 3 行代码

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