منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] استفسار - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] استفسار (/showthread.php?tid=48118)

استفسار - toe - 26-03-24

كيفية ارسال ايميل يالفيجوال
سواء على gmail
yahoo
hotmail
مع الشكر

RE: استفسار - mrfenix93 - 26-03-24

تقصد ارسال من
gmail
yahoo
hotmail

RE: استفسار - mrfenix93 - 26-03-24

كود :
Imports System.Net.Mail


كود :
Dim SmtpServer As New SmtpClient()
Dim mail As New MailMessage()
SmtpServer.EnableSsl = True
SmtpServer.Credentials = New Net.NetworkCredential("YourMail In gmail", "Your App Password No Mail Password")
SmtpServer.Port = "587"
SmtpServer.Host = "smtp.gmail.com"
mail = New MailMessage()
mail.From = New MailAddress("Your Mail")
mail.To.Add("Mail Need To Send")
mail.Subject = "Subject"
mail.Body = "Body"
SmtpServer.Send(mail)