以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 避重号问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=196194) |
-- 作者:lin98 -- 发布时间:2025/4/7 16:15:00 -- 避重号问题 If e.DataCol.Name = "单号" Then Dim dr As DataRow dr = e.DataTable.Find("单号 = \'" & e.NewValue & "\'") If dr IsNot Nothing Then MessageBox.Show("此订单号已经存在!") e.Cancel = True End If End If 这个内表操作,如何用改,从后台或服务器的后台数据库检查是否重复? 是改为下面? dr = e.DataTable.SQGLFind("单号 = \'" & e.NewValue & "\'") dr = e.DataTable.SQGLSe("单号 = \'" & e.NewValue & "\'")
|
-- 作者:有点蓝 -- 发布时间:2025/4/7 16:19:00 -- 如果数据没有完全加载。查2次,先Find,如果不存在,再SqlFind一次 |