asp实现计算两个时间内的工作日的函数

% ''****************************** ''函数:workdays(date_begin,date_end) ''参数:date_begin,开始日期;date_end,结束日期 ''作者:阿里西西 ''日期:2007/7/15 ''描述:计算两个时间内的工作日 ''示例:workdays('2007-05-18','2007-05-21') ''****************************** functionworkdays(date_begin,d

作者: 来源: 时间: 17-11-23 15:28:38

<%
''******************************
''函数:workdays(date_begin , date_end)
''参数:date_begin,开始日期;date_end,结束日期
''作者:阿里西西
''日期:2007/7/15
''描述:计算两个时间内的工作日
''示例:workdays("2007-05-18" , "2007-05-21")
''******************************
function workdays(date_begin , date_end)
 date_begin = CDate(date_begin)
 date_end = CDate(date_end)
 if IsDate(date_begin) and IsDate(date_end) then
  workdays = 0
  for d=0 to datediff("d" , date_begin , date_end)
   if weekday(date_begin + d) <> 1 and weekday(date_begin + d) <> 7 then
    workdays = workdays + 1
   end if
  next
 else 
  workdays = "未知"
 end if
end function
%>
11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们