以文本方式查看主题

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

--  作者:BATASC750206
--  发布时间:2018/7/18 19:03:00
--  两个日期之间的计算
如何利用系统日期和订单交期日期,生成动态的订单延期天数
即:订单延期天数=订单交期-系统日期,每天要会自动更新的,相当于EXCEL表中的“TODAY"

--  作者:BATASC750206
--  发布时间:2018/7/18 19:19:00
--  
请老师指教!谢谢!


--  作者:有点甜
--  发布时间:2018/7/18 21:04:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/1452.htm

 

http://www.foxtable.com/webhelp/scr/2647.htm

 

 


--  作者:BATASC750206
--  发布时间:2018/7/18 22:49:00
--  
请帮忙检查这个代码有什么问题,谢谢!
Select Case e.DataCol.name 
    Case "订单交期"
        If e.DataRow.IsNull("订单交期") Then
            e.DataRow("天数") = Nothing
        Else
            Dim tp As TimeSpan = Date.today - CDate(e.DataRow("订单交期"))
            e.DataRow("订单交期") = Math.Round(tp.TotalDays / 365.2422,2)
        End If
End Select

--  作者:BATASC750206
--  发布时间:2018/7/18 22:55:00
--  

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

--  作者:有点甜
--  发布时间:2018/7/18 22:59:00
--  
Select Case e.DataCol.name 
    Case "订单交期"
        If e.DataRow.IsNull("订单交期") Then
            e.DataRow("天数") = Nothing
        Else
            Dim tp As TimeSpan = Date.today - CDate(e.DataRow("订单交期"))
            e.DataRow("天数") = tp.TotalDays
        End If
End Select

--  作者:BATASC750206
--  发布时间:2018/7/18 23:12:00
--  
谢谢