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

كيفية إرسال السجل الحالي عبر الآوت لوك؟؟؟؟

مغلق
بدأه rgory في 16 أغسطس 2006 · 14 رد · 957 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الأخوان الكرام...

عندي نموذج يعرض عدد من السجلات.... أريد إرسال سجل معين عندما يكون معروض على النموذج عبر برنامج الآوتلوك....

لقد أستخدمت خاصية البريد الموجوده في الأكسس... وأكتشفت بأنها تقوم بإرسال جميع السجلات!! وهذا مالا أرغب فيه...

أريد أرسال السجل الحالي فقط المعروض على النموذج....

الرجاء المساعده .... ولكم تحياتي.

#2

السلام عليكم

شوف هذا الطريقة

من هنا

#3

الأخ مشاكس دبي... أشكرك على الرد ولكن الوصله التي وضعتها تتكلم عن بريد خاص بالأكسس....

أنا أريد أستعمال الآوتلوك الموجود في الأوفيس.... وكما ذكرت سابقاً أريد أرسال السجل الحالي فقط...

أرجوا من أحد الأخوان التكرم بالأجابه....

مره أخرى أشكرك يامشاكس دبي....

#4

اخي الفاضل

سؤالك غير واضح

كيف تريد ارسال السجل الحالي للـ Outlook هل تريده يكون في تقرير

ام ملف نصي

او ما هي الطريقه التي تريد الارسال بها

كما تعلم ان برنامج الاوتلوك ليس كبرنامج الوورد او الاكسيل فهو مختلف

حسنا من ان اجل ان اختصر الاجابة عليك

ضع مثال لك في نموذج واخبرنا كبف تريد ان يكون الارسال حتى ندلك على الطريقة الصحيحة

#5

الأخت الفاضله زهره......

ربما لم أشرح السؤال بمافيه الكفايه ..... في الحقيقه عندي تقرير جاهز يعرض السجل الحالي ويطبعه .... أي يطبع سجل واحد ولقد ساعدتيني ياأخت زهره في هذا ولكي جزبل الشكر والعرفان لأننا أستفدنا منك الكثير......

الأن أريد أن أرسل نفس التقرير الذي عملته بس بدل ماأرسله للطابعه .... أرسله للبريد..... ويفترض أن يرسل البرنامج تقرير به سجل واحد.....والذي كان معروض مسبقاً على النموذج...........أرجوا أنني وفقت في أيصال الفكره...................

أنتظر الرد ................ وشكراً لكم.............................

#6

اخي الفاضل

ما نوع التقرير الذي تريد ارساله للاوتلوك لان المخرجات كثيره فهل تريد على شكل

صفحة انترنت HTML

ام تريده على شكل لقطه SnapShot

ام تريده على شكل ملف وورد Word doc

حتى يتم معالجته بالكود

ملاحظة :

افضل طريقه لعرض التقرير هي بواسطة لقطه SnapShot

#7

نعم أريد الآوتلوك يقوم بإرفاق الملف على شكل WORD.DOC لأن الشخص الذي يقوم بفتح الملف المرسل إليه يكون على شبكه محليه(LAN)....

أشكرك أخت زهره.............

#8

اخي الفاضل

هذا هو البرنامج بكامل المواصفات المطلوبه

وضعت لك زرين لاظهار التقرير مره سيكون الاخراج على شكل SnapShot اي لقطه من التقرير وستلاحظ ان العرض فيها ممتاز كما هو في التقرير ولكنك لا تستطيع التغيير او التعديل عليه .

الزر الاخر لاخراج التقرير على شكل ملف وورد ولاحظ انك عندما تفتح ملف الوورد للمرة الاولي ستلاحظ ان الحقول مجمعه مع بعض وهذا ناتج على ان العرض لديك في الوورد هو على تخطيط القراءة وبإمكانك تعديله من برنامج الوورد بالذهاب الى اشرطة الادوات ثم اختيار عرض ثم اختيار تخطيط الطباعة والمفروض انه هو الافتراضي لديك في برنامج الوورد

SendReportToOutlook.rar

اختكم

