我使用的语言是VB.NET,但这些方法保持不变:
Imports System.Net.Mail
Module Module1
Friend Function IsValidEmailAddress(a As String) As Boolean
Dim isValid As Boolean = False
Try
Dim e = New MailAddress(a)
isValid = True
Catch ex As FormatException
isValid = False
End Try
Return isValid
End Function
Sub Main()
Dim addressesToCheck = "[email protected],,[email protected],notanemailaddress"
Dim addresses = addressesToCheck.Split(",".ToCharArray, StringSplitOptions.RemoveEmptyEntries)
For Each a In addresses
Console.WriteLine(String.Format("{0} valid: {1}", a, IsValidEmailAddress(a)))
Next
Console.ReadLine()
End Sub
End Module
输出:
[email protected] valid: True
[email protected] valid: True
notanemailaddress valid: False
你可以验证他们简化正则表达式之前拆分邮件。 – jrummell