Controllo campo email

[eddyy]

Ciao Ragazzi
ho un semplice form su pagina asp è vorrei che il campo email
non deve essere lasciato vuoto non mi interessa la correttezza dei caratteri solamente che non venga lasciato vuoto per distrazione perchè darebbe un errore quando si invierebbe,
ho provato con gli script che ho trovato facendo una ricerca sul forum va non mi vanno nessuno, cioe mi correggo non riesco a farli andare io, vi posto solamente il codice asp e solamente il campo email
cosa mi potete suggerire?
grazie

	
	
<%
dim a1
a1 = request.querystring("a1")

if(len(a1)=0)then
	Form()
else
	InsertData()
end if
%>



<%

function Form()
%>


<form method="POST" action="registrazione.asp?a1=post">
<input type="text" name="email" size="20" value="<%=request.querystring("email")%>"


<%
end function

function InsertData()

nota_informativa = request.form("nota_informativa")
referente = request.form("referente")
nome = request.form("nome")
cognome = request.form("cognome")
album = request.form("album")
nome_arte = request.form("nome_arte")
sito = request.form("sito")
email = request.form("email")
siae = request.form("siae")



 		     Dim objCDO                 ' Email object
                     Dim strFromNome               ' From persons' real nome
                     Dim strFromEmail, strToEmail  ' Email addresses
                  
                     Dim strSubject, strBody       ' Pagina web
                   
		    
		     
		     strSubject    = "Modulo contatto"
		     strFromNome   = Trim(Request.Form("nome"))
             strFromEmail  = Trim(Request.Form("email"))
             strToEmail    = "info@clurican.com"
		     strBody       = Trim(Request.Form("pagina_web"))

            Set objCDO = Server.CreateObject("CDO.message")

              objCDO.From    = strFromNome & " <" & strFromEmail & ">"
              objCDO.To      = strToEmail
              objCDO.Subject = strSubject
			  objCDO.textBody    = vbnewline & "Nota Informativa: " & Request.Form("nota_informativa")& vbnewline & "Referente: " & Request.Form("referente")& vbnewline & "Nome: " & Request.Form("nome")& vbnewline & "Cognome: " & Request.Form("cognome")& vbnewline & "Album: " & Request.Form("album")& vbnewline & "Nome arte: " & Request.Form("nome_arte")& vbnewline & "Sito: " & Request.Form("sito")& vbnewline & "Url email: " & Request.Form("email")& vbnewline & "S.I.A.E: " & Request.Form("siae")          
			   objCDO.Send
			  Set objCDO = Nothing


	
response.redirect("confrec.htm")
end function

%>

[weppos]

In poche parole vorresti controllare in ASP che il formato email sia valido?

[eddyy]

Anche in java script e uguale, solamente che quel campo non resti vuoto il controllo dei caratteri non mi interessa
ciao

[weppos]

Data la sezione te lo segnalo in ASP.
http://www.weppos.com/asp/script_sho...ipt=374&cat=19

[eddyy]

ti ringrazio
ma quello che mi hai detto non controlla se il campo e vuoto o pieno,
a me interessa controllare solamente se il campo è rimasto vuoto, mi deve dare un errore di alert
ciao

[weppos]

Originariamente inviato da eddyy
ti ringrazio
ma quello che mi hai detto non controlla se il campo e vuoto o pieno,
a me interessa controllare solamente se il campo è rimasto vuoto, mi deve dare un errore di alert
ciao

Quello controlla che il campo abbia un valore corretto.
Se il campo non fosse vuoto ma uno ti scrive come email 'pirla' l'email non parte e genera errore.

Meglio fare un controllo sul formato email.

[jet]

Questo controllo verifica prima se l'indirizzo email è vuoto e poi se è corretto;

<form method="POST" action="invia.asp" onSubmit="return checkForm(this);">

<script language="JavaScript">
<!--
function checkForm (form){

if (form.email.value == "") {
alert("Inserire l'indirizzo del mittente completo.")
form.email.focus();
return false}

var EmailAddr = form.email.value;
var Filtro = new RegExp("^[a-zA-Z0-9_.-]{1,}@[a-zA-Z0-9\-]{2,}[.][a-zA-Z0-9]{2,}$");
if (!Filtro.test(EmailAddr)) {
alert("Controlla l'indirizzo del mittente inserito");
form.email.focus();
return false;
}
}
//-->
</script>

[eddyy]

ma visto che lo può scrivere ugualmente anche con il controllo
(pirla@pirla.com )non mi interessa mettere il controllo, vorrei solamente che il campo email non venga lasciato vuoto perchè al contrario mi restituisce un errore.
CDO.Message.1 error '8004020d'

At least one of the From or Sender fields is required, and neither was found.

[eddyy]

grazie funziona egregiamente

Originariamente inviato da jet
Questo controllo verifica prima se l'indirizzo email è vuoto e poi se è corretto;

<form method="POST" action="invia.asp" onSubmit="return checkForm(this);">

<script language="JavaScript">
<!--
function checkForm (form){

if (form.email.value == "") {
alert("Inserire l'indirizzo del mittente completo.")
form.email.focus();
return false}

var EmailAddr = form.email.value;
var Filtro = new RegExp("^[a-zA-Z0-9_.-]{1,}@[a-zA-Z0-9\-]{2,}[.][a-zA-Z0-9]{2,}$");
if (!Filtro.test(EmailAddr)) {
alert("Controlla l'indirizzo del mittente inserito");
form.email.focus();
return false;
}
}
//-->
</script>

[jet]

<script language="JavaScript">
<!--
function checkForm (form){

if (form.email.value == "") {
alert("Inserire l'indirizzo del mittente completo.")
form.email.focus();
return false}
}
//-->
</script>

E allora. Dove email è il nome della casella di testo.
Il controllo postato a me funge perfettamente; lo utilizzo da tempo;
pensi di non aver commesso errori?