Menu













Yehpee.com cerca l'azienda e promuovi il made in italy

    Validità indirizzo email

    Semplice script per fare il controllo della validità di un indirizzo email.



    Questo script ovviamente non impedisce all'utente di inserire un indirizzo email fasullo, ma almeno si obbliga l'utente a inserire un indirizzo contenente una "@" e un ".".

    <% 
    Option Explicit 
    Response.ExpiresAbsolute=Now()
    
    Dim bChkSintaxEmail
    
    Function chkSintaxEmail(sEmail)
    Dim lPosAt
    Dim lLenName
    Dim sDomain
    Dim lLenDomain
    Dim lPosDotInDomain
    Dim i
    
    'Reperisco la posizione della "@"
    lPosAt = InStr(sEmail, "@")
    
    'Reperisco la lunghezza del testo che precede la "@"
    lLenName = lPosAt - 1
    
    'Reperisco lunghezza del testo dopo la "@"
    lLenDomain = Len(sEmail) - lPosAt
    
    'Reperisco il testo dopo la "@"
    sDomain = Right(sEmail, lLenDomain)
    
    'Reperisco se e' presente almeno un "." nel testo dopo la "@"
    lPosDotInDomain = InStrRev(sDomain, ".")
    
    'Controlli sull'email specificata:
    ' 1) Esiste il carattere "@".
    ' 2) Il nome utente e' almeno di 3 caratteri.
    ' 3) Il nome del dominio e' almeno di 3 caratteri.
    ' 4) C'e' almeno un "." nel nome di dominio.
    If lPosAt <> 0 And _
    lLenName >= 3 And _ 
    lLenDomain >= 3 And _
    lPosDotInDomain <> 0 Then
    bChkSintaxEmail = True
    else
    bChkSintaxEmail = False
    End If
    
    End Function
    %>
    
    <HTML><BODY>
    <%
    chkSintaxEmail("nome@provider.it")
    If bChkSintaxEmail = True Then
    Response.Write("E-Mail valida!")
    Else
    Response.Write("E-Mail NON valida!")
    End If
    %>
    </BODY></HTML>





    scripts, asp, script, visual basic, freeware, lamborghini, immagini, cap, macchine sportive, meteo, cerca lavoro, incidenti, calcio, radio, van basten, formula1, shumacher, php, bugatti, natura

Usiamo i cookies per rendere possibile il corretto funzionamento del sito web per ogni utente. Utilizzando il nostro sito, accetti le nostre modalità di utilizzo dei cookies.
Privacy e cookie policy