حمدى الظابط

موجود فى اخر ملف مرفق فى هذا الموضوع

وجود فى ملف هذا الموضوع

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

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

للرفع

للرفع

اارفع

للرفع

4 ساعات (معدل) السلام عليكم تمهيد للموضوع النموذج الموجود فى الملف عند الضغط على زر شهادة أكتوبر بريسل الشهادة تلقائى pdf على حسب Id الخاص لكل طالب ويحفظ الشهادات فى ملف على الدسك توب وليس هناك اى مشكلة نهائي فى ذلك والمفتاح شهادة أكتوبر يعمل بكفاءة الموضوع ان هناك عددت تقارير ترسل على مدى العام الدراسى فلابد من ربط هذه التقارير بالكود الموجود للأرسال زر رقم 15 باسم شهادة أكتوبر التفاصيل هناك جدول باسم نصف العام وجدول باسم اخر العام مدرج فيهم أسماء تقارير افتراضية كمثال للموضوع وفى النموذج مربع نص بعنوان نصف العام وأخر بعنوان اخر العام المطلوب اريد عند اختيار اى تقرير من احدى مربعات النص الموجودة بمجرد الضغط عليها وبعد قراءة رسالة التنبيه الموجودة واختيار( نعم ) يتم ارسال الشهادة لكل طالب حسب رقم ID الخاص بكل طالب كما موجود فى زر شهادة شهر اكتوبر اذا المطلوب هو ربط مربع النص بكود الارسال الموجود بالنموذج مع الالتزام بقواعد الارسال وهى ارسال الشهادة للسجل المفتوح فى النموذج فقط وكل الشكر والاحترام للجميع تجرية.rar

السلام عليكم تمهيد للموضوع النموذج الموجود فى الملف عند الضغط على زر شهادة أكتوبر بريسل الشهادة تلقائى pdf على حسب Id الخاص لكل طالب ويحفظ الشهادات فى ملف على الدسك توب وليس هناك اى مشكلة نهائي فى ذلك والمفتاح شهادة أكتوبر يعمل بكفاءة الموضوع ان هناك عددت تقارير ترسل على مدى العام الدراسى فلابد من ربط هذه التقارير بالكود الموجود للأرسال زر رقم 15 باسم شهادة أكتوبر التفاصيل هناك جدول باسم نصف العام وجدول باسم اخر العام مدرج فيهم أسماء تقارير افتراضية كمثال للموضوع وفى النموذج مربع نص بعنوان نصف العام وأخر بعنوان اخر العام المطلوب اريد عند اختيار اى تقرير من احدى مربعات النص الموجودة بمجرد الضغط عليها وبعد قراءة رسالة التنبيه الموجودة واختيار( نعم ) يتم ارسال الشهادة لكل طالب حسب رقم ID الخاص بكل طالب كما موجود فى زر شهادة شهر اكتوبر اذا المطلوب هو ربط مربع النص بكود الارسال الموجود بالنموذج مع الالتزام بقواعد الارسال وهى ارسال الشهادة للسجل المفتوح فى النموذج فقط وكل الشكر والاحترام للجميع تجرية.rar

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

السلام عليكم ممكن مثال حى على هذا الموديول #If VBA7 Then Private Declare PtrSafe Function InternetGetConnectedState Lib "wininet.dll" _ (ByRef dwFlags As Long, _ ByVal dwReserved As Long) As Boolean #Else Private Declare Function InternetGetConnectedState Lib "wininet.dll" _ (ByRef dwFlags As Long, _ ByVal dwReserved As Long) As Boolean #End If Function Is_Connected() As Boolean Dim IEStat As Long Is_Connected = (InternetGetConnectedState(IEStat, 0&) <> 0) End Function Public Sub TestInternetConnection() If Is_Connected() = True Then MsgBox "Connected" Else MsgBox "Not Connected" End If End Sub ثم يتم استدعاء أحد الدالتين التاليتين : Connected() هذه تعطيك نتيجة نعم/ لا على الإتصال TestInternetConnection() وهذه تظهر لك رسالة تخبرك إن كان متصل أم لا ******************************************************************************************

تم الحل بفضل الله وانتهت المشكلة والفضل يرجع للأستاذ موسى له منى الف تحية

شلهد الملف وجد انه موجود بالفعل ولم اعرف سبب عدم ظهورة عندك ايه زعلى العموم اتفضل اخى =DLookUp("[وكيل الوزارة] ";"tb_city") =DLookUp("[رئيس لجنة الادارة] ";"tb_city") ضع هذه الداله فى مربع النص لكلا منهم لك تحياتى

ممكن حضرتك تعمل كود واحد للتجربة واكون شاكر

بعد اذم المهندس قاسم استاذى ومعلمى اتفضل اخى الحل عند طريق دالة DLookUp فى التقرير وليس فى الاستعلام تحياتى 1.rar

السلم عليكم عند الارسال يوجد خطاء فى هذا السطر If Nz(DCount("SelectRow", "email", "selcted= -1"), 0) = 0 Then اريد المعالجة لان الارسال واقف على هذا التعديل وشكرا 1.rar

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

السلام عليكم ورحمة الله وبركاته مرفق ملف به نموذج يعمل بكفاءة ويرسل التقرير بالاميل الفكرة / هناك عددت تقارير بقاعدة البيانات اكثر من 15 تقرير يتم ارسالهم على مدار العام الدراسى اريد عند اختيار تقرير من مربع النص بتم ارساله تلقائيا برقم Id كما هو موجود حاليا عند الضعط على زر اختبار شهر اكتوبر المطلوب / عمل مربع نص غير منضم يتم فيه تجميع التقارير وعند الضغط على اسم تفارير تخرج رسالة تنبيه (هل انت متأكد من ارسال هذا التقارير ويعطى نعم ... او لا ) مع فائق احترامى وتقديرى رسالة.rar

هذا مافعلته عملت module1 و module2 اعزك الله وزادك من نعيمه

اتمنى ان تكون هذه المحاولة ناجحة هذه المره اتفضل المرفق وبذلك انا جبت كل الحلول الممكنة لتخفيض امان الماكرو Link2securityDb.rar

1.rar

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

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

اتفضل مجرد ماتضغط عليها هتكتب تم واوفينى بالنتيجة open.rar