+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 7 su 7

Validazione indirizzo email

  1. #1
    L'avatar di luciano.net
    luciano.net non  in linea Scolaretto
    Post
    475
    Like Inviati  
    0
    Like Ricevuti  
    0
    Per validare un indirizzo email è possibile utilizare una Regular Expression in VB6 caricando la libreria VBScript Regular Expressions 5.5 library.
    E' la strada migliore?

    Grazie.

    Luciano
    Ultima modifica di luciano.net; 27-09-2006 10:40 

  2. #2
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    Post
    7,245
    Blogs
    3
    Like Inviati  
    19
    Like Ricevuti  
    13
    per validazione intendi il fatto che la stringa debba essere composta da:

    [NomeUtente]@[dominio].[estensione]

    ?

    in tal caso potrebbe essere sufficiente l'utilizzo di Like:

    Dim IndValido As Boolean
    Dim addr As String
    addr = "nomeutente@provider.pr"
    IndValido = addr Like "*[@]*[.]*"
    
    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  3. #3
    L'avatar di gibra
    gibra non  in linea Very Important Person
    Post
    6,235
    Like Inviati  
    20
    Like Ricevuti  
    11

  4. #4
    L'avatar di luciano.net
    luciano.net non  in linea Scolaretto
    Post
    475
    Like Inviati  
    0
    Like Ricevuti  
    0
    Vorrei controllare la presenza di caratteri non validi, ad es ),;^[+ e altri,
    e che non ci sia pi di un simbolo @.
    Il mio problema il seguente:
    ho scritto un'applicazione che salva dati su un db e utilizza outlook per inviare email. Outlook si bloca se l'indirizzo non corretto, anche se poi indirizzi con estensione inesistente tenta di inviarli e torenano indietro.
    A me sufficiente che non si blocchi Outlook.

    Luciano

  5. #5
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    Post
    7,245
    Blogs
    3
    Like Inviati  
    19
    Like Ricevuti  
    13
    allora, mi sa che la funzione Like è troppo poco potente per questa raffinatezza di utilizzo...

    la Regular Expression, è la strada più semplice... a meno di non mettersi a scrivere del codice proprio.

    con una RegEx ho risolto il problema, inglobandola in una funzione.

    ho usato il Late Binding, in modo da non dover includere necessariamente la libreria tra i riferimenti

    Function isValidMail(addr As String) As Boolean
        Dim myRegExp As Object
        Set myRegExp = CreateObject("VBScript.RegExp")
        myRegExp.IgnoreCase = True
        myRegExp.Global = True
        myRegExp.Pattern = "^([0-9a-zA-Z]([-.\w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})$"
        isValidMail = myRegExp.Test(addr)
        Set MyRegExp = Nothing
    End Function
    
    basta passare l'indirizzo e-mail alla funzione per averne indietro un True se valida o un False se non lo è.

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  6. #6
    L'avatar di luciano.net
    luciano.net non  in linea Scolaretto
    Post
    475
    Like Inviati  
    0
    Like Ricevuti  
    0
    OK, la strada che stavo percorrendo anche io, ma con un pattern pi restrittivo che non mi convinceva.
    Una domanda:
    utilizzando il Late Binding come hai fatto tu non devo includere la dll nel pacchetto di installazione, vero?
    Si presume quindi che tutti PC hanno necessariamente tale dll installata con il sistema operativo?

    Grazie.

    Luciano

  7. #7
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    Post
    7,245
    Blogs
    3
    Like Inviati  
    19
    Like Ricevuti  
    13
    beh, il supporto al VBScript dovrebbe esistere, almeno nei sistemi operativi recenti, quindi non dovrebbe essere necessario includerla... ma di questo non ne sono assolutamente sicuro

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Caricare un indirizzo email in una finestra di outlook
    Da Joe_01 nel forum Visual Basic .Net
    Risposte: 21
    Ultimo Post: 30-12-2020, 18:59
  2. Estrarre parte di un indirizzo email
    Da rossonero nel forum Microsoft Access
    Risposte: 5
    Ultimo Post: 03-02-2016, 17:59
  3. Inserire un indirizzo email cliccabile in un campo
    Da Efrem nel forum Microsoft Access
    Risposte: 1
    Ultimo Post: 05-12-2012, 12:22
  4. Indirizzo email in MessageBox.Show
    Da glak nel forum Visual Basic .Net
    Risposte: 15
    Ultimo Post: 29-08-2011, 23:13
  5. Indirizzo email su stampa Excel.
    Da maximum nel forum Visual Basic 6
    Risposte: 3
    Ultimo Post: 17-10-2007, 10:00