الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

Send E_mail With Outlook

مغلق
بدأه Rachid Abdallah في 26 مارس 2004 · 1 رد · 603 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

Al salam

Sorry for writing in English but i don't have Arabic in my computer

i know how to send an E_mail using outlook in VB but it is not working

when i try the program!!!!!!!!

please Help

==================================

#2

الكود التالى يسمح بهذا ولكن بعد ان تضع له مرجع من قائمه project اختر reference ثم اختر outlook type library

Option Explicit

Dim App As Object
Dim Itm As Object
'create an instance form outlook

Set App = CreateObject("Outlook.Application")
'create create default Outlook items. 
Set Itm = App.CreateItem(0)
With Itm
   .Subject = "sending email"
   .To = "gates@microsoft.com"
   .Body = "visit the best developers at www.arabteam2000.com"
   .Send
End With

تم تعديل هذه المشاركة بواسطة طارق إبراهيم في 28 مارس 2004 في 09:42

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

هذا الموضوع مغلق.

مواضيع مشابهة