أحمد العيسى

أعلم ذلك لكن ما يخص تطبيق تم عمله ب أكسس 2003 (mdb ) لا يؤثر عند تشغيله على أكسس 2016 مثلاً ( accdb ) هل معنى ذلك أنه يجب عمل تطبيقان بنفس الوظيفة لكل منهما ؟

لم يتفضل أحد بالرد ممكن أو غير ممكن !!!

السلام عليكم أفضل دائماً العمل على أكسس 2003 ، لسهولة العمل فيه وربما لتعودى عليه ولا يوجد أى مشكلة فى عمل هذا التطبيق على كافة إصدارات الأكسس التالية له وفى قائمة شاشة بدء التشغيل لـ 2003 يمكن التحكم فى إخفاء أشرطة الأدوات وفى بداية تشغيل التطبيق فعلاً يتم إخفاء واجهة وأشرطة وقوائم أكسس 2003 لكن عند تشغيل نفس التطبيق على إصدار أكسس 2024 يعمل بكفاءة لكن مع ظهور القوائم الغير مطلوبة هل يوجد إجراء أو كود يمكن استخدامه يصلح لجميع الإصدارات من 2003 إلى 2024 لإخفاء واجهة الأكسس ؟

ممكن لو تكرمت تعديل هذا المرفق ليعمل على أكسس 2003 "mdb" بجانب أى أكسس أعلى "accdb" .. وللنواتين 32 ، 64 بمعنى أن يكون تطبيق واحد شامل بمعنى الكلمة . مع الشكر مقدماً

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

السلام عليكم فى الجدول حقل يحتوى على كلمة "مستجد" أو "باق" أو ... وأريد تغيير كل هذه الكلمات بهذا الحقل مرة واحدة إلى كلمة "منفول" هذا التكوين لا يلبى الطلب ، ما الخطأ فى الصورة التالية وحبذا لو وجدت عبار ة SQL تقوم بهذه الوظيفة مثل: DoCmd.RunSQL "UPDATE tbl_student1 SET tbl_student1.[Case] = ""منقول"";"

جميل جداً هذا الـ "بريمج " حسب وصفك لكن أريد تصحيح كلمة للأخ figo82eg وحدات الكهرباء تقاس بالكيلو وات وليس بالأمتار !!!!

تمام الله ينور

السلام عليكم بالمرفقات تطبيق قديم بقوم بتفعيل ميزة الـ Shift أو تعطيلها ولكن فى ملفات أكسس 2003 المطلوب التعديل _إن أمكن_ ليشمل أيضاً ملفات "accdb" بجانب "mdb" هذه صورة البداية لعمله: وعند الضغط على زر "البحث فى قاعدة البيانات" يظهر هذا التحذير لكن لا يعطل باقى الخطوات فى هذه الشاشة يظهر اختيارك للملف الهدف ، ولكن دون التعرف عليه إن كان الشيفت مغلق أم لا بعد تحديد الاختيار والنقر على زر تفعيل الاختيار shiftCancel.mdb

تمام إذن لا يوجد فى خصائص الـ List Box وكذلك الـ Queries ما يجعل محازاة معاينة الناتج العربى يميناً وذلك فى الواجهة الإنجليزية للأوفيس مهما كان إصداره ، وهذا غير مطلوب للطباعة .. فقط للمعاينة لكن الحمد لله أن هذا لا ينطبق على Text Box فى الـ Reports فمنه تكون الطباعة الاحترافية . إذن النصيحة مؤقتاً لمن يطلب رؤية عربية 100% أن يستخدم الواجهة العربية فى تطبيقات الأكسس

شكراً أخى على ردك كما ذكرت _ أنا _ هذا الوصف لا يحدث إلا لو كان برنامج الأكسس بالواجهة الإنجليزية (بأى إصدار ) تغلبت على هذه المشكلة فى الــ Text Box بـ ( المحازاة يمين ) لكن فى الـ List Box لا توجد فى خصائصة (المحازاة يمين) علماً بأن عنصر الـ List Box مصدر محتوياته هو : SELECT DISTINCTROW Mid([Name],7) AS Expr1, MSysObjects.Type FROM MSysObjects WHERE (((MSysObjects.Type)=-32764 Or (MSysObjects.Type)=-32768) AND ((MSysObjects.Name) Like "تقرير1*")) ORDER BY MSysObjects.Name; أكتشفت أيضاً أن معاينة أى Queries به نفس المشكلة أى أن محازاة أى حقل به يكون من اليسار إلى اليمين "إجباريا"

يبدو أن الرد سهلاً فى مربع النص إذ أنه فى تنسيق مربع النص يجب اختيار محازاة النص : يمين هذا عن مربع النص لكن فى "مربع قائمة" _ List Box _ لا يوجد هذا الاختيار ويظل كل المحتوى ناحية اليسار هل من حل فى"مربع قائمة"

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

