WEICHBRODT.it
Home » wHow? » VB.net » Estrarre tutti gli indirizzi email contenuti in una stringa

Estrarre tutti gli indirizzi email contenuti in una stringa

The WEICHBRODT.it's How-To Directory

Categoria: VB.NET

Descrizione

Questa funzione serve per estrarre tutti gli indirizzi email contenuti in una stringa di testo passata come argomento.
Ritorna un array contenente gli indirizzi email trovati.

Codice

Imports System.Text.RegularExpressions

Private Function TrovaEmail(ByVal testo As String) As String()

    Dim mc As MatchCollection = Regex.Matches(testo, _
        "([a-zA-Z0-9_\-\.]+)@([a-zA-Z0-9_\-\.]+)\.([a-zA-Z]{2,5})")
    Dim trovati(mc.Count - 1) As String
    For i as Integer = 0 To trovati.Length - 1
        trovati(i) = mc(i).Value
    Next
    Return trovati

End Function

Commenti

Non ci sono commenti per questa pagina. Vuoi essere il primo a postare un commento?

Scrivi un commento

Nome
Email (non verrà pubblicato)
Web (opzionale)
Inviami una notifica quando un nuovo commento viene aggiunto a questa pagina
Commento
  This is a captcha-picture. It is used to prevent mass-access by robots. (see: www.captcha.net)
Inserisci i caratteri di controllo
 

Segnala questa pagina:

Email facebook twitter LinkedIn Tumblr technorati.com del.icio.us FriendFeed digg
Print This Page
Torna su
| Contatti | Mappa | Link |
© WEICHBRODT.it - Grafica, layout e contenuti sono di esclusiva proprietà di Andrea Weichbrodt