زهره

#9

في الحقيقه الملف المرفق يعمل بشكل جيد لكن عند تجربته على قاعدة البيانات التي عندي يقوم الكود بإرسال جميع السجلات وهذه المشكله مع العلم أنني ........ قمت بتغيير اللازم في الكود..... وعندي في الجدول إندكس ويتم الربط من خلاله وتأكدت من أنه معلم كأندكس في الجدول لكن لم تجدي محاولاتي نفعاً البته!!!!!!!!!!

ياترى ماهو السبب ؟؟؟؟؟؟؟؟

#10

لا يوجد مشكلة

ضع ملفك هنا وسنقوم بالتعديل

#11

لقد وجدت المشكله وسببها ولكن لاأعرف حلاً لها.......................

المشكله لو كان المرفق الذي بالأعلى كالتالي......

Dim stLinkCriteria As String

stLinkCriteria = "[iD]=" & "'" & Me![iD] & "'"

DoCmd.OpenReport "R1", acViewPreview, , stLinkCriteria

DoCmd.SendObject acReport, "R1", "RichTextFormat(*.rtf)", "", "", "", "", "", False, ""

نلاحظ أن الحقل ID عباره عن autonumber ولكن ال Name عباره عن text وأنا أريد الربط يتم عن ظريق ID وليس أي حقل آخر....لأن هذ هو ا الحقل الوحيد المتميز في قاعدة البيانات التي عندي ... أي أن جميع الحقول الأخرى قد تتكرر............ وإذا تتكرر الحقل معناه أن البرنامج سوف يرسل البريد بجميع المتكررات وهذا مالا أريد ......

الأخت زهره الرجاء التعديل على المرفق الذي وضعتيه في ردك بالأعلى ولكن هذه المره بأستخدام ال ID وليس ال Name .....مع الحفاظ على ال ID كأوتونمبر وليس أي نوع اخر.......

شكراً للمساعده اللامتناهيه منك ياأخت زهره... الله يوفقك لما يحبه ويرضاه...........

#13

الأخت زهره أدامها الله وحفظها مرجعاً لايستغنى عنه في هذا المنتدى......

لقد وجدت المشكله وهذا كود المرفق الذي بالأعلى:

Dim stLinkCriteria As String

stLinkCriteria = "[Name]=" & "'" & Me![Name] & "'"

DoCmd.OpenReport "rptEMP", acViewPreview, , stLinkCriteria

DoCmd.SendObject acReport, "rptEMP", "RichTextFormat(*.rtf)", "", "", "", "", "", False, ""

نلاحظ أن الربط هنا يتم عن طريق الName وهذه مشكلتي ... حيث أن قاعدة بياناتي بها جدول وبه الأندكس عباره عن Autonumber ولقد عملت الربط عن طريقه وهذا ماسبب لي المشكله بظهور رساله data type ......الآن لايمكنني الربط إلا عن طريق Autonumber حيث أن قاعدة البيانات مبنيه على هذا الرقم التسلسلي ... ,إن أستخدمت غيره فلن يكون هناك تميز بالسجل بل سيكون هناك تكرار في أي عنصر آخر.....

*** أرجوا منك ياأخت زهره التعديل على الملف الذي بالأعلى ووضع اللينك عن طريق ال ID بدل ال Name.... وإن أشتغل الإرسال تمام فهذا هو مرادي ولكي جزيل الشكر والعرفان..............

#14

وضعت لك التعديل اخي الكريم قبل ان تكتب مشاركتك الاخيره

#15

وماذا عساي أن أقول ياأخت زهره................

شهاده لوجه الله.........................

أنتي إنسانه مبدعه...............متألقه................. متفانيه............

أنتي لست مشرفه بل مستشارة جميع منتديات الأكسس العربيه قاطبه ............... هذه ليست مجامله بل الحقيقه التي تسطرها يداك في هذا المنتدى..........

أخيراً أشكر لك وقتك الذي قضيتيه لكي تعلمي إنسان معلومه جاهزه على طبق من ذهب............

وفقك الله وزادك من فيض علمه والسلام..........

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…