function IsNULL(form_name,obj)
	{
		var str = trimString(document.forms(form_name).all(obj).value);   
		if (str=='') {
		   return 1;
		} else {
		   return 0;
		}
	}	
	
function IsLength(form_name,obj,intlength)
	{
		var str = trimString(document.forms(form_name).all(obj).value);   
		if (str=='') {
		   return 1;
		} else {
		   if (str.length<intlength) 
		   {
		    return 1;
		   } else {
		   	return 0;
		  }
		}
	}


function trimString(x)
{  
	while (x.substring(0,1) == " " )
	{	templength=x.length;
		x = x.substring(1,templength);
	}

	while (x.substring(x.length-1,x.length) == " " )
	{	x=x.substring(0,x.length-1)
	}
	return x
}


function IsDigit(cCheck){
	return (('0'<=cCheck) && (cCheck<='9'));
}
function IsAlpha(cCheck){
	return ((('a'<=cCheck) && (cCheck<='z')) || (('A'<=cCheck) && (cCheck<='Z')))
}

function chkemail(form_name,obj)
{
var turefalse=1;
if(document.forms(form_name).all(obj).value != ""){
		var stre_mail=document.forms(form_name).all(obj).value;
		var temp="";		
		for(var nIndex=0; nIndex<stre_mail.length; nIndex++)
		{
			var cCheck = stre_mail.charAt(nIndex);
			var m_len=stre_mail.length;
			var aaIndex=stre_mail.indexOf('@');
			var ddIndex=stre_mail.indexOf('.');
			var ddaaIndex=ddIndex-aaIndex;
			var mmddIndex=m_len-ddIndex
			if(cCheck=='@') temp="verify";
			if(!(IsDigit(cCheck) || IsAlpha(cCheck)|| cCheck=='-' || cCheck=='_' || cCheck=='.' || cCheck=='@' ))
			{			
			turefalse=0;
			}
		}
		if(temp!="verify"){			
			turefalse=0;
		}
		if (aaIndex<"1" || ddaaIndex=="-1" || ddIndex=="-1" || ddaaIndex=="1" || mmddIndex=="1"){
			turefalse=0;
		}
}
else{
	turefalse=0;
	}
	return turefalse
}