منتصر الانسي

بالضبط هذا هو المقصود

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

اخي العزيز الكود الذي وضعته انت يقوم بحذف سجلات جدول SN1 كل مرة تنفذ فيها الكود str_SQL_DEL1 = "DELETE SN1.*FROM SN1;" DoCmd.RunSQL str_SQL_DEL1 ثم تقوم بالحاق السجلات الجديدة الخاصة بالارقام الفاضية للمكان المحدد في النموذج فقط فاذا كنت تريد ان يحتوي الجدول على جميع الارقام الفاضية لجميع السجلات فهذا يتطلب منك تعديل الكود بحذف السطرين المذكورة وعليه فسيتم الحاق الارقام الفاضية لكل سجل تمر فوقه في النموذج تحياتي,,,

اخي العزيز اعتقد ان مشكلتك هي في نموذج اختيار التاريخ والذي يحتاج بعض الوقت لكي تفهم طريقة عمله فإذا كان احد الاخوان قد استخدمه من قبل فيمكنه ان يفيدك ومن جهتي اذا وجدت الوقت لذلك ساقوم بالرد عليك مباشرة تحياتي,,,

اخي العزيز لا ادري اذا كنت قد فهمت قصدك ولكن جرب التعديل المرفق تحياتي,,, mmm.rar

اخي العزيز الان يعتمد ترقيم ID التاريخ الهجري MyDatee فلو جربت ادخال تاريخ في ديسمبر 2010 سيتم اضافة الرقم خلال عام 1432 وجرب ادخال تاريخ في ديسمبر 2011 سيتم اضافة الرقم في عام 1433 تحياتي,,,

اخي العزيز تفضل التعديل تحياتي,,, القيمة.rar

اخي العزيز الحقيقة ان الحقول الكثيرة في جداولك وعدم فهم الغرض منها تجعل من الصعب على اي شخص اخر ان يضع حل بشكل سليم حيث وان ذلك يتطلب فهم جيد لطريقة بناء قاعدة بياناتك ووظيفة كل جدول وكل حقل في هذه الجداول . لذا فموضوعك بحاجة الى فهم اكبر بآلية العمل لكي نتوصل الى حل مرضي فإذا ما فهمنا تصميم القاعدة والغرض من هذه العملية يمكننا ان نتوصل الى حل قد يكون حتى بطريقة أخرى قد تؤدي الى التعديل في تصميم الجداول اذا تطلب الامر . فإذا كان بالامكان وضع شرح في ملف وورد وتوضيح امكانية تعديل تصميم الجداول ان امكن . تحياتي,,,

اخي العزيز المشكلة ان الاستعلامين لاتعمل بشكل صحيح مثلا افتح الجدول "importationtable" ستجد عدد السجلات فيه 2702 سجل اغلق الجدول وقم بتشغيل الاستعلام الاول ثم اعد فتح الجدول ستجد عدد السجلات نفسها والسبب في ذلك بحسب رسالة الخطأ انه لايمكن الحاق السجلات الجديدة بسبب الضوابط في حقول الجدول (مثل اختلاف نوع الحقول او حجمها وغيرها من الضوابط) ارجو ان تصحح الاستعلام ثم ارفق المثال من جديد تحياتي,,,

اخي العزيز مرفق لك كتابين بالعربي ارجو ان تستفيد منهما ولا تنسى الدعاء للكاتبين والمرسل تحياتي,,, ADO & DAO.rar

اخي العزيز تفضل مثالك بعد التعديل تحياتي,,, القيمة.rar

اخي العزيز يمكنك اظهار قيمة مربع النص وذلك بالاشارة الى مسار مربع النص في التقرير كما يلي : - اذا افترضنا ان النموذج اسمه Form1 ومربع النص في النموذج اسمه Text1 - اذهب الى مربع النص في التقرير وفي مصدر البيانات لهذا العنصر اكتب الجملة =Forms!Form1!Text1 - ملاحظة هامة لاظهار البيانات يجب فتح التقرير اثناء ما يكون النموذج مفتوح. تحياتي,,,