تم هذا العمل ، بل وأفضل منه بالتأكيد ( ببرنامج قيجوال بيسك .نت) للاستاذ / ياسر عبد الجليل باسم OBS السؤال : هل يمكن عمل مثل هذا التطبيق ببرنامج أكسس مفتوح للإستفادة والتعلم ؟

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

السلام عليكم كما ذكرت يوجد مربع نص يطلب إدخال كلمة سر (1) ، ثم عند النقر على زر "موافق" يتم تنفيذ كود التحقق من محتوى مربع النص المطلوب الاستغناء عن زر "موافق" وبعد إدخال 1 فى مربع النص والضغط على إنتر يتم تنفيذ كود الزر المثال بالمرفقات db1.mdb

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

كل أفكارك موضع اهتمام وترحيب .. تطبيقى الحالى يحتوى على ثلاث جداول غير مرتبطة ، جدول لكل صف .. وفى نهاية كل عام يتم الحذف والتصعيد من الأدنى للأعلى ( تم مناقشة ذلك فى طلبى السابق وتم وضع حل رائع من خلالك ) عموماً كنت أريد معرفة ما هو جدول النظام هذا الذى أشرت إليه ؟ ، وما المقصود بتلك الأرقام المذكورة بكود التصفية ؟ كما ذكرت _ أنا _ نموذج أكواد التصفية تم استعارته من تطبيق زميل فاضل ، لكن لا مانع من رؤية مثالك على هذا مع الشكر مقدماً

السلام عليكم قبل التعديل فى قاعدة البيانات الخاصة بى والتى تحتوى على صف دراسى واحد لم تقابلنى أى مشكلة وذلك باستخدام نموذج إظهار التقارير ( الذى اقتبسته من أحد الزملاء ) بناءاً على فلترة معينة "وهى كلمة تقرير " لكن بعد إضافة صف دراسى آخر أو أكثر ووضع كلمة "تقرير2 " فى بدء تسمية تقارير الصف الثانى ، ظهرت المشكلة كما هو واضح فى الصور التالية ، وقد أرفقت مثال لقاعدة البيانات كما نصحنى الأخ الفاضل أبو خليل db1.rar SELECT DISTINCTROW Mid([Name],7) AS Expr1, MSysObjects.Type FROM MSysObjects WHERE (((MSysObjects.Type)=-32764 Or (MSysObjects.Type)=-32768) AND ((MSysObjects.Name) Like "تقرير*")) ORDER BY MSysObjects.Name; وما المقود بهذه الأرقام -32764 -32768

DoCmd.SetWarnings False DoCmd.DeleteObject acTable, "tbl_Student2" DoCmd.CopyObject , "tbl_Student2", acTable, "tbl_Student" DoCmd.SetWarnings True فعلاً هى أفضل إجابة بقليل من السطور فى كتابة الكود .. شكراً لك لكن أيضاً لا أنسى توجيه الشكر للأخ العزيز Foksh على مجهوده وعمله وكذلك ابو جودي على التحفيز والتحدى لنصل لهذا الحل

عملت حل سابقاً لهذا الموضوع وهو إنشاء نسخة أخرى جديدة من الجدول المستهدف ( البنية فقط ) فى هذه الحالة التسمية سوف تكون موجودة ثم حذف محتوى الجدول بهذا السطر ( وسوف يكون التسمية موجودة بعد الحذف ) إذا كان تم ملئه DoCmd.RunSQL "DELETE tbl_Student2.* FROM tbl_Student2;" المشكلة فى السطر التالى فهو يقوم بحذف التسميات العربية عندما نقوم بنسخ القديم فى الذى تم تفريغه DoCmd.RunSQL "SELECT tbl_student.* INTO tbl_student2 FROM tbl_student;" أما فى عدم إرفاقى قاعدة البيانات السبب هو أنه تم عملها على 2003 كما أن بها الكثير من الخصوصيات

تمام أصبح بلا أخطاء لكن ما زال رؤوس الجدول الجديد الناتج بأسماء الحقول الإنجليزية وليست بأسماء التسمية التوضيحية

عذراً على التأخر فى الرد لأسباب خارجة تم إضافة المكتبة المذكورة .. لكن بعد ذلك ظهر خطأ جديد

Dim db As Database تعطى نفس الخطأ أيضاً ؟ عموماً تغيير رؤوس الجدول لا تأثر على المخرجات المطلوبة ( التقارير ) إذن سأكتفى مؤقتاً بالكود الصحيح ، وشكراً جزيلاً لكم

معذرة .. تعبتك معايا اكتشفت أن الكود التالى غير متوافق مع 2003 Dim db As DAO.Database