以文本方式查看主题

-  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=187179)

--  作者:jshuipu66033
--  发布时间:2023/6/29 8:43:00
--  [求助]按钮打开窗口程序卡死
程序之前正常,昨天更新发布项目后。按钮【编辑】一点程序就死机。按钮【新增】中会调用按钮【编辑】的代码。点击【新增】后,按钮【编辑】又能正常使用。此问题只出现在已发布的项目中。原编辑项目测试正常。
按钮【新增】代码:Tables("样品编号").AddNew
                          e.Form.Controls("Button25").PerformClick
按钮【编辑】代码:MainTable = Tables("样品记录")
                          Forms("样品相关").Open
图片点击可在新窗口打开查看此主题相关图片如下:1687998917332.png
图片点击可在新窗口打开查看

--  作者:cd_tdh
--  发布时间:2023/6/29 8:49:00
--  
Button25是不是编辑按钮的名称呢?
新增为什么要用PerformClick来实现打开编辑窗口?
编辑窗口的名称是不是:样品相关

--  作者:有点蓝
--  发布时间:2023/6/29 8:58:00
--  
这个窗口和"样品相关"窗口都是什么类型的窗口?所有者表都是哪个表?

这2个窗口里有没有表控件?绑定的是什么表?normal还是副本?表格都有什么表事件

"样品相关"窗口afterload事件有什么代码?

--  作者:cd_tdh
--  发布时间:2023/6/29 9:00:00
--  
按钮【新增】代码:Tables("样品编号").AddNew
                          Forms("样品相关").Open
按钮【编辑】代码:
                          Forms("样品相关").Open

--  作者:jshuipu66033
--  发布时间:2023/6/29 9:00:00
--  
Button25标题是【编辑】,新增的[样品号]在一个表,具体明细在[样品记录]表编辑,【新增】里调用编辑,是想新增后自动跳转编辑表,编辑窗口。确认表名无误。之前一个月运行正常,昨天改一处代码。重新发布后【编辑】就突然不能用了。修改的代码与此处无关联,且能正常使用。主窗口其他按钮功能均能正常使用。类似代码的另一个跳转代码MainTable = Tables("订单")   也正常。就Button25出问题。新建一个新按钮,写上同样代码,问题依旧。百思不得其解。
                                                                                                                                                                                    Forms("订单相关").Open

--  作者:cd_tdh
--  发布时间:2023/6/29 9:02:00
--  
把项目发出来看看是什么逻辑,测试一下
--  作者:jshuipu66033
--  发布时间:2023/6/29 9:06:00
--  
一个表对应一个主窗口。窗口[样品相关]afteload事件中代码:Tables("样品记录").Cols("客户").ComboList = DataTables("样品编号").SQLGetComboListString("客户")
                                                                                Tables("样品记录").Cols("针型").ComboList = DataTables("样品编号").SQLGetComboListString("针型")
                                                                                Tables("样品记录").Cols("尺码组").DropForm = "尺码组"
                                                                                Tables("样品记录").Cols("工艺").DropForm = "特殊工艺"

--  作者:jshuipu66033
--  发布时间:2023/6/29 9:14:00
--  
测试用户;李四
密码;123456
publish----已发布项目

--  作者:cd_tdh
--  发布时间:2023/6/29 9:15:00
--  
没附件啊,最好发没发布的项目,次啊看得到你代码的逻辑关系
[此贴子已经被作者于2023/6/29 9:15:55编辑过]

--  作者:jshuipu66033
--  发布时间:2023/6/29 9:18:00
--  
可能项目太大,出现这个
图片点击可在新窗口打开查看此主题相关图片如下:1688001436273.png
图片点击可在新窗口打开查看