以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]保存前验证  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109424)

--  作者:hahahehe21
--  发布时间:2017/11/11 15:31:00
--  [求助]保存前验证
求助,我想设置业务合同表的客户名称列,业务估价表的产品名称和数量三列为必填项目,未录入数据的话不允许保存。点击开单后,点保存按钮则先验证三个必填项目是否已经录入,如果未录入则提示未录入。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试按钮功能.foxdb



--  作者:有点蓝
--  发布时间:2017/11/11 16:05:00
--  
验证参考

Dim t As Table = e.Form.Controls("Table1").Table
If t.Compute("Count(_Identify)","客户名称 is null or 客户名称 = \'\'") > 0 Then
    msgbox("业务合同表客户名称列不能为空")
    return
End If

--  作者:hahahehe21
--  发布时间:2017/11/11 19:40:00
--  
ok了,谢谢啦