以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教列表中选择数据调出修改窗口造表中某字段全修改的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93616) |
||||
-- 作者:hopestarxia -- 发布时间:2016/12/2 12:22:00 -- 请教列表中选择数据调出修改窗口造表中某字段全修改的问题 项目中主要内容为入库记录表。HCCRK及HCCRKMX 设计了几个窗口为: “入库列表”:列出了当月入库明细; “新增入库”:输入入库信息的窗口; “入库修改”:修改入库记录的窗口;
目前出现如下问题: 在入库列表窗口中,选择某一行数据调出“入库修改”窗口对原数据内容进行修改时, 如果是进入项目中直接点开,则调出的修改窗口明细没有数据,且关闭取消掉修改窗口后,明细表HCCRKMX表的单据编号(DJCODE)字段全变成了第一个单号; 如果在点击修改功能前,打开或操作过“新增入库”的窗口,则能正常调出数据,并完成数据修改维护功能。
请问老师此问题如何解决?(目前用了一个变通的办法暂时避开了此问题,就是在点列表上方的修改按钮时,按钮的单击代码写的是“打开“新增入库”窗口,--关闭“新增入库”窗口————打开“入库修改”窗口。) 附件中为项目文件,请老师指点。
此主题相关图片如下:qq图片20161202115714.png
|
||||
-- 作者:有点色 -- 发布时间:2016/12/2 12:41:00 -- 参考上次的方法,你要分析下原因。
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=93119&skin=0
|
||||
-- 作者:hopestarxia -- 发布时间:2016/12/2 21:51:00 -- 老师,分析也测试了原因,修改窗口打开时,先获取选定行的数据, |
||||
-- 作者:有点蓝 -- 发布时间:2016/12/3 10:08:00 -- \'收集并填充字段内容 Dim dst As Table = Tables("入库列表_Table1") Dim dr As Row = dst.Current \'获得选定行 vars("str1") = dr("单据编号") \'保存原货品单号,确保变更后可以删除原记录 \'生成出入库明细数据 DataTables("hccrk").LoadFilter = "[djcode] = \'" & vars("str1") & "\'" DataTables("hccrk").Load(False) DataTables("hccrkmx").LoadFilter = "[djcode] = \'" & vars("str1") & "\'" DataTables("hccrkmx").Load(False) Dim i As Integer Dim kz As String = "DateTimePicker1,ComboBox4,TextBox2,ComboBox2,ComboBox6,ComboBox3,TextBox1" Dim lm As String = "djdate,type,djcode,ckname,bmname,afname,note" Tables("hccrkmx").AllowEdit = False
|
||||
-- 作者:hopestarxia -- 发布时间:2016/12/19 0:35:00 -- 谢谢老师的指点,这段时间有事息假了. |