مشکل در ارسال ایمیل

[mostafa612003]

سلام
من با این کد قبلا می توانستم ایمیل بفرستم
الان هم پیغام خطایی به من نمایش نمی دهد ولی ایمیل را هم نمی فرستد

فکر می کنید مشکل از چیست؟
متشکرم

yes="2393Z.JPG"

Set myMail=Server.CreateObject("CDO.Message")

myMail.Subject=Request.Form("Subject")
myMail.From="mi@yahoo.com"
myMail.To=Request.Form("email")
myMail.TextBody=Request.Form("Body")
'myMail.htmlsubject=Request.Form("Subject")
myMail.AddAttachment Server.MapPath(yes)
myMail.BodyPart.Charset = "UTF-8"
myMail.TextBodyPart.Charset = "UTF-8"
myMail.Send
set myMail=nothing
Response.Write "Mail had been sent"

[razeghi_loved]

اگر قبلا می نونستی الان نمی تونی با سرورت تماس بگیر مشکل از اونهاست البته من کدت را نخوندی اما این مشکل در چند تا از هاست ها دیدم

[RealDream]

شما احتمالا از سروری استفاده می کنید که اخیرا وب سرور و میل سرورش رو عوض کرده و همین باعث شده تا میل شما دیگه ارسال نشه . من خودم این مشکل رو دارم از پارس وب استفاده می کنم