اذهب الي المحتوي
أوفيسنا

ربط نماذج فرعية برقم خلية معينة


الردود الموصى بها

السلام عليكم ورحمة الله وبركاتة

اخواني واخواتي أعضاء المنتدى

السلام عليكم ورحمة الله وبركاتة

أهنئكم بقرب شهر الرحمة     وتقبل الله منا ومنكم صالح الاعمال         وكل عام وانتم بخير

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

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

الرجو المساعدة وتوضيح ذلك

ولكم تحياتي

برنامج عروض اعقار.rar

رابط هذا التعليق
شارك

23 ساعات مضت, سلمان عبدالله said:

السلام عليكم ورحمة الله وبركاتة

و عليكم السلام و رحمة الله و بركاته ... :fff:

اولا : شكل النموذج للبحث و ليس للادخال .

ثانيا : للربط يجب ان يكون لدينا جدولين او اكثر ,

             و نموذج الادخال غير مستند الى جدول ...

رابط هذا التعليق
شارك

اهلين اخي ابو جنى

النموذج للبحث والادخال في وقت واحد

ارجو منك التكرم في حل هذة المشكلة 

او تعريفي بكيفية حلها

وللتوظيح اكثر 

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

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

ارجو مساعدتي وشكرا

رابط هذا التعليق
شارك

  • 4 weeks later...

الله كريم

المشكلة مازالت قائمة وين المحترفين   هل ماطلبتة  صعب 

اوضح لكم اكثر 

لدي نموذجين 

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

او دلوني على كود يعملها 

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

رابط هذا التعليق
شارك

كل عام وانتم بخير وتقبل الله طاعتكم

تفضل اخي الكريم

ملفك بعد التعديل

جرب ووافني بالنتيجة

::

تحياتي

برنامج عروض waz-اعقار.rar

تم تعديل بواسطه alwazeer
ادراج المرفق
رابط هذا التعليق
شارك

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

ماقصرت والله يرزقك من واسع فضلة 

وكذالك شكرا لاخي الساحة البريدية على محاولت مساعدتي وماقصرتوا جميعا 

وكل عام وانتم واعضاء هذا المنتدى بالف خير وجميع المسلمين

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

وحدمة صغير اذا ممكن 

في مربع البحث عن رقم الارض اذا كتبت مثلا رقم 22 يعطيني كل الارقام المشابهه مثل 220 و221 و226 وهكذا 

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

وشكرا مرة ثانية

رابط هذا التعليق
شارك

في 7/6/2016 at 06:09, سلمان عبدالله said:

في مربع البحث عن رقم الارض اذا كتبت مثلا رقم 22 يعطيني كل الارقام المشابهه مثل 220 و221 و226 وهكذا 

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

استبدل الكود الموجود في حدث عند التغيير بهذا الكود

Dim MyStr As String
MyStr = Nz(Me.Text0.Text, "")
If MyStr = "" Then
    Me.ن_ف_العرض.Form.RecordSource = "SELECT ج_العرض.* FROM ج_العرض;"
Else
    Me.ن_ف_العرض.Form.RecordSource = "SELECT ج_العرض.* FROM ج_العرض" & " WHERE (((ج_العرض.رقم_الارض) Like '*' & '" & MyStr & "' ));"
End If

 

في 7/6/2016 at 06:09, سلمان عبدالله said:

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

عن طريق تحديث الحقل في الجدول، لاحظ في حدث عند النقر المزدوج

::

تحياتي

رابط هذا التعليق
شارك

شكرا اخي العزيز الوزير

بالنسبة للكود استبدلتة بالكون السابق

ولكن النتائج زي ماهي لا يعطي الرقم المحدد

مثل لما اضع رقم 16 يعطيني 161-116-167-216 وهكذا 

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

ادري اني ثقلت علية 

اتمنا لك التوفيق وكثر الله من امثالك

رابط هذا التعليق
شارك

Dim MyStr As String
MyStr = Nz(Me.Text0.Text, "")
If MyStr = "" Then
    Me.ن_ف_العرض.Form.RecordSource = "SELECT ج_العرض.* FROM ج_العرض;"
Else
    Me.ن_ف_العرض.Form.RecordSource = "SELECT ج_العرض.* FROM ج_العرض" & " WHERE (((ج_العرض.رقم_الارض)=[text0]));"
End If

تفضل ضعه في حدث بعد التحديث لحقل البحث [Text0] واحذف الحدث عند التغيير في نفس الحقل

يعمل البحث بعد الضغط على مفتاح الادخال Enter

جرب ووافني بالنتيجة

::

تحياتي

تم تعديل بواسطه alwazeer
  • Like 3
رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاتة

اخي الوزير 

لا تحلرمنا من عطائك

غيرت طريقة النموذج الرئيسي عن الطريقة الاولى لان هذة الطريقة اسهل لي

المطلوب اخي العزيز 

ربط جميع النماذج الفرعية برقم العرض مع نموذج (ن_ف_العرض) وهو الاساسي اريد لما اقف على احد سجلات هذا النموذج في اي مكان من السجل او في خلية رقم العرض ان تاخذ النماذج الفرعية نفس الرقم وهي مفتوحة امامي كي اعدل عليها وهي مرتبطة بنفس رقم العرض 

اليك المثال وستتضح الصورة اكثر

وتسلم ياغالي ماقصرت

ربط نماذج بنموذج العرض 4-10-1437.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاته

اخي الكريم سلمان

يرجى التوضيح اكثر

فتحت المرفق ولم افهم ما تريد

هناك نموذج ن_عروض الاراضي فيه نماذج فرعية 

ونموذج ن_ف_العرض

؟؟

رابط هذا التعليق
شارك

هلا اخي الوزير

نموذج (ن_عروض الاراضي) هذا نموذج فارغ للبحث وجميع النماذج الفرعية بداخلة والشغل كلة بيكون من خلال هذا النموذج

اما نموذج (ن_ف_العرض) وهو الاساسي اريد لما اقف على احد سجلاتة او على خلية (رقم_العرض) بمجرد الوقوف 

تاخذ جميع النماذج الفرعية والتي تكون تحتة مباشرة نفس رقم العرض الذي وقفت علية في النموذج الكبير في الاعلى (ن_ف_العرض) حتى استطيع ادخال باقي البينات في النماذج الفرعية الستة بنفس رقم العرض

ارجو ان اكون وضحت 

شكرا لاهتمامك 

وهنيا للمنتدى بامثالك

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information