LotusDream
شنبه 23 بهمن 1389, 21:52 عصر
:متعجب:
Dim FROM As New MailAddress("lotus-dream-co.ir@lotus-dream-co.ir")
Dim RECIVER As New MailAddress("hosein.heidary.63@gmail.com")
Dim MY_EMAIL As New MailMessage(FROM, RECIVER)
MY_EMAIL.Subject = "THIS IS A TEST 4"
MY_EMAIL.Body = " HI, This Email Sent With VB.NET 2005"
Dim MY_ATTACH As New Attachment("c:\slr_soft.txt")
MY_EMAIL.Attachments.Add(MY_ATTACH)
Dim SmtpMail As New SmtpClient
SmtpMail.Host = "mail.lotus-dream-co.ir"
Dim theCredential As New System.Net.NetworkCredential("lotus-dream-co.ir", "pass")
SmtpMail.Credentials = theCredential
SmtpMail.Send(MY_EMAIL)
سلام من اینکد رو که توی سایت یکی از دوستان گذاشته بودبرداشتم
و توی برنامه گذاشتم
تمام تنظیمات از جمله سرور و ... رو انجام دادم
ازچندرفرنس دیگه هم سرچ کردم ولی این ارور رو میده .
Mailbox unavailable. The server response was: 2.144.91.133 does not pass SPF requirements for domain lotus-dream-co.ir@lotus-dream-co.ir
Dim FROM As New MailAddress("lotus-dream-co.ir@lotus-dream-co.ir")
Dim RECIVER As New MailAddress("hosein.heidary.63@gmail.com")
Dim MY_EMAIL As New MailMessage(FROM, RECIVER)
MY_EMAIL.Subject = "THIS IS A TEST 4"
MY_EMAIL.Body = " HI, This Email Sent With VB.NET 2005"
Dim MY_ATTACH As New Attachment("c:\slr_soft.txt")
MY_EMAIL.Attachments.Add(MY_ATTACH)
Dim SmtpMail As New SmtpClient
SmtpMail.Host = "mail.lotus-dream-co.ir"
Dim theCredential As New System.Net.NetworkCredential("lotus-dream-co.ir", "pass")
SmtpMail.Credentials = theCredential
SmtpMail.Send(MY_EMAIL)
سلام من اینکد رو که توی سایت یکی از دوستان گذاشته بودبرداشتم
و توی برنامه گذاشتم
تمام تنظیمات از جمله سرور و ... رو انجام دادم
ازچندرفرنس دیگه هم سرچ کردم ولی این ارور رو میده .
Mailbox unavailable. The server response was: 2.144.91.133 does not pass SPF requirements for domain lotus-dream-co.ir@lotus-dream-co.ir