أخي العزيز مرفق لك مثالك بعد التعديل في الإستعلام مع ملاحظة مايلي : - يمكنك استبدال جملة [ادخل الرقم] بما فيها القوسين بمسار اي مربع نص في اي نموذج (هذا اذا اردت) - يمكنك الاستعلام باي عدد من الارقام (رقم - رقمين - ثلاثة ....الخ) تحياتي,,, db1.rar

أخي العزيز مرفق لك مثالك بعد توضيح طريقتين للحل في الاستعلام الاولى (NewJob1) تعتبر حل معقد قليلا ولكنها تتم في الاستعلام مباشرة أما الأخرى (NewJob2) وهي الافضل والاسهل وذلك عن طريق إنشاء جدول جديد يحتوي على الوظيفتين قبل وبعد ثم وبربط الجدولين بالوظيفة القديمة يمكنك إظهار الوظيفة الجديدة المقابلة لها تحياتي,,, Change v.rar

مشكور أخونا العزيز وجزاك الله الف خير

أخي العزيز يمكنك الإطلاع على المشاركة هنـــا تحياتي,,,

أخي العزيز في أكسس قم بتصميم التقرير بحسب الحجم الذي تريد من حيث الطول والعرض مع مراعاة الهوامش أما من حيث تحديد نوع الورق فهذا مرتبط بالطابعات المعرفة في الجهاز مثلاً : - في الوضع الإفتراضي لويندوز ستجد أن الأحجام المعرفة محصورة بين Letter و A4 وبقية الأحجام الإفتراضية - إذا قمت بتعريف طابعة كبيرة ستلاحظ ظهور أحجام أخرى لم تكن موجودة من سابق - إذا قمت بتعريف طابعة كروت أو بطائق تعريفية ستظهر لك أحجام أخرى جديدة فإذا لم تجد الحجم المحدد ستتم المعاينة والطباعة بالحجم الافتراضي للطابعة الإفتراضية لذا فعند تعريف الطابعة التي تستخدمها في عملك سيظهر لك الحجم الذي تريده للتقرير ولكي تربط تقريرك بهذا الحجم فالمطلوب منك تنفيذ الإجراءات التالية 1- تعريف الطابعة أولاُ (حتى وان لم تكن موجودة فعلاً) 2- من خصائص الطابعة إجعل الحجم وإعداد الصفحة المطلوبة لتقريرك هي الإعدادات الإفتراضية للورق في الطابعة 3- فتح التقرير (في وضع التصميم أو المعاينة) ثم من قائمة (ملف) قم بإختيار (إعداد الصفحة) 4- قم بتحديد الطابعة المخصصة لتكون هي الطابعة الإفتراضية للتقرير كما في الصورة لذا فكما سبق ما عليك يا أخي الا أن تصمم تقريرك بالأبعاد المطلوبة منك وتنفيذ الخطوات كما أوضحت لك أعلاه وأن تعرف طابعتك في أي جهاز ترغب في تشغيل برنامجك فيه لمعاينة تقاريرك بالحجم الذي ترغب به. أرجو المعذرة على الإطالة وسامحني على اي تقصير في الشرح, تحياتي,,,

أخي العزيز كما قال أخونا كابون فالمشكلة هي ان الكود معمول لنموذج محدد ولن يطبق في جميع النماذج إلا بعد تعديل مايناسب النموذج الجديد ويمكن تحديد المواضع التي يجب تعديلها في الكود كما يلي : !CustomerID = Me.CustomerID !EmployeeID = Me.EmployeeID !OrderDate = Date 'etc for other fields هنا يطلب منك تحديد حقول النموذج الرئيسي التي سيتم نسخها ففي النموذج الذي وضع الكود له كان به ثلاثة حقول هي (CustomerID,EmployeeID,OrderDate) لذا يجب تعديلها بما يتناسب مع الوضع الخاص بك ومعنى الجملة (etc for other fields) أي إضافة أي حقول أخرى تريدها أي لا تتقيد بثلاثة حقول فقط lngID = !OrderID هنا عليك تحديد الحقل الذي يعتبر مفتاح رئيسي وتضعه بدلاً عن OrderID If Me.[Orders Subform].Form.RecordsetClone.RecordCount > 0 Then هنا يتم تحديد إسم النموذج الفرعي بدلاً عن Orders Subform strSql = "INSERT INTO [Order Details] ( OrderID, ProductID, Quantity, UnitPrice, Discount ) " & _ "SELECT " & lngID & " As NewID, ProductID, Quantity, UnitPrice, Discount " & _ "FROM [Order Details] WHERE OrderID = " & Me.OrderID & ";" هنا يجب وضع جملة SQL الخاصة بإلحاق السجلات الفرعية وبالطبع إذا ما قمت بتعديل الكود في المواضع المحددة أعلاه بما يتناسب مع برنامجك عندها سيتم تنفيذ الكود بدون مشاكل إن شاء الله تحياتي,,,

