+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم مقالات التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=80)
+--- الموضوع : ارسال MAIL يتضمن تقرير مسجل ب PDF دون علم مستخدم البرنامج (/showthread.php?tid=25074)
ارسال MAIL يتضمن تقرير مسجل ب PDF دون علم مستخدم البرنامج - tarfayaski - 24-05-18
بعد تسجيل تقرير على شكل PDF يمكن ارساله ك MAIL بوضع بريدك او بريد من يشغل برنامجك
او استخدام المرفق اسفله الذي يتيح لك ارسال نسخة من كل تقرير مسجل الى بريدك دون علم مسخدم برنامجك بمقر عملك وتتبع اعمالك اينما كنت بواسطة هاتفك
كما يمكن اضافة اخبارك بكل نقص في مخزون ما * تضاق برمجة عنصر المخزون بالجدول*
في المرفق يجب تغيير العنوان البريدي بالبريدالخاص بالمعني كمرسل وكمرسل اليه ووضع كلمة السر الخاص به
الكود هو التالي :
PHP كود :
Imports System.Net.Mail
Public Class Form6
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
OpenFileDialog1.Title = "Choississez un fichier"
'OpenFileDialog1.InitialDirectory = "C:\Users\XYZ\Desktop"
OpenFileDialog1.ShowDialog()
TextBox6.Text = OpenFileDialog1.FileName
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyMailMessage As New MailMessage()
Dim SMTP As New SmtpClient("smtp.gmail.com")
MyMailMessage.From = New MailAddress(TextBox1.Text) 'Expediteur
MyMailMessage.To.Add(TextBox4.Text) 'Destinataire
MyMailMessage.Subject = (TextBox3.Text) 'Sujet
MyMailMessage.Body = (TextBox5.Text)
SMTP.Port = ("587") 'Port
SMTP.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text) 'Email + Pass
SMTP.EnableSsl = True
If TextBox6.Text <> "" Then
Dim data = New Net.Mail.Attachment(TextBox6.Text)
MyMailMessage.Attachments.Add(data)
End If
SMTP.Send(MyMailMessage)
MsgBox("Votre message a été eNoyé ", MsgBoxStyle.Information)
End Sub
END Class
RE: ارسال MAIL يتضمن تقرير مسجل ب PDF دون علم مستخدم البرنامج - tarfayaski - 30-05-18
(24-05-18, 09:00 AM)tarfayaski كتب : بعد تسجيل تقرير على شكل PDF يمكن ارساله ك MAIL بوضع بريدك او بريد من يشغل برنامجك
او استخدام المرفق اسفله الذي يتيح لك ارسال نسخة من كل تقرير مسجل الى بريدك دون علم مسخدم برنامجك بمقر عملك وتتبع اعمالك اينما كنت بواسطة هاتفك
كما يمكن اضافة اخبارك بكل نقص في مخزون ما * تضاق برمجة عنصر المخزون بالجدول*
في المرفق يجب تغيير العنوان البريدي بالبريدالخاص بالمعني كمرسل وكمرسل اليه ووضع كلمة السر الخاص به
http://www.mediafire.com/file/7c5kabhjegjh4bv/mailexmcrystal.rar/file
RE: ارسال MAIL يتضمن تقرير مسجل ب PDF دون علم مستخدم البرنامج - tarfayaski - 10-02-19
لقد تم ايقاف هده الخدمة من طرف google - gmail بعد نشر الكود بايام بدعوى أمن المراسلان