asp虽然已经过时,但是大家却还是在用,给大家分享这篇asp时间函数集锦,需要的都在这里!

原创 2011年03月06日 20:40:00

 

asp虽然已经过时,但是大家却还是在用,给大家分享这篇asp时间函数集锦,需要的都在这里!  需要技术服务和网站建设来我网站看看:烟台网站制作

 

 

<%
'日期函数包DataPackage
%>
<script language="javascript">
function IsDateString(Str)
<!--
{
// 校验是否YYYY-MM-DD格式的日期型数据,返回值为True成功,否则返回False
// 如果传递的是空字符串则返回False
// 定义分隔符
var sSplit="-"

var iYearPos=Str.indexOf(sSplit);
if (iYearPos==-1) return false;

var iMonthPos=Str.indexOf(sSplit,iYearPos+1);
if (iMonthPos==-1) return false;

// 分离出年份
sYear=Str.substr(0,iYearPos);
// 分离出月份
sMonth=Str.substr(iYearPos+1,iMonthPos-iYearPos-1);
//月份长度为二
if (sMonth.length!=2) return false;
if (sMonth.substr(0,1)=="0") sMonth=sMonth.substr(1);
// 分离出日期
sDay=Str.substr(iMonthPos+1);
//日长度为二
if (sDay.length!=2) return false;
if (sDay.substr(0,1)=="0") sDay=sDay.substr(1);


// 年份是否数字?
if (isNaN(sYear)) return false;
var iYear=parseInt(sYear);
// 年份是否整数?
if (sYear!=iYear) return false;
// 年份是否在1000-9999之间?
if (iYear<1000 || iYear>9999) return false;

// 月份是否数字?
if (isNaN(sMonth)) return false;
var iMonth=parseInt(sMonth);
// 月份是否整数?
if (sMonth!=iMonth) return false;
// 月份是否在1-12之间?
if (iMonth<1 || iMonth>12) return false;

// 日期是否数字?
if (isNaN(sDay)) return false;
var iDay=parseInt(sDay);
// 日期是否整数?
if (sDay!=iDay) return false;
// 日期是否在1-31之间?
if (iDay<1 || iDay>31) return false;

if (iDay<29) return true;

// 日期数据是否合法的?
switch (iMonth)
{
case 1:
if (iDay>31) return false;
break;
case 2:
if (IsLeapYear(iYear))
{
if (iDay>29) return false;
}
else
{
if (iDay>28) return false;
}
break;
case 3:
if (iDay>31) return false;
break;
case 4:
if (iDay>30) return false;
break;
case 5:
if (iDay>31) return false;
break;
case 6:
if (iDay>30) return false;
break;
case 7:
if (iDay>31) return false;
break;
case 8:
if (iDay>31) return false;
break;
case 9:
if (iDay>30) return false;
break;
case 10:
if (iDay>31) return false;
break;
case 11:
if (iDay>30) return false;
break;
case 12:
if (iDay>31) return false;
}

return true;

}


function IsLeapYear(Y)
{
// 年份是否为闰年

if (Y % 4 !=0) return false;
if (Y % 400 == 0) return true;
if (Y % 100 == 0) return false;
}


-->
</script>


<%
'**********************
'目的:将日期转换成标准日期字符串
'输入:日期
'输出:日期字符串,如:2002-12-22
'**********************
Function getdatestr(ddate)
dim strtmp
getdatestr = DatePart("yyyy",ddate)
strtmp = trim(DatePart("m",ddate))
if len(strtmp)=1 then strtmp="0" & strtmp
getdatestr = getdatestr & "-" & strtmp
strtmp = trim(DatePart("d",ddate))
if len(strtmp)=1 then strtmp="0" & strtmp
getdatestr = getdatestr & "-" & strtmp
End Function
'**********************


'**********************
'目的:将日期时间转换成标准日期时间字符串
'输入:日期时间
'输出:日期时间字符串,如:2002-12-22
'**********************
Function gettimestr(ddate)
dim strtmp
gettimestr = DatePart("yyyy",ddate)
strtmp = trim(DatePart("m",ddate))
if len(strtmp)=1 then strtmp="0" & strtmp
gettimestr = gettimestr & "-" & strtmp
strtmp = trim(DatePart("d",ddate))
if len(strtmp)=1 then strtmp="0" & strtmp
gettimestr = gettimestr & "-" & strtmp
gettimestr = gettimestr & " " & trim(DatePart("h",ddate))
gettimestr = gettimestr & ":" & trim(DatePart("m",ddate))
End Function
'**********************


