function isBlank(s) {
	for(var i=0;i<s.length;i++) {
		var c=s.charAt(i);
		if((c!=' ')&&(c!='\n')&&(c!='\t')) return false;
	}
	return true;
}
function jCleanMoney(inText) {
	var nada = "";
	var outText = inText.replace(/[\\$\,]/g, nada);
	return outText;
}
function frmVerifyPre(xsub) {
				
				xsub.fld_signup.optional=true;
				xsub.fld_message.optional=true;
				return  frmVerify(xsub);
}

function frmVerify(f) {
	var rc=true;
	var msg=new String;
	var s=new String;
	for(var i=1;i<f.elements.length;i++) {
		if((!f.elements[i].optional)&&(!f.elements[i].email)&&
			((f.elements[i].value==null)||(f.elements[i].value=='')||isBlank(f.elements[i].value))) {
			rc=false;
			msg=msg + f.elements[i].name + ' is required\n';
		}
		if((f.elements[i].name=='fld_email')&&((f.elements[i].value.indexOf("@") == -1)||(f.elements[i].value.indexOf(".")==-1))) {
			rc=false;
			msg=msg + f.elements[i].name + ' requires valid E-Mail address\n';
		}

		if((f.elements[i].wwwurl)&&((f.elements[i].value.indexOf("://") == -1)||(f.elements[i].value.indexOf(".")==-1))) {
			rc=false;
			msg=msg + f.elements[i].name + ' requires complete WWW address (URL)\n';
		}
		
		if((f.elements[i].name=="fld_phone")&&(f.elements[i].value.indexOf("-")==-1)) {
			rc=false;
			msg=msg + f.elements[i].name + ' requires dashes in phone number';
		}
		
		
		// added 12/15/08 to STOP "://" (spam) Mark Pavlich CD WebDev Services ---------------------------------------------------------

		//if((f.elements[i].value.indexOf("://") > 1)&&(f.elements[i].name="txtCommentsContactUs")&&(f.elements[i].value.indexOf("seeyourmemories")==-1))
		//{
		//	rc=false;
		//	msg=msg + f.elements[i].name + ' "http://"  not allowed in comments (URL)\nEnter URL name, if desired, without the "http://"';
		//}

		//------------------------------------------------------------------------------------------
		if(f.elements[i].value!=null)
		{
			s=f.elements[i].value.toString();
		}
		if(f.elements[i].minlength!=null && s.length < f.elements[i].minlength) {
			msg=msg + "'" + f.elements[i].name + "' minumum length: " + f.elements[i].minlength;
			rc=false;
		}
		if(f.elements[i].maxlength!=null && s.length < f.elements[i].maxlength) {
			msg=msg + "'" + f.elements[i].name + "' maximum length: " + f.elements[i].maxlength;
			rc=false;
		}

		if((f.elements[i].value!=null) && (f.elements[i].value.numeric!=null)) {
			// straight number, optional min and max
			var v=parseFloat(f.elements[i].value);
			if(isNaN(v)) {
				rc=false;
				msg=msg + "'" + f.elements[i].name + "' must be number";
			}
			if(rc!=false && f.elements[i].min!=null && v < f.elements[i].min) {
				msg=msg + ', minumum value: ' + f.elements[i].min;
				rc=false;
			}
			if(f.elements[i].max!=null && v > f.elements[i].max) {
				msg=msg + ', maximum value: ' + f.elements[i].max;
				rc=false;
			}
			msg=msg + '\n';
		}


		/*if((f.elements[i].value!=null)) && (f.elements[i].money!=null)) {
			// currency-formatted number, optional min and max
			var v=parseFloat(jCleanMoney(f.elements[i].value));
			if(isNaN(v)) {
				rc=false;
				msg=msg + "'" + f.elements[i].name + "' must be currency";
			}
			if(f.elements[i].min!=null && v < f.elements[i].min) {
				msg=msg + ', minumum value: ' + f.elements[i].min;
				rc=false;
			}
			if(f.elements[i].max!=null && v > f.elements[i].max) {
				msg=msg + ', maximum value: ' + f.elements[i].max;
				rc=false;
			}
			msg=msg + '\n';
		} */

	}
	if(rc==false) alert(msg);
	return rc;
}