kha9009lid

جرب المرفق HANY_UPDATE.accdb

في المرفقات Data2001.mdb

عذرا استاذي محمد ارسلت مشاركتي قبل ان اشاهد مداخلتك

Trim(Left([subname];Len([subname])-9)) Trim(Right([subname];9)) في الاستعلام ومنشئ التعبير تكون ; في اكواد في بي تكتب ,

جرب المرفق للمادة : Left([subname];Len([subname])-9) للشعبة : Right([subname];9) Database2.mdb Data2000.mdb

جرب المرفق كلمة المرور 123 كلمة مرور.accdb

الاخ محمد والاخ صالح يستحقون اللقب بجدارة الف مبروك

اذا كان الرقم عدد الارقام ثابت استعلام 2 Expr1: Right([Girlid];8) اذا كان غير ثابت استعلام 3 Expr1: Right([Girlid];Len([Girlid])-1) استعلام 3 يكفي في جميع الحالات test2.accdb

الف شكر استاذ عبد اللطيف ولي عودة بعد اختبار البرنامج

نتعلم منكم استاذي جعفر

واذا ترغب البقاء في الجدول ممكن تظيف حقل في الجدول بالبونص المستحق جرب المرفق Database102.accdb طبعا استعنت بحل استاذنا جعفر

يعني اذا كان 4.8 يحذف الكسر ويكون البونص 4 فقط

جرب الان اذا فهمي صحيح Database101.accdb

دكتور محمد طلباتك اوامر هنا الملف 18 ميجا تقريبا وهذا موقع فيه ايقونات مميزة https://icons8.com/icons

اذا كان يتغير حجم النموذج فيمكن استخدام اكواد التحجيم اما اذا كان المقصود تغير ترتيب الحقول وازار الاوامر فيمكن ضبط ذلك عن طريق الارتساء

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

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

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

الامر السابق يرسل التقرير الى الطابعة بدون معاينة واذا ترغب في مشاهدة التقرير اثناء الطباعة استخدم الامر التالي DoCmd.OpenReport "اسم التقرير", acViewPreview DoCmd.PrintOut , , , , 3

جرب الامر التالي DoCmd.SelectObject acReport, "اسم التقرير", True DoCmd.PrintOut , , , , 3

معلم ماشاء الله تبارك الله

امرك يا استاذي جعلتها في استعلام واحد والاستعلام الثاني للالحاق في الجدول2 مع العلم انا ايضا عود فانا على مشارف الستين Database410.accdb

استاذي الفاضل @jjafferr عملته بطريقة اخرى ولكن عندما شاهدت مرفقك تراجعت فلا يستوي الثرى والثريا

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

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