- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]表达式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116664)
-- 发布时间：2018/3/29 9:19:00
-- [求助]表达式
If e.DataCol.Name = "库存" Then
Dim dr2 As DataRow
dr2 = DataTables("库存").Find("[编号] = \'" & e.DataRow("编号") & "\'And [单价] = \'" & e.DataRow("单价") & "\'")
If dr2 IsNot Nothing Then
e.DataRow("库存") = dr2("现有库存")
End If
End If
我这个 “现有库存” 是一个表达式 这代码要怎么改 现在的情况是 库存列 不能自动更新库存 必须重置库存列才会更新
-- 发布时间：2018/3/29 9:28:00
--
If e.DataCol.Name = "编号" OrElse e.DataCol.Name = "单价" Then
Dim dr2 As DataRow
dr2 = DataTables("库存").Find("[编号] = \'" & e.DataRow("编号") & "\' And [单价] = \'" & e.DataRow("单价") & "\'")
If dr2 IsNot Nothing Then
e.DataRow("库存") = dr2("现有库存")
End If
End If
-- 发布时间：2018/3/29 9:39:00
--
不行 库存直接成0了
-- 发布时间：2018/3/29 9:42:00
--
以下是引用q2520在2018/3/29 9:39:00的发言：
不行 库存直接成0了
不行 库存直接成0了
输入编号、单价，肯定能获取到值。如果不能获取，就重置任意一列。
如果还是无法获取，说明你库存表的值就是0
-- 发布时间：2018/3/29 9:51:00
--
不能 实时的更新 每次都要 重置
-- 发布时间：2018/3/29 9:55:00
--
以下是引用q2520在2018/3/29 9:51:00的发言：
不能 实时的更新 每次都要 重置
不能 实时的更新 每次都要 重置
参考
http://www.foxtable.com/webhelp/scr/1453.htm
-- 发布时间：2018/3/29 10:12:00
--
这个问题 我还是直接把库存列改成 表达式 最方便
还一个问题 窗口里 绑定的 库存表 想隐藏 现有库存 为0的不显示 代码怎么写
-- 发布时间：2018/3/29 10:16:00
--
以下是引用q2520在2018/3/29 10:12:00的发言：
这个问题 我还是直接把库存列改成 表达式 最方便
这个问题 我还是直接把库存列改成 表达式 最方便
还一个问题 窗口里 绑定的 库存表 想隐藏 现有库存 为0的不显示 代码怎么写
AfterLoad事件，写代码
e.form.controls("Table1").Table.filter = "现有库存 <> 0"
-- 发布时间：2018/3/29 10:25:00
--
我把 库存列 改成表达式 出现这个错误 不能保存修改 关不了软件
此主题相关图片如下：cw.png
-- 发布时间：2018/3/29 10:29:00
--
1、关闭重新打开，看能否正常；
2、不正常的话，项目发上来看看。