function validar(reg) {
r=1;
if (reg.nom.value==""){r=0;alert("Digite su Nombre");reg.nom.focus;return false;}
if (reg.ema.value.indexOf('@',0)==-1) {r=0;alert("Digite su Correo Electronico");reg.ema.focus;return false;};
if (reg.pai.value==""){r=0;alert("Digite su Pais");reg.pai.focus;return false;}
if (reg.men.value==""){r=0;alert("Digite su Mensaje");reg.men.focus;return false;}
if (r==0) return false;
else return true;
}