报表引用窗体操作后，导航菜单相应链接出现错误，请帮忙看看是什么呢问题，谢谢！

感谢杜老师帮助！

刚才试了下，将*.Edit 保存按钮中的刷新语句增加了判断，结果是一样的出错。语句如下：

..............

      rst![BuMen] = rstTmp![BuMen]
        rst![FuZeRen] = rstTmp![FuZeRen]
        rst![YuJiWanChengRiQi] = rstTmp![YuJiWanChengRiQi]
        rst![ShiJiWanChengRiQi] = rstTmp![ShiJiWanChengRiQi]
        rst![BeiZhu] = rstTmp![BeiZhu]
        rst![ShenHeZhuangTai] = rstTmp![ShenHeZhuangTai]
        rst![XiuDingRen] = rstTmp![XiuDingRen]
        rst![XiuDingRiQi] = rstTmp![XiuDingRiQi]
        rst.Update
        rstTmp.MoveNext
    Loop
    rst.Close
    rstTmp.Close
    cnn.CommitTrans: blnTransBegin = False
    
     If Form_SysFrmMain.sfrChild.SourceObject = "frm_XiTongBeiLiao_ErCiJiaGong_JinDu" Then
     Form_frm_XiTongBeiLiao_ErCiJiaGong_JinDu.RefreshDataList
 End If


    'Form_frm_XiTongBeiLiao_ErCiJiaGong_JinDu.RefreshDataList（这个是原来的刷新语句）
    MsgBoxEx LoadString("Saved Successfully."), vbInformation


    If Me.DataEntry Then
        ClearControlValues Me
        CurrentDb.Execute "DELETE FROM [TMP_TBL_XiTongBeiLiao_ErCiJiaGong_MingXi]"
        Me.sfrDetail.Requery
    Else
        DoCmd.Close acForm, Me.Name, acSaveNo
    End If

我在报表中引用窗体的语句如下：

Private Sub WuLiaoBianHao_DblClick(Cancel As Integer)         
Me.GongZuoDanHao.SetFocus
    RunCommand acCmdSelectRecord
    DoCmd.OpenForm FormName:="frm_XiTongBeiLiao_ErCiJiaGong_JinDu_Edit", _
                   DataMode:=IIf(Form_frm_XiTongBeiLiao_ErCiJiaGong_JinDu.btnEdit.Enabled, acFormEdit, acFormReadOnly), _
                   OpenArgs:=Me![GongZuoDanHao]
End Sub

请问：是调用窗体的语句有问题导致的吗？（因为打开时调用的数据源是一样的。）