HASHED99

أخواني الكرام وجدت برنامج أسمه مايكروسوفت برديوزر يقوم بدمج ملفات الفيديو و الصوت و ملفات البور بوينت وإخراجها على شكل ملفات فيديو أو HTML قابلة للنشر على الأنترنت لكني للأسف الشديد لم أعرف كيفية استخدامه . أرجو من الإخوة الذين لديهم فكرة حول الموضوع إفادتي وبارك الله في الجميع

أينكم يامشرفينا الكرام أين مهاراتكم البرمجية ألا يوجد لهذا التحدي أحد....؟ للرفع

يا عمالقة البرمجة ألا يوجد فكرة لتجاوز هذا التحدي البسيط الذي لا يقف عائقاً أمام مهارتكم ....؟

لدي برنامج يحتوي على مهام مختلفة للموظفين مثل سفر ، غياب ، إجازة ، دورة تدريبية كيف يمكن أن أفتح النموذج الفرعي عندما أحدد خيار سفر مثلاً على القيود الخاصة بالسفر بالنسبة للموظف المحدد وعندما أنقر على خيار غياب يظهر السجلات الخاصة بالغيابات وهكذا emp2006.rar

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

لأهل الخبرة في الأكسس رأيت في إحدى المشاركات تحديد عدد السجلات في الFORM لكن الطريقة لا تنفع في حالة التقارير حيث لدي استعلام يحتوي على عدد من السجلات وعند تصميم تقرير أريد أن أحد عدد 8سجلات تظهر في كل صفحة فكيف يمكن ذلك

تجدون المثال بعد التعديل هنا http://www.officena.net/ib/index.php?act=A...pe=post&id=2698

للرفع

للرفع

للرفع

أعتقد انني وصلت إلى جزء كبير من الحل عبر الاستفادة من فكرة أخي الفيلسوف وذلك بوضع الكود التالي في حدث بعد التحديث لحقل اسم الشهر Private Sub month_name_AfterUpdate() DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Me.month_code = DLookup("[month_CODE]", "[month]", "[month_NAME]=[forms]![emp]![month_name]") DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 End Sub وإزالة المفاتيح الأساسية لجدول الموظفين EMP

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

للرفع

تفضل أخي الكريم هذا الكود تعمل في زر أوامر Dim WordObj As Object Set WordObj = CreateObject("WORD.Application") WordObj.Documents.Open "C:\DOC1.DOC" WordObj.PrintOut Background:=False WordObj.Quit Set WordObj = Nothing مع ملاحظة مسار الملف المراد طباعته WordObj.Documents.Open "C:\DOC1.DOC"

أخي الحبيب تم إرفاق الملف على هذا الرابط http://www.officena.net/ib/index.php?act=A...pe=post&id=2675