koao

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

السلام عليكم ورحمة الله وبركاته أخي الكريم غير نوع الحقل من نص (Text) إلى مذكرة (Memo) وبالتوفيق

السلام عليكم ورحمة الله وبركاته أخي الكريم إفتح موديول جديد وإكتب الكود التالي فيه Public Sub EditNotAllowed(MyForm As Form) If MyForm.NewRecord = False Then If MyForm.Dirty Then MyForm.Undo MsgBox " No allow Edits ", vbCritical, "Error" End If End If End Sub …

السلام عليكم ورحمة الله وبركاته وإياك أخي sx1 ... وشاكر لك مرورك الكريم

السلام عليكم ورحمة الله وبركاته أخي الكريم hamidymom .. و .... at_aziz .. كلماتكما أثلجت صدري .. وأسال الله أن يشملكما ومن يقرأ بدعواتكما الصادقة فلكما جزيل الشكر والإمتنان

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته أعلم أن هناك أمثلة كثيرة كفكرة برنامجي هذا .. ولكن لعل تكون فيه افكار جديدة وفوائد برمجية .. إستفدت منها أنا شخصيا .. وهذه صورة لواجهة البرنامج وهذه صورة توضح تدفق البيانات أو FlowChart للبرنامج وأرجو من ا…

السلام عليكم ورحمة الله وبركاته أخي الكريم أنت قطعت نفس المشوار كتبت الكود الصحيح ولم تكمله ... عموما إستبدل الكود الذي في برنامجك بالتالي Private Sub crn_AfterUpdate() If Len(Me.crn) < 8 Then Exit Sub If Left$(Me.crn, 8) = "04010404" Or Left$(Me.crn, 8) = "04…

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

السلام عليكم ورحمة الله وبركاته إخواني الكرام .... أبو شادي ...... Lara M .... mrnooo2000 .... أبو رهف شرفتوا موضوعي بمروركم الكريم ... وأشكر دعمكم وتحفيزكم بكلماتكم الجميلة ودعواتكم فجزاكم الله خيرا

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

السلام عليكم ورحمة الله وبركاته هذا مثال بسيط لشرح جزء بسيط من إستخدامات الـ Class Module وما قد يحويه من خصائص ووظائف ودوال ومتغيرات وفكرة مثالنا هذا أننا نريد أن نستخدم عنصر تحكم من نوع تسمية كأداة نتلاعب بخصائصها لتبدو كشريط تقدم فلنبدأ بسم الله إبدأ مشروع …

وإياك أخي شادي ... وأشكر لك تشريفي بمرورك الكريم

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

السلام عليكم ورحمة الله وبركاته أخي الكريم ... كنت مهتم بموضوعك من 4 أيام ... ولكن كل مرة يأتي طلب زي هذا ... غالبا أحله بإستخدام الكود ... ولكن حاولت هذه المرة .. أن أتعلم كيفية التعامل مع الإستعلام الجدولي ... وأقصد بأتعلم ... هو كيف أجعل التقرير يعرض الحقول…

السلام عليكم ورحمة الله وبركاته أخي الكريم ... لعمل إستعلام إعمل مثل مافي الصورة التالية وتلاحظ النتيجة واضحة والكود المستخدم هو التالي Result : Round((Rate([L9],-[L13],[L6])*12)*100,2) وبالتوفيق

السلام عليكم ورحمة الله وبركاته أخي الكريم .. لنفرض أن عندك في النموذج مربع نص إسمه Result وتريد أن تعرض النتيجة فيه ... فضع الكود التالي في حدث الدخول لعنصر التحكم مثلا أو عند النقر على زر أمر ما Me!Result = Rate(Me!L9, -Me!L13, Me!L6) * 12 حيث أن L9 هو مربع …

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

السلام عليكم ورحمة الله وبركاته تحت طلب خاص من أخي mjhoool ... الذي طلب إضافة عامود في التقرير الإسبوعي لعرض ملاحظات عن الموظف ... مثل مجاز أو في مهمة .. وتم تنفيذ طلبه في المرفق التالي وبالتوفيق koao_Attendance_up.zip

السلام عليكم ورحمة وبركاته أخي الكريم moh samer ali .... الفكرة جدا جميلة ... فأسأل الله ان يبارك فيك وفي علمك .. ويجزاك عنا خير

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