ابوخليل

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

السلام عليكم بل ممكن وباستعلام تحديث ولكن يتم التحديث بين الجدولين على عمود عمود اولا : بامكانك جلب احد الجداول الى القاعدة الاخرى ويمكن الارتباط به فقط ثانيا : يتم انشاء استعلامين لسنة واحدة متشابهة في الجدولين في الاول يتم اظهار الحقول الفارغة وفي الثاني يتم اظهار الحقول التي تحتوي على بيانات ثالثا : نعمل استعلام تحديث بناء على الاستعلامين السابقين مع ملاحظة ربط العلاقة بين الاسماء رابعا : نشغل الاستعلام فيقوم بتحديث الحقول الفارغة بما يقابلها من قيم في الاستعلام الاخر خامسا : نكرر العملية لكل عمود

تضيف الخانة هذه في الجدول وفي الاستعلام تكتب معيار في حقل الخانة = صفر بكذا لن يظهر اي سجل تم وضع علامة داخل الخانة

انظر هنا موضوع للسيد جمال

قصدت من سؤالي هو محاولة معالجة الكود الاول تفضل الكود الآخر ويعمل على اكمل وجه db3.rar

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

عندي يشتغل بدون مشاكل هل لاصدار اكسس دخل في هذا ؟ جرب ضع هذا السطر في اعلى الكود On Error Resume Next وافني بالنتيجة اذا ما اشتغل عندك ساحاول تشغيل المثال على اصدار احدث لارى المشكلة عن قرب

لا ادري كيف يحدث لك ذلك فعندي يعمل على اكمل وجه عملت بعض التعديلات ، حيث جعلت النسخ والحذف من الازرار فقط وطبعا قمت بتجربته حيث عدلت رقم الشهر الى 2 بعد اخذ النسخة وتم الحذف الى السلة db2.rar

جزاكم الله خيرا معلمينا الكرام ويمكن ان نجعل الامر اكثر مرونة فنستبدل ()Date بمتغير نجعله بين يدي المستخدم

لا تغير تاريخ الجهاز تاريخ اليوم هو 3/3/2016 انظر النسخ تبدأ من اليسار بالسنة اربعة ارقام ثم الشهر رقمين ثم اليوم رقمين كل الارقام الظاهرة في شهر 3 .... واصغر واحد يمثل اليوم 3 عدل التواريخ على النسخ جرب وعدل الشهر الى 02 بدلا من 03

الطلب الاول الرئيسي وهو الحفظ تفضل تم التطبيق على ثلاث نماذج فرعية اكمل كما هو موضح بالكود شرح الطريقة : بما ان تسميات الحقول بحروف عربية فانا اكتفيت بتسمية الحقل الاول في كل نموذج وسميته z1 عند النقر على زر الحفظ يجري التالي : 1- نقل التركيز على الحقل الفرعي 2- جعل قيمة z1 = z1 يعني ستكون مساوية للقيمة الافتراضية او للقيمة التي تم تغييرها 3- تحديث النموذج الفرعي 4- الانتقال للنموذج الفرعي الآخر .... وهكذا انا شرحت لك الطريقة حتى اكفيك عناء السؤال فضلا الاسئلة الاخرى افتح لكل سؤال موضوعا يخصه vv.rar

نفرض ان مربعات الخيار اسماؤها كالتالي a,b,c,e في حقل جديد في الاستعلام مصدر تقريرك الصق الجملة التالية expr1: IIf([a]=-1;"Excellent";IIf([b]=-1;"good";IIf([c]=-1;"fair";IIf([e]=-1;"poor")))) تعمدت وضع نصوص مسميات انجليزية حتى يسهل قراءة وفهم الكود

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

حتى مع تاريخ ام القرى سيوجد تعارض مع التاريخ الميلادي يعني ستفاجأ مثلا في يوم 30 صفر ان اكسس يعترض على هذا التاريخ ولا يقبل الا بـتأخير يوم او تقديمه لذا اذا كان برنامجك يعتمد اعتماد كلي على الهجري او ام القرى كما الحال في السعودية من حيث احتساب الاجازات والعلاوات والفروقات وغيرها كتاريخ الميلاد ونحوه فيلزم ان تضرب بحقل تاريخ اكسس عرض الحائط وتستبدلها بحقول نصية والاستعانة بالوحدات النمطية التي تم انشاؤها لضبط تاريخ ام القرى ومحاكاة لدوال التاريخ الميلادي كعمل الاستاذ ابو هادي في وحداته النمطية وضبط تاريخ ام القرى الى عام 1500هـ وهي موجودة ومتوفرة في هذا المنتدى وغيره

رؤيتك صحيحة بل هي الاصح انظر هنا تمت المعالجة حسب فكرتك

جزاك الله خير لو ارفقت مشكورا نسخة بصيغة mdb حتى تكون الفائدة اشمل

اخي اواب كل النسخ الظاهرة بتاريخ اليوم ما عدا 10 نسخ بتاريخ 27 اصبر يومين وسترى النتيجة بام عينك وان كنت مستعجل فقم بتقديم تاريخ الكمبيوتر اكثر من ثلاثة ايام ثم افتح النموذج لترى النتيجة التصفية تتم حسب الايام وان اردتها حسب الثواني فبالامكان ذلك

بالنسبة لمرفق الاستاذ محمد فهو يستحق عنوان وموضوع يخصه اخي اواب اعتذر عن التأخير والمسألة غلطة مطبعية او بالاصح تقديم سطر على سطر في الحدث Sub zerNc() انقل Exit Sub واجعلها في نهاية الاسطر يعني تكون بعد السطر Call delfiles كان الخلل انه يعطي نسخة ثم يخرج من الحدث قبل امر الحذف

العمل اننا نضيف سطر نحجب هذا الزر عند تحقق الشرط Me.fvacations.Form!zer1.Visible = False db1.rar

اعتقد مشكلتك في الشبكة والصلاحية طرحت هنا ما اعلمه وما مررت به في مثل وضعك ولعل بعض اخواننا الاعضاء لديه زيادة معلومة وخبرة يفيدنا في ذلك للرفع ..

اجعل مجلد المشاركة للقراءة والكتابة

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

تستطيع منع الحذف من الفرعي عند تحقق الشرط والعكس صحيح لتصبح الجملة هكذا dty = DMax("edate", "employees") If Me.edate < dty Then Me.AllowEdits = False Me.fvacations.Locked = True Me.fvacations.Form.RecordSelectors = False Else Me.AllowEdits = True Me.fvacations.Locked = False Me.fvacations.Form.RecordSelectors = True End If اما مسألة الرسالة فليس لها صلة بالموضوع والافضل ان تفرد لها سؤلا يخصها

اعتقد تم طرق الفكرة في اكثر من موضوع هنا يابو جودي ابحث في المنتدى عن : اكثر من صورة

وعليكم السلام تفضل الامر المسؤول عن ذلك ويمكنك استبدال الرابط الموجود داخل لسطر اما بمربع نص او متغير Call Shell("explorer " & "D:\officena\a1\b1\c1", vbNormalFocus)