以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计个数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140683)

--  作者:有点蓝
--  发布时间:2019/9/11 14:01:00
--  
 & "\' and [配刀人员] is null "
--  作者:有点蓝
--  发布时间:2019/9/11 15:51:00
--  
http://www.foxtable.com/webhelp/topics/1776.htm
--  作者:有点蓝
--  发布时间:2019/9/11 16:39:00
--  
For Each r As Row In Tables("员工").GetCheckedRows
        Dim Filter As String = "[成品编码] = \'" & r("成品编码") & "\' and [加工工序] = \'" & r("加工工序") & "\' ........
    If DataTables("计划领用刀具").SQLCompute("count(配刀人员)", Filter)  > 0
        MessageBox.show("你无审批权限!")
return
    Else
        Forms("生成配刀单号").open

    End If
Next

--  作者:有点蓝
--  发布时间:2019/9/11 17:17:00
--  
说明后台数据库没有符合条件的数据
--  作者:有点蓝
--  发布时间:2019/9/11 17:39:00
--  
上传实例说明