Ms access AutoExec 2001错误

我的access数据库昨天崩溃，我今天尝试加载它以查找AutoExec 2001错误

应用程序仍能正常工作，但会弹出错误消息，而没有任何选项来检查调试

我已经更新了受信任的位置，因为我读到这可能是一种可能性

错误发生在这里：

 If DLookup("[Last_Opened]", "[tbl_logger]", "[Last_opened] = date()") Then
    DoCmd.Close acForm, "frm_Splash"
    DoCmd.OpenForm "frm_Manager_Stats_NEW_menu", acNormal
 Else

表单打开，然后错误显示，我还尝试了压缩和修复-帮助

您应该检查空值：

---

请从一些基本的调试开始。运行auto exec宏运行的代码时是否会出现相同的错误？现在，您可以获得错误的确切位置。事实上，DCount可能更有效吗？如果数据计数（“[Last_Open]”、“[tbl_logger]”、“[Last_Open]=Date（）”）大于0，则。。。

If Not IsNull(DLookup("[Last_Opened]", "[tbl_logger]", "[Last_opened] = Date()")) Then
   DoCmd.Close acForm, "frm_Splash"
   DoCmd.OpenForm "frm_Manager_Stats_NEW_menu", acNormal
Else