面向对象的asp编程之九---客户器端函数

// ****************************************************************
//

// Script Compont Object Model

// Design for DHTML

// Copyright 2003 Version 1.0

// Made by 尹曙光

// ****************************************************************
//

// T>

function isLeapYear(sYear){ //年参数错误返回-1 是闰年返回1，不是闰年返回 0

if ((sYear%4==0)&&(sYear%100!=0)||(sYear%400==0))
return true
else
return false
}

//得到一个给定的日期中的特定数据信息 a[0]=year a[1]=month a[2]=day
//日期格式可以为：年-月-日，年/月/日，年。月。日
function datePart(strDate){
var aDate=new Array
var sDate=new String(strDate)
if (sDate.search("-")!=-1){
aDate=sDate.split("-")
}
else if (sDate.search("/")!=-1){
aDate=sDate.split("/")
}
else if (sDate.search(".")!=-1){
aDate=sDate.split(".")
}
return aDate
}

//以下函数判断一个日期的合法性
function isRightDate(strDate)
{
var dp=new Array
dp=datePart(strDate)
return isRightDate2(dp[0],dp[1],dp[2])
}

function isRightDate2(iYear2,iMonth2,iDay2)
{
var iYear=parseInt(iYear2)
var iMonth=parseInt(iMonth2)
var iDay=parseInt(iDay2)

if (iYear<1900)
return false;
if (iMonth<1||iMonth>12)
return false;
if (iDay<1||iDay>31)
return false;
if (iMonth==2)
{
if (isLeapYear(iYear))//如果是闰年
{
if (iDay>29)
return false; }
else
{