أبو عبدالله الحلوانى

لم أعدل شىء بخصائص الجدول عدل خصائص الجدول كما أشرت اليك سابقا ثم جرب ووافنا بالنتائج

السلام عليكم لو أرفقت لنا مثالا كان أفضل

تفضل جرب هذا test122.rar

للتخلص من ازعاج تلك الرسالة كل ماعليك هو اضافة هذا الكود بدل الكود السابق If Err.number > 0 then msgbox "هذا السجل مكرر" docmd.cancel أو' Sendkeys "Esc" End if جرب هذا ووافنا بالنتائج

هلا رسمت لنا تقريرك كما تحب أن تراه بالورد أو بالاكسل أو حتى صورة فاعتقد أن هذا سيقرب لى الأمر واعذرنى فى ذلك لأن خبرتى بالمواد التعليمية قليلة.

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

آسف لم أقصد الكود بعد التحديث after update وانما كنت أقصد الكود قبل التحديث before update والذى يبحث عن الكلمة بالاستعلام قبل الاضافة وعلى كل هذا تطبيق للفكرة جرب هذا ووافنا بالنتائج test122.rar

تابع هذا الرابط لعلك تفد منه شىء وهناك المزيد يمكنك البحث داخل المنتدى

جزاك الله خيرا إذا نستطيع الآن أن نقول ان الأداة قدراتها فى تخفيض الأمان لم تتعد حدود الاصدار 2010 ولكن يمكن تطويرها لتشمل باقى الاصدارات بعد معرفة عنوان مفتاح الرجسترى الخاص بالاصدار المطلوب كـ 2013 و 2015 و 2016 هل من مشمر للتجربة معنا هل من منتقد للعمل هل من مقيم للعمل أين الشباب ؟

أعطنا مرفق نستطيع التعديل عليه

وعليكم السلام ورحمة الله وبركاته لا أعتقد هذا فليس الخطأ بنوع الورق ولكن يحتاج المستخدم أحيانا الى ورق ذو خلفية لاصقة ليتمكن من انتزاع ولصق البار كود ولكن نوع الورق ليس هو الفارق هنا ولكن نوع التكويد نفسه ربما استخدمت تكويدا معيننا غير مناسب للجهاز القارىء لديك. هنا موضوعين مناسبين لك أرجو أن تفد منهما : أحدهم به مثال يحتوى على تكويد مناسب لمعظم الأجهزة 1- 2- وهذا موضوع ثالث يتحدث عن qr_bar code ,iنا موضوع آخر ويمكنك البحث عن المزيد

وعليكم السلام نعم اضبط خصائص مربع التحرير والسرد الى limit to list = yes allow value list edits = no وبالعربى: الالتزام بالقائمة = نعم السماح بتعديل القائمة = لا

الآن تم تحميل المرفق والحمد لله أعطنا مثالا لشكل التقرير الذى تريد كيف تريد أن يكون

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

حضرتك الغى الكود الموجود بعد تحديث حقل السريل اعتقد أنه لا حاجة لوجوده واجعل حقل السريل بالجدول مفهرس وغير قابل للتكرار

السلام عليكم وجدت أن لديك مشكلة بسيطة بتصميم الجدول names حيث أنك جعلت كود الصنف مفتاح أساسى وبهذا لن يقبل التكرار لذا لو أضفت نفس كود الصنف 1 وغيرت كود المخزن 2 مثلا سيتم رفض الصنف بالكلية . والحل بسيط ان شاء الله اجعل كلا الحقلين كود الصنف وكود المخزن معا مفتاحا أساسيا . جرب هذا الحل الآن ووافنا بالنتائج Account.rar

جرب هذا التعديل لعله يفى بالغرض test122.rar

السلام عليكم ورحمة الله وبركاته بالمرفق أداة صغيرة ولكن تقوم بمهمتين كبيرتين يحتاجهما أى مبرمج فى نهاية اعداد برامجه أولا - ايقاف حظر اجراءات الماكرو من خارج الأكسس ابتداءا من اصدار 2003 وحتى اصدار 2010 ولا أعلم جدواها بالنسبة للاصدارات الأعلى من 2010 أرجو من الاخوة التطوع بالتجربة وموافتنا بالنتائج على الاصدارات بعد 2010 ثانيا - انشاء مختصر للبرنامج على سطح المكتب مع تغير الايكونة ووضع وصف للأيكونة عند المرور عليها بالموس وأخيرا - مع المرفق 1- فك ضغط المرفق بالبرتشن d 2- افتح المجلد Test_chng_ico وافتح الملف الذى يحمل اسم ABF.vbs 3- لاحظ الأيكون الظاهر على الديسك توب ولا تنسونا من صالح دعواتكم Test_chng_ico.rar

السلام عليكم يمكنك استخدام أحد البرامج الخاصة بتحزيم الأكسس أو تحويله الى ملف تنفيذى exe ويوجد بهذه البرامج فى الغالب خيار لأيكونات البرنامج وبامكانك استخدام هذه الحيلة باستخدام هذا الكود الموجود بالملف بصيغة vbs 1- فك ضغط المرفق بالبرتشن d 2- افتح المجلد Test_chng_ico وافتح الملف الذى يحمل اسم ABF.vbs 3- لاحظ الأيكون الظاهر على الديسك توب أبدى لنا ملاحظاتك ولا تنسانا من دعواتك Test_chng_ico.rar

وعليكم السلام بأى حقل تحدث المشكلة وما الفائدة من اضافة " ' " داخل النص.

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

السلام عليكم المرفق به تطبيق لفكرة بسيطة توصلنا للمطلوب إن شاء الله أرجو أن تنال اعجابك وتجد بها ما تريد واعذرنى على التأخر بالرد عليكم 1- جعلت ثلاثة أعمدة مفاتيح أساسية لا يمكن تكرارها معا بنفس الوقت (طبعا هذا حسب ظنى أنا ) ويمكنك تحديد الأعمدة التى تريد فيما بعد 2- أفتح المرفق ولاحظ الجدول الجديد الفارغ باسم istimaraALLWithoutDubl 3- اضغط على زر Delete Dublicate values 4- لا حظ عدد السجلات بالجدول الأصلى والجدول الجديد 5- جرب المرفق ولا تنسى موافتنا بالنتائج. duplicate delete.rar

بسيطة غير القيمة 0 داخل المعادلة الى القيمة التى تريد هكذا ولكن مع الأخذ فى الاعتبار ملحظة أستاذنا محمد صالح فيصبح التعديل هكذا =IIf(Month(Date())=7,[Année]*50+[Forms]![Employé_en_arabe]![PreD],[Année]*50)

مبدأيا ناتج ضرب السنة كما أردت (2017 * 50 = 100850) ان كان هذا الناتج غير صحيح وفق مرادك فوضح لنا ماذا تقصد بضرب السنة هل تقصد عدد الأشهر أم أول رقمين من السنة مثل 17 من 2017 مثلا أم ماذا. ثانيا هذا تعديل لكودك بعد ادخال الشرط : =IIf(Month(Date) = 7;(Year(Date)*50)+[Forms]![Employé_en_arabe]![PreD];0)

السلام عليكم أرجو أن يفيدك هذا If Month(Date) = 7 then M = year(Date)* 50 End If