saffar قام بنشر مايو 12, 2021 مشاركة قام بنشر مايو 12, 2021 السلام عليكم كيف ابعث تقرير لجدول للطالب عن طريق الايميل المخزن في جدول البيانات email.accdb رابط هذا التعليق شارك More sharing options...
SEMO.Pa3x قام بنشر مايو 12, 2021 مشاركة قام بنشر مايو 12, 2021 عليكم السلام. Sub sendOutlookEmail() Dim oApp As Outlook.Application Dim oMail As MailItem Set oApp = CreateObject("Outlook.application") Set oMail = oApp.CreateItem(olMailItem) oMail.Body = "Body of the email" oMail.Subject = "Test Subject" oMail.To = "Someone@somewhere.com" oMail.Send Set oMail = Nothing Set oApp = Nothing End Sub 2 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 14, 2021 الكاتب مشاركة قام بنشر مايو 14, 2021 كل عام وانت بخير وصحة وعافية دكتور المطلوب من البرنامج عند الارسال ان يقوم بارسال على سبيل المثال: جدول الطالب (حسين ) الى ايميله (hussain@hussain.com) المسجل في جدول البيانات جدول الطالب (علي ) الى ايميله (ali@ali.com) المسجل في جدول البيانات الطالب الثاني على ايميلة الخاص وهكذا 1-ان يقول بارسال الجداول كلها لجميع الطلبة مره واحد 2-او اختيار طالب او عدد معين من الطالبة وارسال ايميلات لهم بالجداول رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر مايو 15, 2021 مشاركة قام بنشر مايو 15, 2021 تفضل التعديل email.1.accdb 2 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 15, 2021 الكاتب مشاركة قام بنشر مايو 15, 2021 سلمت يداك د.كاف كتبت في الاعدادات الايميل والباسورد لكن تظهر لي رسالة خطأ رابط هذا التعليق شارك More sharing options...
ناقل قام بنشر مايو 15, 2021 مشاركة قام بنشر مايو 15, 2021 ادخل على حسابك من خلال الرابط التالي وفعل التطبيقات الاقل امانا ويعمل معك https://www.google.com/settings/security/lesssecureapps 2 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 15, 2021 الكاتب مشاركة قام بنشر مايو 15, 2021 الحروف تظهر بشكل علامة استفهام رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر مايو 16, 2021 مشاركة قام بنشر مايو 16, 2021 تفضل هذا التعديل تم تعديل الرسالة الى تنسيق HTML ة تم اضافة اللغة العربية للشفرة email.1.zip 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 16, 2021 الكاتب مشاركة قام بنشر مايو 16, 2021 زاد الله من فضلك لكن لا زالك اللغة مشقرة هل الخلل في اعدادات جهازي ؟ رابط هذا التعليق شارك More sharing options...
ناقل قام بنشر مايو 16, 2021 مشاركة قام بنشر مايو 16, 2021 12 ساعات مضت, saffar said: زاد الله من فضلك لكن لا زالك اللغة مشقرة هل الخلل في اعدادات جهازي ؟ ابحث عن هذا With imsg With imsg .to = StudentEmaile .from = DLookup("settingsUsername", "settings", "settingNO=1") .Subject = "ÔåÇÏÉ" .HTMLBody = Mymsg .AddAttachment (MyAttachment) Set .Configuration = iconf .Send End With واستبدله بهذا ..... With imsg .BodyPart.Charset = "UTF-8" .to = StudentEmaile .from = DLookup("settingsUsername", "settings", "settingNO=1") .Subject = "ÔåÇÏÉ" .HTMLBody = Mymsg .AddAttachment (MyAttachment) Set .Configuration = iconf .Send End With تم اضافة هذا السطر .BodyPart.Charset = "UTF-8" 2 1 رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر مايو 17, 2021 مشاركة قام بنشر مايو 17, 2021 اخي قم بتغيير اللغة للإعدادات الاقليمية كما في الصورة ادناه و النتجية 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 18, 2021 الكاتب مشاركة قام بنشر مايو 18, 2021 سلمت ايديكم اساتذتي الكرام البرنامج شغال ممتاز اعرف ان قوانين المنتدى لكل موضوع سؤال واحد لكن لو احببت ان ضيف بعد الاضافات على البرنامج هل يجل ان افتح موضوع جديد وارفق نفس الملف او يمكنني ان اواصل في نفس هذا الموضوع ؟ لكم مني جزيل الشكر رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر مايو 18, 2021 مشاركة قام بنشر مايو 18, 2021 اعمل موضوع جديد ، وضع فيه رابط/الاشارة الى هذا الموضوع ، ثم ارجع الى هذا الموضوع ، وضع فيه رابط/الاشارة الى الموضوع الجديد ، بهذه الطريقة الجميع يعرف 🙂 جعفر 1 رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر مايو 18, 2021 مشاركة قام بنشر مايو 18, 2021 (معدل) اخي العزيز @saffar لدي سؤال حول برنامجك لو سمحت؟ عند التعامل مع البرنامج * هل يمكن ارسال رسالة نصية لكل طالب بدل ملف pdf عن طريق البرنامج ام لا؟ وشكرا لك تم تعديل مايو 18, 2021 بواسطه Ahmed_J رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 18, 2021 الكاتب مشاركة قام بنشر مايو 18, 2021 مرحبا اخي العزيز Ahmed هدفي من البرنامج ان اجعل منه وسيله للتواصل بشتى الطرق مثل ارسال رسائل بالايميل - رسائل نصية - الواتس اب والاخوه ما شاء الله ساعدوني في المطلب الاول وسوف افتح موضوع جديد للرسائل النصية رابط هذا التعليق شارك More sharing options...
saffar قام بنشر مايو 19, 2021 الكاتب مشاركة قام بنشر مايو 19, 2021 1 رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر مايو 19, 2021 مشاركة قام بنشر مايو 19, 2021 السلام عليكم شكرا لك وبارك الله فيك رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 20, 2022 مشاركة قام بنشر نوفمبر 20, 2022 في 16/5/2021 at 07:32, د.كاف يار said: تفضل هذا التعديل تم تعديل الرسالة الى تنسيق HTML ة تم اضافة اللغة العربية للشفرة email.1.zip 96.11 kB · 38 downloads السلام عليكم انا متبابع الموضوع الشيق هذا ولكن عند الارسال يعطى لى هذه الرسالة ان الخادم غير متوفر ارجو الافادة حيث ان استغمل افيس 2007 ويندوز 7 the messaje could not be sent to the smtp server. the transport error code was 0*800402170 the server response wasnot available رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان