以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何根据服务器日期自动计算年龄?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=14181)

--  作者:bad
--  发布时间:2011/11/11 11:32:00
--  如何根据服务器日期自动计算年龄?

可以实现根据本地计算机日期来自动计算年龄,但考虑到有些人的计算机时间不正确,因此想通过服务器日期来计算年龄。

看看下列公式如何修改?

 

        Dim cmd As New SQLCommand
        Dim dt As Date
        cmd.C
        cmd.CommandText = "Select GetDate()"
        dt = cmd.ExecuteScalar()
        dt = dt.Date
        e.DataRow("年龄") = dt.Today.Year - e.DataRow("出生日期").Year


--  作者:bad
--  发布时间:2011/11/11 11:35:00
--  

不好意思,问题已解决

 

dt.Today.Year   改成 dt.Year  

 

即可。

谢谢