mohi_ka2
سه شنبه 28 آبان 1387, 08:47 صبح
با سلام به دوستان برنامه نویس.
من کد زیر رو برای فرستادن ایمیل در ASP.NET(VB) استفاده کردم:
Sub btnSendEmail_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSendEmail.Click
Try
Dim oMailMessage As New System.Net.Mail.MailMessage
oMailMessage.IsBodyHtml = True
oMailMessage.Priority = System.Net.Mail.MailPriority.Normal
oMailMessage.DeliveryNotificationOptions = System.Net.Mail.DeliveryNotificationOptions.Never
Dim oMailAddress As System.Net.Mail.MailAddress
oMailAddress = New System.Net.Mail.MailAddress(txtEmail.Text, txtFullName.Text, System.Text.Encoding.UTF8)
oMailMessage.From = oMailAddress
oMailMessage.Sender = oMailAddress
oMailMessage.ReplyTo = oMailAddress
oMailAddress = New System.Net.Mail.MailAddress("dttestmail@gmail.com", "me", System.Text.Encoding.UTF8)
oMailMessage.To.Add(oMailAddress)
'oMailMessage.CC
'oMailMessage.Bcc
oMailMessage.SubjectEncoding = System.Text.Encoding.UTF8
oMailMessage.Subject = txtSubject.Text
oMailMessage.BodyEncoding = System.Text.Encoding.UTF8
oMailMessage.Body = txtBody.Text
Dim strPath As String = Server.MapPath("~/Banners")
Dim strPathName As String = strPath '+ @"\Banner1.jpg";
'///////
Dim oAttachment As New System.Net.Mail.Attachment(strPathName)
oMailMessage.Attachments.Add(oAttachment)
Dim oSmtpClient As New System.Net.Mail.SmtpClient
oSmtpClient.EnableSsl = True
oSmtpClient.Timeout = 100000
oSmtpClient.Send(oMailMessage)
Response.Write("Dear " + txtFullName.Text + "! Massage send Succesfully")
Catch ex As Exception
Response.Write("Error: " + ex.Message)
End Try
txtBody.Text = " "
txtEmail.Text = " "
txtFullName.Text = " "
txtSubject.Text = " "
End Sub
اما خطای زیر رو دریافت می کنم :
Error: The SMTP host was not specified.
می شه راهنماییم کنید ؟؟؟:افسرده::ناراحت: هر چه زودتر بهتر:چشمک:
من کد زیر رو برای فرستادن ایمیل در ASP.NET(VB) استفاده کردم:
Sub btnSendEmail_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSendEmail.Click
Try
Dim oMailMessage As New System.Net.Mail.MailMessage
oMailMessage.IsBodyHtml = True
oMailMessage.Priority = System.Net.Mail.MailPriority.Normal
oMailMessage.DeliveryNotificationOptions = System.Net.Mail.DeliveryNotificationOptions.Never
Dim oMailAddress As System.Net.Mail.MailAddress
oMailAddress = New System.Net.Mail.MailAddress(txtEmail.Text, txtFullName.Text, System.Text.Encoding.UTF8)
oMailMessage.From = oMailAddress
oMailMessage.Sender = oMailAddress
oMailMessage.ReplyTo = oMailAddress
oMailAddress = New System.Net.Mail.MailAddress("dttestmail@gmail.com", "me", System.Text.Encoding.UTF8)
oMailMessage.To.Add(oMailAddress)
'oMailMessage.CC
'oMailMessage.Bcc
oMailMessage.SubjectEncoding = System.Text.Encoding.UTF8
oMailMessage.Subject = txtSubject.Text
oMailMessage.BodyEncoding = System.Text.Encoding.UTF8
oMailMessage.Body = txtBody.Text
Dim strPath As String = Server.MapPath("~/Banners")
Dim strPathName As String = strPath '+ @"\Banner1.jpg";
'///////
Dim oAttachment As New System.Net.Mail.Attachment(strPathName)
oMailMessage.Attachments.Add(oAttachment)
Dim oSmtpClient As New System.Net.Mail.SmtpClient
oSmtpClient.EnableSsl = True
oSmtpClient.Timeout = 100000
oSmtpClient.Send(oMailMessage)
Response.Write("Dear " + txtFullName.Text + "! Massage send Succesfully")
Catch ex As Exception
Response.Write("Error: " + ex.Message)
End Try
txtBody.Text = " "
txtEmail.Text = " "
txtFullName.Text = " "
txtSubject.Text = " "
End Sub
اما خطای زیر رو دریافت می کنم :
Error: The SMTP host was not specified.
می شه راهنماییم کنید ؟؟؟:افسرده::ناراحت: هر چه زودتر بهتر:چشمک: