none
ACCESS2010 如何去掉“动作查询在一个或多个链接表中对数据所做的更改”的提示 RRS feed

  • 问题

  • 我使用的是ACCESS 2010版本, 32位和64位相同问题

    在ACCESS当中,我有一些查询操作,用来更新、添加、删除 链接表的数据。
    我使用宏将多个查询串连在一起执行。

    当遇到涉及链接表数据变化的查询执行的时候会弹出提示
    “您将不能撤销这个关于动作查询在一个或多个链接表中对数据所做的更改。
    是否还要执行这个动作查询?”


    我已经在ACCESS的选项-客户端设置-- 确认 当中,将“记录更换”、“记录删除”、“动作查询” 的勾去掉了。
    对于本地表的操作,不会有提示出现。问题仅会出现在链接表的动作上。

    是否有办法去除这个提示信息?
    这样我就不用不停的点击确认按钮,一直等到宏执行完成。

    2012年5月3日 4:33

答案

  • Hi,

    使用下列代码来试一下:

    If debugging = False Then

      DoCmd.SetWarnings False

    Else

      DoCmd.SetWarnings True

    End If

    另外,你可以自己写SQL语句的代码,这里有个例子,你可以根据这个例子改写你需要的代码:

            Dim strSQL As String

            Dim cnCurrent As ADODB.Connection

            Dim rsAPHI As ADODB.Recordset

            Set cnCurrent = CurrentProject.Connection

            Set rsAPHI = New ADODB.Recordset

            strSQL = "INSERT INTO dbo_APHI SELECT APHI.* FROM APHI"

            rsAPHI.Open strSQL, cnCurrent, adOpenDynamic, adLockOptimistic

            Set rsAPHI = Nothing

            Set cnCurrent = Nothing


    Jaynet Zhang

    TechNet Community Support

    2012年5月4日 5:04
    版主

全部回复

  • Hi,

    使用下列代码来试一下:

    If debugging = False Then

      DoCmd.SetWarnings False

    Else

      DoCmd.SetWarnings True

    End If

    另外,你可以自己写SQL语句的代码,这里有个例子,你可以根据这个例子改写你需要的代码:

            Dim strSQL As String

            Dim cnCurrent As ADODB.Connection

            Dim rsAPHI As ADODB.Recordset

            Set cnCurrent = CurrentProject.Connection

            Set rsAPHI = New ADODB.Recordset

            strSQL = "INSERT INTO dbo_APHI SELECT APHI.* FROM APHI"

            rsAPHI.Open strSQL, cnCurrent, adOpenDynamic, adLockOptimistic

            Set rsAPHI = Nothing

            Set cnCurrent = Nothing


    Jaynet Zhang

    TechNet Community Support

    2012年5月4日 5:04
    版主
  • 解决了

    我 将宏转换成Visual Basic 代码

    在代码的前后加上

    DoCmd.SetWarnings False 

    代码

    DoCmd.SetWarnings Ture

    就可以了

    非常感谢

    2012年5月7日 5:01