- Products
- Purchase
Order Online Maintenance Renewal Resellers - Support
Helpdesk Online Documentation Web Forum - Our Clients
- About
About us Services Contact
From AfterLogic Wiki
This sample validates e-mail address. First time, the address is validated for syntax only, second time, the address is also validated for e-mail address domain existence.
ValidateEmailAddress is a key method of this sample.
Note 1: Testing for domain existence can take some time (up to a few seconds) if particular domain does not exist.
Note 2: Even if e-mail address syntax is correct and domain exists, this still doesn't guarantee that e-mail address is valid. The only 100%-accurate way to validate e-mail address is to send e-mail to this address, wait some time and then check whether bounced e-mail has returned from this address.
Dim objMsg ' We manually create Message object here. In your code, ' you can also reuse any existing Message object, such ' as SMTP.Message Set objMsg = CreateObject("MailBee.Message") ' Check email address for syntax only. Because ' "mailbox@non-existent-domain.com" email is ' syntactically correct, the method will return True If objmsg.ValidateEmailAddress("mailbox@non-existent-domain.com") Then MsgBox "E-mail address syntax is correct" Else MsgBox "Syntax check failed" End If ' Check email address for syntax and for domain existence. ' If "non-existent-domain.com" host does not exist, the method ' will return False If objmsg.ValidateEmailAddress("mailbox@non-existent-domain.com", 1) Then MsgBox "E-mail address is probably correct" Else MsgBox "E-mail address is incorrect" End If
<% Dim objMsg ' We manually create Message object here. In your code, ' you can also reuse any existing Message object, such ' as SMTP.Message Set objMsg = Server.CreateObject("MailBee.Message") ' Check email address for syntax only. Because ' "mailbox@non-existent-domain.com" email is ' syntactically correct, the method will return True If objmsg.ValidateEmailAddress("mailbox@non-existent-domain.com") Then Response.Write "E-mail address syntax is correct " Else Response.Write "Syntax check failed " End If ' Check email address for syntax and for domain existence. ' If "non-existent-domain.com" host does not exist, the method ' will return False If objmsg.ValidateEmailAddress("mailbox@non-existent-domain.com", 1) Then Response.Write "E-mail address is probably correct" Else Response.Write "E-mail address is incorrect" End If %>
See Also:
ValidateEmailAddress Method