Foxtable(狐表)用户栏目专家坐堂 → 更新2025版后要多次保存


  共有235人关注过本帖树形打印复制链接

主题:更新2025版后要多次保存

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112355 积分:572031 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/2/7 11:24:00 [显示全部帖子]

麻烦把代码文字贴出来

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112355 积分:572031 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112355 积分:572031 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/2/7 13:42:00 [显示全部帖子]

如果是比较老的Foxtable版本升级上来的,可能是有这种情况。

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

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112355 积分:572031 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/2/7 13:55:00 [显示全部帖子]

项目文件不要放到共享目录、云盘目录,U盘等移动设备里打开使用

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112355 积分:572031 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/2/7 14:24:00 [显示全部帖子]

方便把项目文件发上来测试一下

 回到顶部