انظر هذا الرابط وبه رابط لموضوع خاص بالاستاذ صالح به كل ماتريد من معلومات النظام وليس المزر بورد فحسب
http://www.officena.net/ib/topic/63851-%D9%83%D9%8A%D9%81-%D8%A3%D8%AD%D8%B5%D9%84-%D8%B9%D9%84%D9%89-%D8%B1%D9%82%D9%85-%D8%A7%D9%84%D9%84%D9%88%D8%AD%D8%A9-%D8%A7%EF%BB%B7%D9%85-%D8%A7%D9%84%D9%85%D8%B8%D8%B1%D8%A8%D9%88%D8%B1%D8%AF-%D9%85%D9%86-%D8%AE%D9%84%D8%A7%D9%84-%D8%A7%D9%84%D9%83%D9%88%D8%AF/
وعليكم السلام ورحمة الله وبركاته
اسمحلى باستفسار هل المتون الفقهية ستختلف باختلاف المستويات أم لا - وهل سيكون هذا البرنامج مرتبط بشبكة أم هو للاستخدام على جهاز واحد
تفضل هذا تعديل بسيط يفى بالغرض الذى تبغيه ولكن لى بعض الملاحظات على مشروعك هذا
1- البيانات يتم تخزينها بالجدول بشكل أعمدة وليس صفوف - فحضرتك جعلت لكل يوم عمود - وهذا على حسب علمى خطأ بالتصميم
فلو جعلت عمودا واحدا بالجدول وأسميته الأيام مثلا - ويستحسن التسمية بالانكليزية لتلافى مشاكل التسمية- وان كان ولا بد من حفظ البيانات على شكل صفوف فبإمكانك استخدام الاستعلام الجدولى لمثل هذا الغرض
وقد جعلت لحضرتك مثالا بسيط على هذا داخل المرفق - انظر جدول1 - استعلام1 - وتقرير1.
2- علامة الصح - أو مايسمى بحقل صواب/خطأ - يأخذ القيمة (1-) سالب واحد عند القيمة صواب وليس واحد وقد عدلت لك هذا داخل الكود الخاص بك عند التنسيق
3- لم أستطع فهم طريقة ظهور علامة الصح بالتقرير - حيث أن الأمر يبدو معكوسا فتظر علامة الصح بدل الخطأ والعكس كذلك
4- آسف على الاطالة.....
Prog.20011.rar
لو سمحت لنا أستاذ عبدالله بشرح طريقة ربط الأداة عند فك الضغط ب winrar !!!
وهل تعنى بتحزيم البرنامج باستخدام winrar هو الفولدر الخاص بالبرنامج والأدوات الملازمة له أم ماذا
اجعل هذا الكود فى حدث عند الفتح للنموذج OnOpen
'هذا الجزء لحفظ عدد مرات فتح البرنامج بالرجسترى
'-------------------------------------------
Dim m, a
If GetSetting("aa", "bbc", "a") = Empty Then
SaveSetting "aa", "bbc", "a", 1
Else
m = GetSetting("aa", "bbc", "a") + 1
SaveSetting "aa", "bbc", "a", m
End If
'وهذا الجزء لايقاف التشغيل بعد 5 مرات فتح
'---------------------------------------
If GetSetting("aa", "bbc", "a") >= 5 Then
MsgBox "انتهت الفترة التجريبية للبرنامج"
DoCmd.Quit
End If
وعليكم السلام ورحمة الله وبركاته
هذا الموضوع كان يتحدث عن عدد أيام العمل بدون الجمعة والسبت انظر بالموضوع لعله يفيدك ففيه كود رائع ومختصر جدا لاستخلاص يومى السبت والجمعة من أيام العمل . للاستاذ رمهان أسأل الله أن يكون بخير وعافية ويرده الينا قريبا.
http://www.officena.net/ib/topic/65666-%D8%AF%D9%88%D8%A7%D9%84-%D8%A7%D9%84%D9%88%D9%82%D8%AA-%D9%88%D8%A7%D9%84%D8%AA%D8%A7%D8%B1%D9%8A%D8%AE/#comment-427588
تفضل يا أخى هذا مثال لتحويل التاريخ القديم الى هجرى دفعة واحدة شاهد بيانات الجدول أولا ثم شغل الاستعلام ولاحظ الفرق
ووافنا بالنتيجة - تمنياتى بالتوفيق.
تحويل التاريخ جملة واحدة.rar
أستفسار اذا كان عندى عميل آجل وأردت تسديد جزء من المبلغ ماذا أصنع أى نموذج سأفتح وماذا على ادخاله أولا من البيانات ثم على أى زر سأضغط .......... أرجو التوضيح فقد (تهت) داخل برنامجك هذا
سبب المشكلة ببساطة هو الطول الصفرى لحقل البيانات فعندما تسند القيمة "" قوسين خالين هذا سيؤدى لافراغ الحقل نعم ولكن ستتحول قيمته الى صفر والذى يعتبرها الحاسوب قيمة وليست خالية أى أن "" <> Null بلغة الحاسوب . هذا والله أعلم
آسف لم ألاحظ الخطأ سوى الآن
حضرتك لحظ السطر الأول بالكود ستجد اسم مربع النص ( نص 184) وليس a11
1- غير اسم مربعى النص الى a11 & a11Hijri كما تريدهما أولا
2- أرجع الجملة التى حذفتها من قبل - .text- كما كانت ووافنا بالنتيجة