- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 筛选相同的产品代号 进行确认 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=177233)
-- 发布时间：2022/5/13 15:29:00
-- 筛选相同的产品代号 进行确认
此主题相关图片如下：13.png
我想是实现 1、 在批准开发确认后
2 、相似的工序都自动变成批准开发
这部分看哪块的帮助
-- 发布时间：2022/5/13 15:33:00
--
筛选？http://www.foxtable.com/webhelp/topics/0448.htm
-- 发布时间：2022/5/13 15:49:00
--
Filter find FindRow 这三个老是分不清要用哪个 怎么区分啊
-- 发布时间：2022/5/13 15:58:00
--
If e.DataCol.Name = "批准开发" Then
Dim dr1 As DataRow = Tables("报价管理系统").
Dim dr As DataRow
dr = Tables("报价管理系统").Filter = "[生产加工评估_加工工序] like \'%" & dr1 & "% And [批准开发] = True "
If dr IsNot Nothing \'如果找到, 则设置各列内容
e.DataRow("品名")= dr("品名")
e.DataRow("型号")= dr("型号")
e.DataRow("规格")= dr("规格")
End If
End If
能不能帮改一下 或者帮着写一下 现在有点弄糊涂了
-- 发布时间：2022/5/13 16:09:00
--
先去看这些功能的帮助文档和示例代码
find时候查询返回符合条件的行，用于datatable
If e.DataCol.Name = "批准开发" Then
Dim dr1 As DataRow = e.DataRow
Dim dr As DataRow
dr = dataTables("报价管理系统").find("[生产加工评估_加工工序] like \'%" & dr1("xxx列，自己改") & "% And [批准开发] = True "
If dr IsNot Nothing \'如果找到, 则设置各列内容
e.DataRow("品名")= dr("品名")
-- 发布时间：2022/5/13 16:37:00
--
能不能根据一楼的照片 给写一下 我参考一下
-- 发布时间：2022/5/13 16:56:00
--
这个意思？
If e.DataCol.Name = "批准开发" Then
if e.newvalue then
e.DdataTable.replacefor("批准开发”，true，"[生产加工评估_加工工序]=\'" & e.datarow("[生产加工评估_加工工序]") & "\' And [批准开发] = false"
End If
End If
-- 发布时间：2022/5/13 17:05:00
--
此主题相关图片如下：1.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
不对啊 提示错误啊
-- 发布时间：2022/5/13 17:10:00
--
手误，自己学会判断一下错误