我允许用户管理存储在数据库中的通讯组列表。用户只能输入@ mydomain.com的电子邮件。一个基于Web的应用程序然后获取分发列表并发送电子邮件。我想在从应用程序发送电子邮件之前验证电子邮件是否有效。在交换服务器上验证电子邮件地址
要送我正在使用此代码的电子邮件:
Dim SendTo As String = "[email protected]"
Dim SentFrom As String = "[email protected]"
Dim MessageBody As String = "blah blah blah"
Dim MessageSubject As String = "This is the subject"
Dim mm As New MailMessage(SentFrom, SendTo)
mm.Subject = MessageSubject
mm.IsBodyHtml = False
mm.Priority = MailPriority.High
mm.Body = MessageBody
Dim smtp As New SmtpClient()
smtp.Send(mm)
如果的SendTo是不是一个有效的电子邮件地址,服务器返回此错误:
Mailbox unavailable. The server response was: 5.1.1 <[email protected]>... User unknown
反正是有验证当电子邮件地址被添加到数据库时发送电子邮件,而不是在发送电子邮件时使用try catch
区块?
添加电子邮件地址时,您可以针对AD域执行查询。那里应该有很多例子。但是,除非您的管理员也更新您的数据库,否则当电子邮件地址更改或销毁时您仍然会出现错误。 – Bill 2010-11-09 20:47:11
@Bill〜我没有考虑电子邮件地址何时更改或删除。我会尽我所能,在提交时从AD获取有效的电子邮件,然后在发送时发现错误。谢谢 – zeroef 2010-11-09 20:52:51