ابوخليل

انظر في المثال تطبيق للفكرة Dim d1, m1, y1 As Integer d1 = Me.ii m1 = Month(Date) y1 = Format(Date, "yyyy") textDate = (d1 & "/" & m1 & "/" & y1) وقد تفتح لك ابوابا لافكار اخرى قناع.rar

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

تم تقليل الفارق انظر المرفق مع اني غير مقتنع بطريقة الحل هذه ـــــــــــــــــــــــــــــــــ استفسار : لماذا تلجأ الى ادخال التاريخ المطروح بالسالب ؟ لماذا لا يتم ادخال ارقام موجبة وتحسب كتاريخ ويتم طرحها الخدمة 3.rar

ان تقصد اني اطبق رؤيتي على مثالك المرفق ؟ تفضل وأمل ان يوافق المطلوب الخدمة 2.rar

ولك اخي بمثل ما دعوت والحمد لله على فضله

في خصائص النموذج / لسان التبويب : بيانات غير القيمة : ادخال بيانات الى نعم بدلا من لا

تم التعديل NA_VehicleLicense.rar

يمكنك استخدام رقم السجل الوطني كمعرف للشخص وربطه بالجداول الفرعية لانه لا يمكن تكراره ويمكنك جعله مفتاحا للجدول ان شئت

ارى ان يتم اولا احتساب الفرق بين التاريخين بالايام ثم يتم طرح ما اسميته بالعقاب بحساب الايام فالشهر = 30 والسنة = 360 ثم بعد ذلك يتم التحويل الى الصيغة النهائية

age= DateDiff("yyyy";[StartDate];Date()) حيث StartDate حقل تاريخ الميلاد

عادة في اوفيس 2010 وما دون اذا كان ضمن البرنامج مكتبات تشغيلية ونظام الوندز 64 بت فإنه يتم تسجيل المكتبات داخل مجلد syswow64 بدلا من system32

اعتقد ان المشكلة تكمن في الطابعة وخصائصها

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

بدلا من ()Now اكتب ()Date

مشكور اخوي فرهاد لو أرفقت مثالا يطبق هذه المعلومة

الحمد لله على تحقق المطلوب وتسلم اخوي ، الله يعزك ويرفع قدرك

المشكلة عندي في الاصدار وبحمد الله تم التغلب عليها الآن انظر الى التعديل على المهارات الخمس الأولى - تم تغيير الكود واسندنا الشرط الى حقل الرقم - تم اعطاء مسميات لحقول الارقام وطبق على البقية db4.rar

يا سلام صح 100% وتم تعديل الكود اعلاه

لا بد ان يصاحب الحدث الشرطي تركيز على الكائن الهدف والتقرير بصورة عامة لا يتفاعل مع التركيز عند العرض 30.rar

صحيح Esc = 27

نجحت في التعديل ولكن في آخر لحظة ضرب التقرير ولم استطع فتحه السبب اني قمت بتحويل الاصدار ، وهناك ملحوظة اريدك ان تتأكد منها حيث لاحظت ان بعض الحقول مكررة او بمعنى آخر متراكبة بعضها فوق بعض سأشرح لك بالتفصيل لبتطبق ما جربته اولا : دع حقول الارقام على جانب والعمل سيكون على مطلوبك وهو حقول العلامات المعلوم : ان التقييمات 10 مرقمة بالترتيب : الهندام = 1 و الاحترام =2 ...... وهكذا وكل تقييم يشتمل على اربع مستويات العمل : في التقرير ابدأ بالتقييم الاول " الهندام " وفي حقوله الاربعة ندرج هذه الاكواد تنازليا =IIf([Compid]=1 And([subComp1]="9" Or [subComp1]="10");"P";" ") =IIf([Compid]=1 And([subComp2]="7" Or [subComp2]="8");"P";" ") =IIf([Compid]=1 And([subComp3]="5" Or [subComp3]="6");"P";" ") =IIf([Compid]=1 And([subComp4]="3" Or [subComp4]="4");"P";" ") ثم التقييم الثاني الذي هو الاحترام وفي حقوله الاربعة ندرج هذه الاكواد تنازليا =IIf([Compid]=2 And([subComp1]="9" Or [subComp1]="10");"P";" ") =IIf([Compid]=2 And([subComp2]="7" Or [subComp2]="8");"P";" ") =IIf([Compid]=2 And([subComp3]="5" Or [subComp3]="6");"P";" ") =IIf([Compid]=2 And([subComp4]="3" Or [subComp4]="4");"P";" ") قارن الفرق بين المجموعتين ستلاحظ ان الفرق فقط في رقم التقييم اكمل على هذا النسق

المرفق قيد النظر والتعديل ...

هلا وسهلا باخوي ابو فيصل وكل سنة وانت واهلك واحبابك بخير في حقل علامة الصح في الصفة الاولى غير الكود الى التالي =IIf([subComp1]="9" Or [subComp1]="10";"P";" ") ثم التي تحتها هكذا =IIf([subComp1]="7" Or [subComp1]="8";"P";" ") بعد ذلك اكمل الصفات الاخرى subComp3 subComp2 .... وهكذا جرب ووافني بالنتيجة

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

بعد الاطلاع على المرفقات اتضح التالي : عند تغير مكان قاعدة الجداول فمن الصعب على الواجهات الارتباط بالقاعدة لذا يلزم تحديث ربط الجداول حينما يتغير مكان قاعدة البيانات ولتحديث الربط اتبع من شريط الادوات : بيانات خارجية / الجداول المرتبطة سيخرج مربع حوار اذهب الى مكان القاعدة ثم ارتبط بها مرة اخرى ملحوظة : النموذج في مثالك غير منضم لذا فهو يفتح بشكل سليم ولهذا اختفى سبب ومكان المشكلة للتجربة :لو جعلت الجدول مصدرا للنموذج فستظهر لك رسالة عند بدء التشغيل تخبرك بعدم وجود الجدول حينها ستنتبه الى مشكلة الربط تم التعديل على المثال يمكنك فحصه على القرص C Net.rar