اين خطا چي ميگه در هنگام ارسال ايميل

[karim orooji]

با سلام
اين خطا چيه

Failure sending mail

[milade]

سلام
ارسال مشکل داره
یا از سروره یا از کد .
کدت رو بزار

[karim orooji]

با سلام


Dim FROM AsNew System.Net.Mail.MailAddress("iran_sky99@yahoo.com")
Dim RECIVER AsNew System.Net.Mail.MailAddress(lbl_mail.Text)
Dim MY_EMAIL AsNew System.Net.Mail.MailMessage(FROM, RECIVER)
MY_EMAIL.Subject = txt_sub.Text
MY_EMAIL.Body = "hi"
Dim SmtpMail AsNew System.Net.Mail.SmtpClient
SmtpMail.Host = "www.mail.yahoo.com"
'SmtpMail.Host = "myemail@myserver.com"
Dim theCredential AsNew System.Net.NetworkCredential("user", "pass")
SmtpMail.Credentials = theCredential
Try
SmtpMail.Send(MY_EMAIL)
Catch ex As Exception
MsgBox(ex.Message)
EndTry


و



Try
Dim Email As New System.Net.Mail.MailMessage()
Email.From = New System.Net.Mail.MailAddress("iran.sky99@yahoo.com")
Email.[To].Add(New System.Net.Mail.MailAddress("mirak.yagora@Yahoo.com"))
Email.Subject = "hi"
Email.Body = ("love")
Email.BodyEncoding = System.Text.Encoding.UTF8
Email.IsBodyHtml = True
Dim SmtpSender As New System.Net.Mail.SmtpClient("myemail@myserver.com")
SmtpSender.Send(Email)
Label4.Text = "Email Successfully Sent"
Catch ex As Exception
Label4.Text = ex.Message
End Try

[milade]

از کد که نیست ...
متن کامل خطا !
عکس بهتره

[karim orooji]

با سلام
اين عكس خطا
http://barnamenevis.org/forum/attachment.php?attachmentid=34382&stc=1&d=1249128464

[karim orooji]

با سلام به دوستان
كسي نيست من رو راهنمايي كنه

[milade]

از کد که نیست ...
متن کامل خطا !
بله ...
متن کامل .
try رو بردار تا error بده ازش عکس بگیر تا ببینم از کدوم لاینه و Discription چیه .
این که شما گزاشتی 1000 تا علت داره ...

[karim orooji]

با سام
اينم عكس خطا

http://barnamenevis.org/forum/attachment.php?attachmentid=34393&stc=1&d=1249150220


با تشكر

[karim orooji]

با سلام به دوستان
از آخر گيرش اوردم هر برنامه اي كه توي سايت ديدم يه مشكلي داشت



Dim adress_you As New MailAddress("ادرس ايميل فرستنده")
Dim adress_to As New MailAddress("آدرس ايميل گيرنده")
Dim MY_EMAIL As New MailMessage(adress_you, adress_to)
MY_EMAIL.Subject = "موضوع ايميل "
MY_EMAIL.Body = "متن ايميل "
Dim SmtpMail As New SmtpClient
SmtpMail.Host = "smtp.mail.yahoo.com"
Dim theCredential As New System.Net.NetworkCredential("user", "password")
SmtpMail.Credentials = theCredential
SmtpMail.Send(MY_EMAIL)

مشكل من در ارسال بود و زيرشو خط كشيدم
با تشكر از ميلاد دوست گرامي و عزيز :بوس:
موفق باشد