以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  【求助】除非两者一致,否则不能增加明细  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95197)

--  作者:yeshuping5045
--  发布时间:2017/1/12 20:14:00
--  【求助】除非两者一致,否则不能增加明细
父表(结算总表),有1列(制单员,制单员),子表(结算明细),有1列(明细录入员,字符型),通过(ID,字符型)连接,现在希望做到,明细录入员必须=制单员,否则明细表的数据不能增加行,请看看代码哪里有问题,拜托了,谢谢各位!

If e.DataRow("明细录入人") = e.DataTable("结算总表").Daterow("制单员")  Then
    e.Cancel = True
    msgbox("总表制单员才能增加明细!")
End If

--  作者:有点色
--  发布时间:2017/1/12 20:34:00
--  
If user.Name <> Tables("结算总表").current("制单员")  Then
    e.Cancel = True
    msgbox("总表制单员才能增加明细!")
End If