Foxtable(狐表)用户栏目专家坐堂 → 请求帮助:提取的业务数量不能保存?


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

主题:请求帮助:提取的业务数量不能保存?

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


加好友 发短信
等级:婴狐 帖子:46 积分:673 威望:0 精华:0 注册:2012/7/12 15:30:00
请求帮助:提取的业务数量不能保存?  发帖心情 Post By:2013/3/26 22:05:00 [只看该作者]

Dim dr As DataRow
dr = DataTables("合同主表").find("[客户名称] = '" & Tables("结算主表").Current("客户名称") & "'  and [合同开始日] <= '" & Tables("结算主表").Current("年份月份") & "' and  [合同结束日] >= '" & Tables("结算主表").Current("年份月份") & "'")
Tables("结算主表").Current("合同编号") = dr("合同编号")
'以上是提取合同相关信息

 

Dim dr1s As List (of DataRow)
dr1s =DataTables("业务量明细表").Select("[供应商名称] = '" & Tables("结算主表").Current("客户名称") & "' and  [结算年月] = '" & Tables("结算主表").Current("年份月份") & "'")
For Each dr1 As DataRow In dr1s
    Dim dr2 As Row = Tables("结算主表.结算明细表").AddNew
    dr2("产品名称") = dr1("产品名称")
    dr2("产品型号") = dr1("图号")
    If Tables("结算主表").Current("数量来源") = "出库数" Then
        dr2("业务数量") = dr1("出库合计")
    Else
        dr2("业务数量") = dr1("供应商送货")
    End If
Next
'以上是提取业务数量信息

 

DataTables("结算主表").Save()
DataTables("结算明细表").Save()


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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/27 8:24:00 [只看该作者]

 如果你在Foxtable看到数据提取了,并保存了,但是重新打开后,数据还是不存在。

那么也许这一列是个表达式列,看看:

http://www.foxtable.com/help/topics/1380.htm

 


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


加好友 发短信
等级:婴狐 帖子:46 积分:673 威望:0 精华:0 注册:2012/7/12 15:30:00
  发帖心情 Post By:2013/3/27 9:20:00 [只看该作者]

谢谢狐狸爸爸!果真是将该列设为表达式列了。


 回到顶部