【问题标题】:MS Access 2013 Run TIme [currentProject].[istrusted] SyntaxMS Access 2013 运行时间 [currentProject].[istrusted] 语法
【发布时间】:2015-03-19 20:49:57
【问题描述】:

您好,我在 MS ACCESS 2007 中有一个 AutoExec 宏在 MS ACCESS 2010 中有效,但在 2013 年无效。该宏调用 [currentProject].[istrusted]=true 。

MS Access 2013 的正确语法是什么?如何编写检测受信任状态的宏(或 VBA 模块)。

顺便说一句,我使用的是 MS Access 2013 Run Time,而不是完全成熟的 MS Access 2013 版本。

提前感谢您的 cmets。

【问题讨论】:

  • 除上述之外,我还有一个 VBA 模块可以检测 Application.Version。是否可以编写一些 VBA 来检测适用于所有版本的 MS Access 的受信任状态?这样我就不需要将它放入宏中并不断调整它以适应 MS Access 对象模型中的不一致性。
  • 认为我找到了答案link

标签: ms-access-2013


【解决方案1】:

我在寻找答案时偶然发现了这篇文章。几个小时以来,我一直在试图让它在 Access 2013 中工作(Access 2007 工作)。在我的场景中,如果启用了内容,我想加载常规的主页表单。如果内容未启用,我想加载一个表单,上面写着选择启用它。

Tired_Eyes 的链接很棒,但它在我的数据库中不起作用。我收到 Init() 无法识别的提示。在该链接中使用相同的方法打开表单也无效。它缺少的是条件。

在 Access 2013 中起作用的是创建一个名为 autoexec 的宏。在该宏中选择“If”的操作并在“If”右侧的框中输入[CurrentProject].[IsTrusted] = True 然后在“添加新操作”下拉列表中选择 OpenForm 并选择在启用内容时应打开的表单。之后选择“添加其他”并在“添加新操作”下拉列表中选择 OpenForm 并选择要在未启用内容时显示的表单。

【讨论】:

    【解决方案2】:

    您需要在宏中添加一个 If 语句,并将 RunCode 操作插入到 If 语句中。我在这里找到了。 https://msdn.microsoft.com/en-us/library/office/ff823046.aspx

    【讨论】:

    • 请在此处发布解决方案,以防链接因任何原因断开。
    • 这是该链接中的代码。示例代码提供者:Microsoft Access 2010 程序员参考If [currentproject].[istrusted] Then RunCode Function Name =Init() Else MessageBox Message The application is opened in disabled mode. Please enable the application for full functionality. Beep Yes Type None Title Disabled Mode Check End If
    猜你喜欢
    • 1970-01-01
    • 2023-03-11
    • 1970-01-01
    • 1970-01-01
    • 2016-01-18
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多