أخي العزيز بالطبع يمكن تنفيذ الطريقة بواسطة الكود . ترتيب السجلات يمكنك تطبيقه بأكثر من طريقة كالنقر بالزر الأيمن فوق مربع نص الشهر وإختيار الترتيب المطلوب ولكن من وجهة نظري فإن أفضل طريقة تكون من خلال ترتيب مصدر سجلات النموذج الفرعي فلو تلاحظ في مثالك فإنك قد جعلت ترتيب الشهر تنازلي (مضطراً)وذلك لإظهار أعلى ثلاثة سجلات لذلك وبتعديل بسيط (كما بالمرفق) يمكنك تجاوز هذه المشكلة وذلك كما يلي:- 1- الدخول الى مصدر سجلات النموذج الفرعي (الاستعلام في وضع التصميم) ثم أنقر على زر (حفظ) في شريط الادوات ليتم تحويل جملة الإستعلام إلى إستعلام جديد (استعلام1) في المثال المرفق 2- جعل النموذج الفرعي يعتمد على الإستعلام الجديد وليس على الجدول 3- ترتيب حقل الشهر في مصدر النموذج الفرعي ترتيباً تصاعدياً بالنسبة للتلوين فهو غير مرتبط بموقع السجل سواء كان أول سجل أو آخر سجل أو حتى في الوسط بل يعتمد على قيمة حقل الشهر فيتم تلوين سجل أكبر شهر تحياتي,,, المثال.rar

أخي العزيز مثالي ما هو إلا لتوضيح طريقة إظهار السجلات التي تحتوي على الارقام المحصورة في مجال محدد وكمثال وضعت الأرقام من 1 إلى 100 ويمكن أن تكون أي أرقام أخرى طلبك كان واضح والآن تغير إلى إظهار الأرقام الناقصة أو المحصورة بين رقمين بشكل عام وليس أن تكون في جدول (كما أعتقد) إذا كان هذا هو طلبك فمرفق لك مثال أكثر من رائع لأستاذنا الكبير أبو عقيل أعتقد أن فيه الحل الشافي لطلبك بل وأكثر تحياتي,,, معرفة الارقام المفقودة في تسلسل حقل ما.rar

اخي العزيز مرفق لك مثال وضعته على عجل يوضح لك الطريقة افتح النموذج وحدد اي رقمين تريد من 1 الى 100 ثم انقر الزر لفتح الاستعلام تحياتي,,, New Microsoft Office Access Application.rar

اخي العزيز تفضل المثال بعد التعديل العمل الذي تم 1- انشاء مربع نص في النموذج الرئيسي اسميته (LastSalay) يقوم بقراءة أكبر تاريخ في جدول الرواتب للرقم المطابق للرقم التسلسلي 2- تطبيق التلوين لمربعات النص في النموذج الفرعي بالتنسيق الشرطي حسب طلبك تحياتي,,, المثال.rar

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

اخي العزيز المشكلة كانت انك لم تظهر الحقلين المرتبطين في النموذج الفرعي ليتم ادخال قيم فيهما مرفق لك مثالك بعد التعديل تحياتي,,, 3.rar

بارك الله فيك اخي الكريم. بالفعل رابط مفيد لكل من يريد تعلم جميع تطبيقات اوفيس وغيرها وباللغة العربية . ولمزيد من الاستفادة رابط الجزء الثاني لنفس الدروس ستجده هنـــا ولزيارة الموقع للإستفادة من بقية خدماته من شروحات وكتب ستجده هنـــا فجزاك الله خير . تحياتي,,,