الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مساعدة في فتح نموذج فرعي على النموذج الرئيسي

مغلق
بدأه أنفوي في 22 يوليو 2003 · 15 رد · 1,305 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ياخبراء البرمجة .. المساعدة

المشكلة .. تتلخص في التالي:

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

والمثال بالملف المرفق ..

أرجو المساعدة ..... مع التلطف والتكرم بشرح مايتم عمله لحل هذه المشكلة

db1.zip

#2

تم التعديل على الملف وارجوا ان يكون المطلوب

مع ملاحظة ان البحث يتم عن طريق رقم _ الموظف

db1.zip

#3

والله رهييب يا شقاوي17 ... بارك الله فيك ..

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

(f)

#4

لديك التعديل التالي: كان عندك اخطاء حسب معرفتي البسيط :

1- عدم ربط الجداول

2- المفتاح الاساسي يجب عدم تكرار نفس القيم به ( حسب معرفتي )

يمكن تحميل الملف

db1.zip

#5

أحسنت .. أستفدت منك كثيراً .. بارك الله فيك ..

الإجابة كاملة على أكمل وجه بالنسبة لي .. وفقك الله ..(f)(f)(f)(f)(f)

#6

مشكورين اخواني

اخي الشقاوي17

مافائدة وضع هذه القيمه في الفلتر للنموذج

[رقم_االموظف]=10009

ومشكور

#7

مشكور يالشقاوي .. والله يجزاك عنا خير ... حليت لي مشكلة كبيرة ..

والله يخليك ... وأخواننا في المنتدى ذخر لنا..

#8

اخوي sary افيح النموذج في عرض التصميم واذهب الى خصائص زر الامر ==>ثم الى حدث ==> ثم عند النقر وافتح الحدث تجد

stLinkCriteria = "[رقم_االموظف]=" & Me![رقم الموظف]

اي يفتح النموذج الفرعي عندما :

رقم الموظف في النموذج الرئيسي = رقم الموظف في النموذج الفرعي

[رقم الموظف ] = 1009 في حقل الفلتر هذا اخطا زميلنا حيث وضح القيمه الافتراضية للحقل = 1009 مع انه مفتاح رئيسي ويجب عدم وضع قيمة متكرره اتمنى ان تكوت الاجابة واضحه

#9

أخوي الشقاوي ...

أولا شكرا لك ..

ثانيا ..تراني عليمي جدا ..وألف باء ..في الأكسس

ثالثا ..تحملني ... ابقى أفهم ..

حاولت تجريب الدالة الي وضعتها على برنامجي الي أعده ..وهي

Private Sub ÃãÑ8_Click()

On Error GoTo Err_ÃãÑ8_Click

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = ChrW(1585) & ChrW(1594) & ChrW(1576) & ChrW(1575) & ChrW(1578) & ChrW(32) & ChrW(1575) & ChrW(1604) & ChrW(1606) & ChrW(1602) & ChrW(1604)

stLinkCriteria = "[ÑÞã_ÇÇáãæÙÝ]=" & Me![ÑÞã ÇáãæÙÝ]

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_ÃãÑ8_Click:

Exit Sub

Err_ÃãÑ8_Click:

MsgBox Err.Description

Resume Exit_ÃãÑ8_Click

End Sub

مانفعت معي ...

حيث يذكر لي أن نموذج طلبات النقل غير موجود ..

والصحيح أن برنامجي ليس فيه نموذج طلبات نقل .. وإنما وضعتها في المثال فقط ..

تكرما ..وليس أمرا ... أرجو توضيح هذه الدالة ..وكيفية إدراج اسم النموذج فيها ..

#10

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

الطريقة كالتالي :

انشي زر امر من قائمة الادوات سوف يظهر لك معالج الزر الامر ==> اختر النماذج ===> فتح نموذج ====> ثم يظهر لك خياران احدهما فتح النموذج لسجل معين

والثاني اظهر النموذج مع كافة السجلات

اختار فتح نموذج معين لسجل

ثم تظهر لك شاشة لتحدد الحقول المتساوية " التي من خلالها يفتح النموذج الاخر وفي مثالنا السابق هو رقم الموظف

#11

مشكورا ...

لكن انشأت زر أمر ... ولكن ماطلع عني إلي تقول .. أي معالج الزر ..

وانا ترى اشتغل على أكسس 2000

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

#12

هذه اضافة في اكسس اكس بي

#13

طيب وش الحل ... إذا كان الي عندي 2000

#14

حاول تنزل الاوفس اكس بي ، ولن تحتاج الى اكواد كثيرة لتقوم ببرنامج جيد

#15

مشكور يالشقاوي ..وما قصرت

ابحاول انزل ... الكس بي

ولعل يتعطف علينا أحد من خبراء المنتدى .. ويحل المشكلة .. وهو على 2000

ساعدونا ................

#16

للتذكير ... والمساعدة

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…