لطفا این کد رو چک کنید ( کد ارسال ایمیل )
سلام .. من میخوام یه فرم ارتباط داشته باشم .. این کد رو که به asp. هست رو گیر آوردم ... چک کنید ببینید درسته ؟
اگه درسته میشه یه فایل بدید که این کد رو بهش مربوط کنم؟ یعنی بزارم رو سایت خودش کار کنه؟
مرسی
Public Function SendEmail (Byref FromAddres,Byref ToAddres,Byref Subject,Byref Body)
dim mailobj
Set mailobj = Server.CreateObject("Persits.MailSender")
With mailobj
.Host = "xxxx.com"
.Username = "XXXX@XXXX.com"
.Password = "XXXXX"
.IsHTML = true
.From = FromAddres
.AddAddress ToAddres
.Subject = Subject
.Body = Body
.send
End With
Set mailobj = Nothing
end function
