当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp实现计算两个时间内的工作日的函数

ASP
如何使用ASP设置指定站点CPU最大使用程度
使用ASP启动/停止指定WEB站点
使用ASP列出NT用户组及用户
如何通过ASP管理NT帐号
使用VB将ASP代码封装到DLL文件
ASP高级技巧精选集
ASP调用存储过程的技巧
使用ASP获得服务器网卡的MAC地址信息
ASP提速技巧 推荐
在不刷新页面的情况下调用远程asp脚本
ASP网页模板的应用: 让程序和界面分离,让ASP脚本更清晰,更换界面更容易
PerlScript编写ASP(转载)
新型ASP后门源代码分析
过滤掉危险的HTML标记:script,ifame,object
如何从数据库中随机取出10条记录的方法
常用ASP函数集【经验才是最重要的】
Tsys OkHtm.com修改版数据采集方法
TsysV1.1 系统文件清单介绍
好久没发布新玩意,完成了tsys的少年不在版
tsys _rss程序

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 279 ::
收藏到网摘: n/a

<%
'******************************
'函数: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
%>