以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  更新2025版后要多次保存  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194930)

--  作者:苏沫
--  发布时间:2025/2/7 11:15:00
--  更新2025版后要多次保存
老师,从2024版更新到2025版后,窗口事件代码有调整再保存的话有时一次能保存,有时点击多次才能保存上。测试好几个窗口都这样

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2025/2/7 11:16:06编辑过]

--  作者:有点蓝
--  发布时间:2025/2/7 11:24:00
--  
麻烦把代码文字贴出来
--  作者:苏沫
--  发布时间:2025/2/7 11:33:00
--  
刚我又试了,依然这样,我把项目关闭重启,一次保存就可以了。但是这种情况容易导致重复工作,因为并不知道什么时候能保存成功,什么时间不能保存成功
If e.Form.Controls("材料编码1").text = Nothing Then
    MessageBox.Show("请维护此单刀信息!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
    Return
Else
    Tables("刀具领用计划_计划明细").current("单刀编码") = e.Form.Controls("单刀编码1").text
    Tables("刀具领用计划_计划明细").current("数量") = e.Form.Controls("数量1").text
    Tables("刀具领用计划_计划明细").current("材料编码") = e.Form.Controls("材料编码1").text
    Tables("刀具领用计划_计划明细").current("修磨状态") = "无需修磨"
    Tables("刀具领用计划_计划明细").current("单刀状态") = e.Form.Controls("单刀状态1").text
End If
e.Form.Close

--  作者:有点蓝
--  发布时间:2025/2/7 11:55:00
--  
试试

If e.Form.Controls("材料编码1").text = "" Then
    MessageBox.Show("请维护此单刀信息!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
    Return
Else
dim r as row = Tables("刀具领用计划_计划明细").current
    r("单刀编码") = e.Form.Controls("单刀编码1").text
    r("数量") = e.Form.Controls("数量1").text
    r("材料编码") = e.Form.Controls("材料编码1").text
    r("修磨状态") = "无需修磨"
    r("单刀状态") = e.Form.Controls("单刀状态1").text
r.save
End If
e.Form.Close

--  作者:苏沫
--  发布时间:2025/2/7 13:29:00
--  
不光是这个窗口表代码保存的问题,比如我调整了窗口中的某个控件后,我点击保存了,然后关闭这个窗口再打开,被调整后的那个控件并没有保存上,还是在保存之前的一个状态
--  作者:有点蓝
--  发布时间:2025/2/7 13:42:00
--  
如果是比较老的Foxtable版本升级上来的,可能是有这种情况。

试试把这个控件删除,保存关闭窗口设计,然后重新打开窗口设计,重新添加控件试试

--  作者:苏沫
--  发布时间:2025/2/7 13:51:00
--  
重新添加也有这种时而能保存,时而不能保存的情况,这个要处理下,升级之后一个窗口搞了好些控件,保存之后没有保存上,后面又得重新再来。好费事
--  作者:有点蓝
--  发布时间:2025/2/7 13:55:00
--  
项目文件不要放到共享目录、云盘目录,U盘等移动设备里打开使用
--  作者:苏沫
--  发布时间:2025/2/7 14:15:00
--  
没有,就放在本地电脑中的。
--  作者:有点蓝
--  发布时间:2025/2/7 14:24:00
--  
方便把项目文件发上来测试一下