Vb.net 邮件未送达

我正在使用

SmtpClient

发送邮件。在尝试发送任何邮件时，我得到了成功的回复。但邮件并没有被送达

Dim mMailMessage作为新的Net.Mail.MailMessage
Dim客户端为System.Net.Mail.SmtpClient=新System.Net.Mail.SmtpClient（“域”，587）
client.EnableSsl=True
client.Timeout=100000
client.DeliveryMethod=System.Net.Mail.SmtpDeliveryMethod.Network
client.UseDefaultCredentials=False
client.Credentials=新的网络凭据（“用户名***”，“密码”）
Dim msg As System.Net.Mail.MailMessage=新系统.Net.Mail.MailMessage（）
mMailMessage.[To].Add（pstrtmailid）
mMailMessage.From=新系统.Net.Mail.MailAddress（“frommailid”）
mMailMessage.Subject=pstrSubject
mMailMessage.IsBodyHtml=True
mMailMessage.Body=文本
如果不是，那么pstrfilenames什么都不是
作为整数的Dim lint
Dim Larratachment（）作为字符串
LARRATachment=Split（pstrfilenames，“，”）
对于皮棉=0至拉毛，长度为-2
附件=新的Net.Mail.attachment（larratachment（lint））
mMailMessage.Attachments.Add（附件）
下一个
如果结束
client.Send（mMailMessage）

你能标记所使用的语言吗？这是一个VB.NET@tadman“我得到了成功的回应”。那么您的代码就成功了，所以这里没有需要解决的问题。SMTP服务器以后发生的事情超出范围。您需要查看SMTP服务器和收件人的服务器，以了解他们可能在处理邮件。也许它在一个垃圾文件夹里，或者它正在被隔离。这与您的代码无关，因此您需要首先找出实际问题所在；你的邮件可能是垃圾邮件。转到并从那里获取电子邮件地址（每个页面访问都是唯一的），然后用您的程序发送邮件，等待一段时间，然后从网站收集您的结果。它会告诉你你的电子邮件看起来有多像垃圾邮件，也会给你一些方法来测试你的邮件是否真的离开了你选择的发送服务器。你甚至可能会发现这取决于接收者的环境，然后取决于电子邮件甚至没有到达垃圾邮件的附件的性质。许多邮件清洗器会根据附件大小或类型简单地丢弃电子邮件。如果你在没有附件的情况下这样做，它能通过吗？你能标记所使用的语言吗？它是一个VB.NET@tadman“我正在获得成功响应”。那么您的代码就成功了，所以这里没有需要解决的问题。SMTP服务器以后发生的事情超出范围。您需要查看SMTP服务器和收件人的服务器，以了解他们可能在处理邮件。也许它在一个垃圾文件夹里，或者它正在被隔离。这与您的代码无关，因此您需要首先找出实际问题所在；你的邮件可能是垃圾邮件。转到并从那里获取电子邮件地址（每个页面访问都是唯一的），然后用您的程序发送邮件，等待一段时间，然后从网站收集您的结果。它会告诉你你的电子邮件看起来有多像垃圾邮件，也会给你一些方法来测试你的邮件是否真的离开了你选择的发送服务器。你甚至可能会发现这取决于接收者的环境，然后取决于电子邮件甚至没有到达垃圾邮件的附件的性质。许多邮件清洗器会根据附件大小或类型简单地丢弃电子邮件。如果你在没有附件的情况下这样做，它能通过吗？