'**********************
'目的:计算一月的总天数
'输入:年,月
'输出:天数
'**********************
function getmonthdays(myyear,mymonth)
dim thismonthfirday,nextmonthfirday
'取得当前年月的1日日期
thismonthfirday=myyear & "-" & mymonth & "-1"
'取得下个月1日的日期
nextmonthfirday=dateadd("m",1,thismonthfirday)
'取得当前月的天数
getmonthdays=DateDiff("d",thismonthfirday,nextmonthfirday)
end function
'**********************


'**********************
'目的:返回格式化日期
'输入:任何类型参数
'输出:格式化后的日期
'**********************
Function FormatDateEx(D)


dim varTemp

if IsDate(D) then
varTemp="'" & D & "'"
else
varTemp="NULL"
end if

FormatDateEx=varTemp


End Function
'**********************


'DatePackage End
%>

文章转载自:http://www.gongyingwl.com/html/2011/1/287.htm

ASP的时间处理函数

主要介绍返回日期名称字符串,长日期模式,短日期模式,格式化成长时间格式的函数等。now() 获取当前系统日期和时间,ASP输出可以这样写:Year(now()) 获取年份, ASP输出:Month(n...
  • suleil1
  • suleil1
  • 2015年10月28日 16:48
  • 96

ASP采集-ASP采集程序原理

采集程序的主要步骤如下: 一、获取被采集的页面的内容 二、从获取代码中提取所有用的数据 一、获取被采集的页面的内容 我目前所掌握的ASP常用获取被采集的页面的内容方法: ...
  • lishimin1012
  • lishimin1012
  • 2015年12月15日 18:08
  • 907

你在用哪家的asp空间

ANSWER Node.js 早在26 年出现了进程间的资源隔离技术.return ;end 提示类.这时8结束语. MapReduceOutput out = spec.output程序员发现这...
  • fuhuangu0385
  • fuhuangu0385
  • 2017年01月26日 15:49
  • 79

facebook登录和分享

整体来说,Facebook在国际化中做的是非常好的。也是,Twitter和YouTube都是Google自己家的,在中国政府受挫之后,就不方便投入太多,怎么做都好像一个血脉,一个味道。       ...
  • u011216417
  • u011216417
  • 2017年06月21日 10:06
  • 1697

ASP时间函数总结

ASP时间函数总结
  • netuser1937
  • netuser1937
  • 2016年12月19日 13:42
  • 187

web前端入坑第四篇:你还在用 jQuery?

web前端入坑第四篇:你还在用 jQuery?大妈都这么努力,我们有几个人回家还看书的?先来补齐【web前端入坑系列】前三篇的连接web前端入坑系列:点击标题进入第一篇: web 前端入坑第一篇:we...
  • xllily_11
  • xllily_11
  • 2017年03月20日 16:47
  • 8878

asp.net时间控件之用法

原文地址:http://blog.csdn.net/taomanman/article/details/5619581 关于需要用到的JS文件请到地址:http://d.download.csd...
  • lishimin1012
  • lishimin1012
  • 2014年08月05日 18:16
  • 1177

伪静态网站分享到微信链接打不开的解决办法

今天给客户做了个手机网站,在内容页加上了百度分享代码。写了一篇文章后,先是分享到QQ空间,完全正常的,随后分享到微信的朋友圈中,去打不开链接,反复试了好几次,依旧没有解决。    ...
  • ML01010736
  • ML01010736
  • 2015年08月12日 09:06
  • 4505

ASP写的汉字转换UTF-8及UTF-8转GB2312

汉字转换为UTF-8 function chinese2unicode(Str)   dim i   dim Str_one   dim Str_unicode   for i=1 to l...
  • hefeng_aspnet
  • hefeng_aspnet
  • 2013年09月26日 15:29
  • 2310

不使用官方SDK,实现微信分享(发送到朋友,发送到朋友圈)

记得当项目里需要些微信分享,所以我也去下载了微信的sdk,测试以后,失败了。一直跳转不到绑定微信的页面   找了很久没发现问题到底出在哪。  在网上查资料的时候发现有很多人遇到了同样的问题但都没解决,...
  • wuhongqi0012
  • wuhongqi0012
  • 2013年10月31日 15:02
  • 2858
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:asp虽然已经过时,但是大家却还是在用,给大家分享这篇asp时间函数集锦,需要的都在这里!
举报原因:
原因补充:

(最多只允许输入30个字)