共10 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：更新2025版后要多次保存
1楼
苏沫 发表于：2025/2/7 11:15:00老师，从2024版更新到2025版后，窗口事件代码有调整再保存的话有时一次能保存，有时点击多次才能保存上。测试好几个窗口都这样
此主题相关图片如下：1.png
此主题相关图片如下：1.png[此贴子已经被作者于2025/2/7 11:16:06编辑过]
2楼
有点蓝 发表于：2025/2/7 11:24:00麻烦把代码文字贴出来
3楼
苏沫 发表于：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
4楼
有点蓝 发表于：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
5楼
苏沫 发表于：2025/2/7 13:29:00不光是这个窗口表代码保存的问题，比如我调整了窗口中的某个控件后，我点击保存了，然后关闭这个窗口再打开，被调整后的那个控件并没有保存上，还是在保存之前的一个状态
6楼
有点蓝 发表于：2025/2/7 13:42:00如果是比较老的Foxtable版本升级上来的，可能是有这种情况。
试试把这个控件删除，保存关闭窗口设计，然后重新打开窗口设计，重新添加控件试试
7楼
苏沫 发表于：2025/2/7 13:51:00重新添加也有这种时而能保存，时而不能保存的情况，这个要处理下，升级之后一个窗口搞了好些控件，保存之后没有保存上，后面又得重新再来。好费事
8楼
有点蓝 发表于：2025/2/7 13:55:00项目文件不要放到共享目录、云盘目录，U盘等移动设备里打开使用
9楼
苏沫 发表于：2025/2/7 14:15:00没有，就放在本地电脑中的。
10楼
有点蓝 发表于：2025/2/7 14:24:00方便把项目文件发上来测试一下
共10 条记录, 每页显示 10 条, 页签:
[1]