Foxtable(狐表)用户栏目专家坐堂 → 怎么写这个条件?


  共有1872人关注过本帖树形打印复制链接

主题:怎么写这个条件?

帅哥哟,离线,有人找我吗?
jinzhengbe
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
怎么写这个条件?  发帖心情 Post By:2016/5/28 23:12:00 [只看该作者]


If e.DataCol.name = "shuliang" Then
    If e.DataRow("shuliang") Then
        Dim t As Table = Tables("weixindanhao.weixin.weixinminxi")
        For i As Integer = t.rows.count-1 To 0 Step -1
            t.rows(i).delete
        Next
                                                                       
        Dim cc As Integer =e.DataRow("shuliang")
        t.addnew(cc)
        t.save()
    End If


想在上面红色的部分添加下面的条件
 如果weixinminxi 表的 name 的最大 id < minxi 表相同name的最大id     then
    
       t.addnew(cc)
           t.save()

else  提示 缺少库存数量,并且结束

场景:1

商品a  minxi表的 最大 最大id 为10
商品a  weixinminxi表的 最大 id 为 5
dim f as inter =  minxi表的最大id - weixinmingxi表的最大id
then 
t.addnew(f)
t.save
masess("缺少5个库存“)

场景:2

商品a  minxi表的 最大 最大id 为10
商品a  weixinminxi表的 最大 id 为 10
dim f as inter =  minxi表的最大id - weixinmingxi表的最大id
then 

masess("缺少10个库存“)
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:mifeng2.foxdb

[此贴子已经被作者于2016/5/28 23:19:40编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/5/29 23:28:00 [只看该作者]

 

If DataTables("weixinminxi").Compute("max(id)", "name = '" & e.datarow("name") & "'") < DataTables("minxi").Compute("max(id)", "name = '" & e.datarow("name") & "'") then


 回到顶部