以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自动获取系统当前时间  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82725)

--  作者:liu1992
--  发布时间:2016/3/23 16:50:00
--  自动获取系统当前时间
表中有一列为“今天”的字段,希望能够自动获取当前时间,并且每新增一行都能够自动出现“今天”的日期。
代码应该怎么写啊?

--  作者:大红袍
--  发布时间:2016/3/23 16:51:00
--  

DataRowAdded事件

 

e.DataRow("今天") = Date.Now


--  作者:liu1992
--  发布时间:2016/3/23 16:57:00
--  
这样只能够实现新增一行出现“今天”日期,如果我明天再打开项目,这个日期不会改变,也就说录入过的信息还是停留在录入的时间。但是我想做到的是每次打开都是获取到最新的时间。
--  作者:狐狸爸爸
--  发布时间:2016/3/23 17:28:00
--  

afterOpenProject事件:

 

for each dr as datarow in datatables("表名").Datarows

    dr("日期")  = Date.Today

next

 

只是不明白意义何在,既然这一列的内容永远都是今天,那么这一列可以删除,没有存在的意义。


--  作者:大红袍
--  发布时间:2016/3/23 17:29:00
--  

没必要这样做,没有这样的逻辑,你这样做肯定是设计上有错误。

 

 


--  作者:大红袍
--  发布时间:2016/3/23 17:32:00
--  

如果你确实要做,就在AfterOpenProject写代码

 

DataTables("表A").ReplaceFor("今天", Date.Today)


--  作者:liu1992
--  发布时间:2016/3/24 9:07:00
--  
以下是引用大红袍在2016/3/23 17:32:00的发言:

如果你确实要做,就在AfterOpenProject写代码

 

DataTables("表A").ReplaceFor("今天", Date.Today)

做一个库存时间的计算,用“今天”的时间减去入库的时间,得出库存天数


--  作者:Hyphen
--  发布时间:2016/3/24 9:13:00
--  
vb和sql都有获取当前时间的函数,没必要再增加一列,还要花时间代码去维护这一列。
--  作者:大红袍
--  发布时间:2016/3/24 9:15:00
--  
以下是引用liu1992在2016/3/24 9:07:00的发言:

做一个库存时间的计算,用“今天”的时间减去入库的时间,得出库存天数

 

看看这里

 

http://www.foxtable.com/help/topics/2647.htm