当前位置:编程学习 > asp >>

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
%>

上一个:asp 实现检测字符串是否为纯字母和数字组合的函数
下一个:asp实现图片右键滑轮控制大小的函数

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,