Ab Techno

أعطنا عينة لقاعدة البيانات التي تريد تنفيذ المطلوب عليها، تحوي النموذج أو التقرير الذي تُريد تظهير الرسم البيانيّ عليه.. عبدالله،،،

جزاك الله خيراً أخي الكريم، وأثابك خيراً على ما قدّمت، ولا ضيرَ أن تتعلم شيئاً وأنت في سنّ متأخرة، فإنه لا كبيرَ على العلم إلا ربُّ العلم سبحانه، بل إنه علّم أنبياءه وخيره رُسُله بعد الأربعين، وأدّب نوحاً عليه الصلاة والسلام وقد بلغ من العمر تسعمائة عام. وقد ق…

السلام عليكم، جرب المثال المُرفق، ربما وجدت به ما أردت.. بالتوفيق، عبدالله،،، ListBox H & V.rar

حاولت تقديم المساعدة، لكن قاعدة البيانات لا يمكن قراءتها. أرجو التفضل بتحويلها إلى آكسس 2007 مع الشكر. عبدالله،،،

السلام عليكم، كل ما نحتاج فعله في حدث الـ Absent_AfterUpdate هو إختبار حالة صندوق الاختيار Absent ، وهو يأخذ قيمتين : True أو False ، وليس Yes وَ No كما جاء في مثالك.. هناك طريقتان؛ إما أن تستخدم If Then ، أو أن تستخدم Case Select ، وهي الأسهل والأكثر مرونة، و…

السلام عليكم، إفحص الملف المثال في المرفقات، فلربما كانت فيه بُغيتك.. بالتوفيق، عبدالله،،، Hyperlink in a ComboBox.rar

جرب هذه! exampel.rar

السلام عليكم، قمتُ بتعديل الدالة بحيث تُعطينا القيمة المُطلقة Abstract Value للفوارق بعد حسابها، والقيمة المُطلقة هي القيمة الموجبة دائما. لكني أشكّ أن الدالة الآن تستطيع حساب الفوارق بشكل دقيق. على كل حال، جربها وتأكد من قُدرتها على استخراج الفوارق بالصورة ال…

إرفع الملف.. أطيب الأماني، عبدالله،،،

السلام عليكم، هاك دالة DateDiffCalc تقوم بحساب الفرق بالأشهر والأيام والساعات والدقائق والثواني. أرجو الإحاطة بأن هذه الدالة لاتزال في نسختها التجريبية، وبالتالي فتوقع منها بعض الأخطاء - ربما. الدالة تستقبل تاريخين "بداية ونهاية"، ثم تقوم بحساب فوارق الشهور فا…

تستطيع كتابة دالة تحكم Control Function بسيطة جدا كالتالي Public Function Adjust100(dblInput As Double) As Double ' On Error GoTo Err_Handler If dblInput > 100 Then Adjust100 = 100 Else Adjust100 = dblInput End If Exit_Here: Exit Function Err_Handler: Adjust10…

السلام عليكم، 1. أنشيء جدولاً جديدا، يُخزن قيماً متسلسلة للتقارير. 2. في كل مرة يُفتح فيها التقرير، تُقرأ آخر قيمة متسلسلة للتقرير، ثم تُزاد واحدا. 3. على نموذج البحث، إستخدم كود في بي لتحديث الرقم المتسلسل للتقرير. الخطوات أعلاه تجدها في القاعدة المرفقة، بالت…

السلام عليكم، دعونا بدايةً نقرّ بأنه لا يوجد نظام أو تطبيق أو برنامج يخلو من الأخطاء "من يعرف نظام التشغيل Windiws 98 في نسخته الأولى؟". بل الخطأ هو صفةٌ لازمة لبني البشر وكل ما يفعلوه، وهي السبيل للتعلم الممنهج والتطوير المستمر، وقد عرّف الدكتور نجيب الرفاعي …

جرب الملف في المرفق، أمنياتي، عبدالله،،، abTrail.rar

حتى نخرج من بعض التعقيد، سوف نُعرف متغيراً نصياً جديدا اسمه strExcelPath ، وهو عبارة عن المسار الكامل لملف الإكسيل مع اسم الملف نفسه. سنفترض جدلاً أن ملف الإكسيل سوف يكون دائماً في نفس مجلد قاعدة البيانات، جنباً إلى جنبا، بالتالي نستطيع أن نستخدم الكود التالي …

أرغب المساعدة أخي الكريم، لكني لم أفهم طلبك. ماذا تقصد بتقرير ينمو؟ أو متحرك؟ التقرير في الأساس جُعل لكي يخرج مطبوعاً على ورقة، فكيف تريده أن يتحرك على ورقة!؟ حدد طلبك بالضبط حتى نستطيع مساعدتك. بالتوفيق، عبدالله،،،

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

السلام عليكم، جرب هذه الطريقة ربما نفعت معك، وهي عبارة عن روتين عام Public Subroutine اسمه UpdateStudentDB ، يستخدم كائنات قياسية من نوع Object لفتح ملف إكسيل واستيراد البيانات ثم حقنها في الجدول المؤقت Backup . وعلى ذلك فهو لا يحتاج إلى إشارة مرجعية لأي مكتبا…

السلام عليكم، 1) أحببت أن أؤكد على كلام الأخ الكريم AbuAdnan من ناحية أعادة تسمية الجداول والحقول وبقية الكائنات بحروف إنجليزية، غير أنه قال "يُفضل" وأنا أقول "ينبغي". وسوف ترين صنوف العذاب في التعامل مع الحروف العربية عندما تبدأين في كتابة الإستعلامات أو تعدي…

السلام عليكم، بافتراض، أن قاعدة البيانات لديك لديها المسار التالي C:\MyDB.mdb إضغط زر Start ، ثم Run ، ثم اكتب في صندوق التشغيل الأمر التالي MSACCESS.exe c:\MyDB.mdb /decompile ثم اختر Compact and Repair Database من قائمة Database Tools ثم افتح محرر فيجوال بيز…