服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|JAVA教程|ASP教程|

服务器之家 - 编程语言 - ASP教程 - asp实现计算两个时间内的工作日的函数

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

2019-10-11 10:44阿里西西 ASP教程

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

  1. <%  
  2. '******************************  
  3. '函数:workdays(date_begin , date_end)  
  4. '参数:date_begin,开始日期;date_end,结束日期  
  5. '作者:阿里西西  
  6. '日期:2007/7/15  
  7. '描述:计算两个时间内的工作日  
  8. '示例:workdays("2007-05-18" , "2007-05-21")  
  9. '******************************  
  10. function workdays(date_begin , date_end)  
  11.  date_begin = CDate(date_begin)  
  12.  date_end = CDate(date_end)  
  13.  if IsDate(date_begin) and IsDate(date_end) then  
  14.   workdays = 0  
  15.   for d=0 to datediff("d" , date_begin , date_end)  
  16.    if weekday(date_begin + d) <> 1 and weekday(date_begin + d) <> 7 then  
  17.     workdays = workdays + 1  
  18.    end if  
  19.   next  
  20.  else   
  21.   workdays = "未知"  
  22.  end if  
  23. end function  
  24. %> 

延伸 · 阅读

精彩推荐