function validaEmail(checkStr)
{var nI, sS, nN, nP;
 // Arroba ...
 sS = "@"; nN = 0; nP = 0;
 for(nI = 0; nI <checkStr.length; nI++)
 { if(checkStr.charAt(nI) == sS) 
 { nN++; nP = nI; }
 }
 if(nN == 0) return (false);
 if(nN> 1) return (false);
 var nPArroba = nP;
 // Punto ...
 sS = "."; nN = 0; nP = 0;
 for(nI = 0; nI <checkStr.length; nI++)
 { if(checkStr.charAt(nI) == sS) 
 { nN++; nP = nI; }
 }
 if(nN == 0) return (false);
 var nPPunto = nP;
 // Posicion Arroba/Punto ...
 if(nPArroba> nPPunto) return (false);
 //
 return (true);
}
// FUNCIONES IDIOMA INGLES
function GuardarConsulta_in(){
with(document.f){
 if ((nombre.value=="")){ alert("You must show a name."); nombre.focus(); }
 else
 if ((email.value=="")){ alert("You must show an e-mail."); email.focus(); }
 else 
 if (!validaEmail(email.value)){ alert("Incorrect e-mail."); email.focus(); }
 else
 if ((pregunta.value=="")){ alert("You must show a Question."); pregunta.focus(); }
 else
 submit();
 }
return false;
}
// FUNCIONES IDIOMA ESPAÑOL
function GuardarConsulta_es(){
with(document.f){
 if ((nombre.value=="")){ alert("Debe indicar Nombre y Apellidos."); nombre.focus(); }
 else
 if ((email.value=="")){ alert("Debe indicar un E-mail."); email.focus(); }
 else 
 if (!validaEmail(email.value)){ alert("E-mail incorrecto."); email.focus(); }
 else
 if ((pregunta.value=="")){ alert("Debe indicar una Pregunta."); pregunta.focus(); }
 else
 submit();
 }
return false;
}
// FUNCIONES IDIOMA ALEMAN
function GuardarConsulta_al(){
with(document.f){
 if ((nombre.value=="")){ alert("Name und Vorname angeben."); nombre.focus(); }
 else
 if ((email.value=="")){ alert("E-mail angeben."); email.focus(); }
 else 
 if (!validaEmail(email.value)){ alert("e-mail-Adresse ist nicht korrekt."); email.focus(); }
 else
 if ((pregunta.value=="")){ alert("Anfrage angeben."); pregunta.focus(); }
 else
 submit();
 }
return false;
}

// FUNCIONES IDIOMA FRANCÉS
function GuardarConsulta_fr(){
with(document.f){
 if ((nombre.value=="")){ alert("Vous devez indiquer Prénom et Nom."); nombre.focus(); }
 else
 if ((email.value=="")){ alert("Vous devez indiquer un E-mail."); email.focus(); }
 else 
 if (!validaEmail(email.value)){ alert("E-mail incorrect."); email.focus(); }
 else
 if ((pregunta.value=="")){ alert("Vous devez formuler une question ."); pregunta.focus(); }
 else
 submit();
 }
return false;
}