function test_regkompl_data() {

			message="";

			if  ((document.regkompl.p1.value == '')||(document.regkompl.p3.value == '')||(document.regkompl.p5.value == 0)){
			message="Все поля должны быть заполнены (кроме описания)."		
			alert(message)
			return false }
			
			if (!val(document.regkompl.p2))
			{
			message="1";
			return false;
			}

			if (message=="") return true;
}		

function e(s) {
rex=true;
if (window.RegExp){
st="a";ex=new RegExp(st);
if (st.match(ex)) {
r1=new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)|( )");
r2=new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");
b=(!r1.test(s)&&r2.test(s));
} else {
rex=false;
}
} else {
rex=false;
}
if(!rex) b=(s.indexOf("@")>0&&s.indexOf(".")>0&&s!="");
return (b);
}

function val(fld) {
s=fld.value;
if (e(s)) {
return true;
}
else {
alert("Введен некорректный e-mail! Проверьте вводимый e-mail, пожалуйста.");
return false;
}
}