- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]在生成时间的时候提示出错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179279)
-- 发布时间：2022/8/16 13:15:00
-- [求助]在生成时间的时候提示出错
在表属性里datacolchanged事件中设置的XX时间 ＝ date.now，之前都是正常生成系统时间2022－08－16 12：00 但现在不知道什么原因，出现错误提示。请赐教，谢谢！
此主题相关图片如下：微信图片_20220816130110.jpg
-- 发布时间：2022/8/16 13:36:00
--
设置系统右下角的时间格式，去掉pm，上下文等格式。改为：年-月-日 时：分：秒，这种标准格式
-- 发布时间：2022/8/16 15:29:00
--
右下角没有设置时间格式的
此主题相关图片如下：qq截图20220816153334.png
[此贴子已经被作者于2022/8/16 15:34:12编辑过]
-- 发布时间：2022/8/16 15:54:00
--
到区域里更改数据格式
-- 发布时间：2022/8/16 16:11:00
--
修改了数据格式也还是不行。其它用到date.now都没有这个问题，只是在这个位置的代码才有这种情况。
此主题相关图片如下：qq截图20220816160807.png
此主题相关图片如下：qq截图20220816160819.png
-- 发布时间：2022/8/16 17:04:00
--
到有问题的电脑去设置。1楼截图是XP系统，3楼是win10，5楼是win7。
datacolchanged事件代码发上来看看
-- 发布时间：2022/8/16 17:09:00
--
厉害，这都看得出来！是这样的，程序里面实际上有好多用到date.now的，都没出现这个问题，只是在这个位置的代码才有这种情况。我就换了个电脑试，也是这个结果，其它事件的都没问题，只有这个位置的不行，试到那里就截图给你了。
刚才又排查过，表事件中的代码没事，主要是窗口AFTERLOAD中的代码不行，代码如下：
Dim r As Row = Tables("生产入库明细表").addnew
Tables("生产入库明细表").allowedit = 1
r("生产单号") = Forms("生产入库新增").controls("生产单号").value
r("流水号") = Forms("生产入库新增").controls("流水号").value
r("入库时间") = Date.Now
[此贴子已经被作者于2022/8/16 17:11:14编辑过]
-- 发布时间：2022/8/16 17:10:00
--
datacolchanged事件代码！！
-- 发布时间：2022/8/16 17:24:00
--
刚才又排查过，表事件中的代码没事，主要是窗口AFTERLOAD中的代码不行，代码如下：
Dim r As Row = Tables("生产入库明细表").addnew
Tables("生产入库明细表").allowedit = 1
r("生产单号") = Forms("生产入库新增").controls("生产单号").value
r("流水号") = Forms("生产入库新增").controls("流水号").value
r("入库时间") = Date.Now
-- 发布时间：2022/8/16 17:42:00
--
正常这个不应该有问题。access数据库？
或者自己格式化一下
r("入库时间") = format(Date.Now,"yyyy-MM-dd HH:mm:ss")