asp实现一个函数计算两天的工作日
<******************************
功能:工作日(date_begin,date_end)
参数:date_begin,date_end开始日期,结束日期;
作者:Ali Cici
日期:2007 7 15
说明:两天的工作日
例如:工作日(2007-05-18
******************************
功能工作日(date_begin,date_end)
date_begin = CDate(date_begin)
date_end = CDate(date_end)
如果IsDate(date_begin)和IsDate(date_end)然后
工作日= 0
D = 0 DateDiff(D
如果周日(date_begin + D)<> 1、平日(date_begin + D)< > 7
工作日=工作日+ 1
最后如果
下一个
其他的
工作日=未知
最后如果
端功能
%>