اريد تصميم نموذج ادخال لرقم الجهة الصادر لها بحيث عند ادخال الرقم يضهر عندنا اسم الجهة الصادر لها لاني مطبق قاعدة IF ولكن عند اضافة جهة صادرة لابد ان
اضيف في كود البرنامج الرقم والجهة واريد حلا لهذا الموضوع والشرح موجود في الملف المرفق
اظهار اسم الجهة عند كتابة رقمها داخل النم
مغلق
أنا آسف لك يا أخي والله ما فهمت شيء برجاء وضح الامر أكثر وأيضاً برجاء ارفاق مثال لما تريد ليتم التعديل علية
هذا سيسهل علينا كثير وسنصل للمطلوب ان شاء رب العالمين
اريد تصميم نموذج ادخال لرقم الجهة الصادر لها بحيث عند ادخال الرقم يضهر عندنا اسم الجهة الصادر لها لاني مطبق قاعدة IF ولكن عند اضافة جهة صادرة لابد ان
اضيف في كود البرنامج الرقم والجهة واريد حلا لهذا الموضوع والشرح موجود في الملف المرفق
ابوالوليد
في البداية أحب أن أشكر الاخ الغالي ايهاب عثمان علي توضيح المطلوب من خلال تعديل العنوان
أخي الغالي tmtm
لقد تم التعديل بمرفقك ولكن لا أستطيع ارسال لك الملف الان لوجود عندي مشكلة بالسيرفر وان شاء الله سوف أرفق لك الملف اليوم أو غداً بإذن الله متضمن كافة التعديلات المطلوبة
ولكن دعني أشرح لك بالضبط ما تم عملة لك بالمرفق لعل تصل لشيء لحين تحميل المرفق
1 - قم بإنشاء جدول جديد باسم الجهات ( حقل اسمة ID ويكون ترقيم تلقائي وحقل آخر اسمة الجهات ويكون Text )
2 - قم بكتابة ما يحلو لك من الجهات المطلوبة يارب تكتب ترليون جهة وطبعاً الترقيم التلقائي يعمل لوحدة اوعي تيجي جنبة لتتعور
3 - اذهب شاشة الصادر السري واحذف الكمبو بوكس الذي يوجد به أرقام الجهات وبما يحتوية من أكواد أيضاً في محرر الفيجوال بيسك
4 - قم بحذف أيضاً الكمبو بوكس الذي يحتوي علي أسماء الجهات الملاصق للكمبو بوكس اللي سيادتك حذفته
5 - قم بإنشاء كومبو بوكس جديد بالمعالج يكون مصدر بياناته ( ID ) الموجود في جدول الجهات علي أن يكون اسم هذا الكمبو C1
6 - قم بانشاء مربع نص جديد غير منضم بجانب هذا الكمبو علي أن يكون اسمة T1
7 - اضغط دبل كليك علي الكمبو بوكس C1 وادخل الي شاشة محرر الفيجوال بيسك في حدث بعد التحديث أو After Update
8- اكتب في هذا الحدث الكود التالي : -
[T1] = DLookup("[ÇáÌåÇÊ]", "ÇáÌåÇÊ", "id=[C1]")9 - اغلق محرر الفيجوال بيسك ثم اذهب لتري النتيجة أن شاء سيكون هذا هو المطلوب
10 - اذا اردت بعد ذلك اضافة ملايين من الجهات
اتبع هذه الخطوات
1 - قم بانشاء نموذج جديد يكون مصدرة الجدول السالف ذكرة ( الجهات )
2 - ودع المعالج يأخذك خطوة خطوة حتي تنتهي من انشاء هذا النموذج اللعين
3 - اذهب لشاشة الصادر السري مرة اخري ثم اذهب للكمبو بوكس مرة اخري C1 وادخل الي محرر الفيجوال بيسك في حدث عند الضغط دبل كليك أو On Dbl Click
4 - ضع في هذا الحدث الكود التالي
Docmd.openform "الجهات"
قم بتجربة فتح مشروعك مرة اخري وحاول اختيار رقم الجهة ليتم وضعة في التكست بوكس المقابل
واذا اردت اضافة الوف الجهات قم بالضغط علي الكمبو بوكس C1 دبل كليك ليتم فتح نموذج الجهات وضف اليه ما تريد من جهات جديدة
أتمني أن يكون شرحي وافي
وان شاء الله أرفق لك الملف بعد حل مشكلة السيرفر
والله الموفق
هذا الموضوع مغلق.