asp做到计算两个时间内的工作日的函数

<%

'******************************

'函数：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

%>

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!