以文本方式查看主题

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

--  作者:rophy0952
--  发布时间:2022/8/16 13:15:00
--  [求助]在生成时间的时候提示出错

在表属性里datacolchanged事件中设置的XX时间 = date.now,之前都是正常生成系统时间2022-08-16 12:00 但现在不知道什么原因,出现错误提示。请赐教,谢谢!

 


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20220816130110.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2022/8/16 13:36:00
--  
设置系统右下角的时间格式,去掉pm,上下文等格式。改为:年-月-日 时:分:秒,这种标准格式
--  作者:rophy0952
--  发布时间:2022/8/16 15:29:00
--  

右下角没有设置时间格式的


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20220816153334.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2022/8/16 15:34:12编辑过]

--  作者:有点蓝
--  发布时间:2022/8/16 15:54:00
--  
到区域里更改数据格式
--  作者:rophy0952
--  发布时间: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事件代码发上来看看

--  作者:rophy0952
--  发布时间: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事件代码!!
--  作者:rophy0952
--  发布时间: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")