PDA

View Full Version : فرستادن ایمیل از طریق برنامه نویسی



Reza Safa
پنج شنبه 27 دی 1386, 07:02 صبح
به کمک این کد میتونید برنامهای بسازید که ایمل بفرستد

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

ممنون میشم



Imports System.Net.Mail
Public Sub SendEmail()
Dim client As New SmtpClient()
Dim sendTo As New MailAddress("sendToAccount@gmail.com")
Dim message As New MailMessage()
message.To.Add(sendTo)
message.IsBodyHtml = True
message.Subject = "HI"
message.Body = "Got it!!"
' Use the same account in app.config to authenticate.
Dim basicAuthenticationInfo As New System.Net.NetworkCredential("yourAccount@gmail.com", "YourPassword")
client.UseDefaultCredentials = False
client.Credentials = basicAuthenticationInfo
client.EnableSsl = True
Try
client.Send(message)
Console.WriteLine("SUCCESS")
Catch ex As Exception
Console.WriteLine("SEND FAIL")
End Try
End Sub
باید در فایل زیر تغییر ایجاد شود
در داخل فایل app.config
متن زیر را قرار دهید
و انگونه ان فایل را تغییر دهید