ابوخليل

في اقصى الركن العلوي : ملف / معلومات / ضغط وإصلاح

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

بالاستعانة بالدالة Len([nober]) يمكنك فرز الارقام حسب العدد انظر المرفق db4.rar

هذا هو التعديل اضفت حقولا للحسم في الجدول جعلت حقول الحسم والمجموع في اول الاستعلام ( وهو التعديل الذي حصل في الاستعلام ) تاريخ المباشرة1 هو المعتمد في العمليات اللاحقة اتمنى ان يكون مرضيا ، ودمت بخير ،،، الخدمة الفعلية 2 2011.rar

سأطبقها ولكن يلزم اثبات الايام والشهور المحسومة في حقول في الجدول أسوة بالحقول المضافة وتكتب وتثبت بأرقام موجبة ما ردك في هذا ؟ والخطوة الثانية اننا سنطرح هذه الايام والشهور من تاريخ البداية او تاريخ النهاية قبل اجراء اي عمليات في الاستعلام التطبيق سيكون على المثال في اول مشاركة لك

هذه اجابتي الاولى عن نفسي فأنا ابحث عن الحلول حسب رغبة السائل اما ان تريد تحقيق الفكرة الصحيحة بغض النظر عن الطريقة فهي يسيرة جدا وباستطاعتك تطبيقها فالحل انك مخير بين امرين : - أن تضيف الحسميات على تاريخ البداية باستخدام : DateAdd ("D"، 10، [startDate]) - وإما ان تطرح الحسميات من تاريخ النهاية باستخدام DateAdd ("D"، -10، [EndDate]) ويكون الحقل الناتج هو المعتمد في اجراء العمليات المثاالين اعلاه لاضافة او طرح الايام ويمكن استبدال العدد بمتغير رقمي

استخدم الدالة NZ مثال : x = nz([a])+ nz([b])

انظر في المثال تطبيق للفكرة 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% وتم تعديل الكود اعلاه