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

[Mohamed rafaat]

السلام عليكم 

اريد حل لهذه المشكله باذن الله

قمت بعمل بحث علي الفواتير واظهار النتائج بالتقرير وعند الضغط علي رقم الفاتورة بيتم فتح نموذج الفاتوره 

المشكله انه بيفتح بيانات الفاتورة رقم ١ حتي عند اختيار فاتوره رقم ٣ بيظهر فالنموذج الفاتورة رقم ٣ وباقي بيانات النموذج الرئيسي والفرعي بيانات الفاتوره رقم ١

وهذا هو الكود المستخدم

Private sub Id_click() 

Docmd. Openform "Invoicepay" 

Dim s

S= me. Id

Docmd. Gotocontrol "Idinv" 

Docmd. Findrecord s

[forms]![Invoicepay]![Idinv] =s

[AlwaZeeR]

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

DoCmd.OpenForm "Invoicepay", , , "[Idinv]=" & Me.ID

 

[Mohamed rafaat]

شكرا لرد حضرتك ولكن هل الغي الكرد كامل واكتب الكود الذي ارسلته لي

[AlwaZeeR]

  في 18‏/1‏/2021 at 21:28, Mohamed rafaat said:

شكرا لرد حضرتك ولكن هل الغي الكرد كامل واكتب الكود الذي ارسلته لي

Expand  

نعم صحيح

[Mohamed rafaat]

  في 18‏/1‏/2021 at 21:32, AlwaZeeR said:

نعم صحيح

Expand  

ولكن اعطاني رساله ادخال قيمه معلومه

 

[AlwaZeeR]

ارفق مثالا صغيرا

 

[Mohamed rafaat]

الملف 

Database1.rarFetching info...

[AlwaZeeR]

 

DoCmd.OpenForm "InvoiceSales", , , "[id]=" & Me.Id

 

[Mohamed rafaat]

  في 18‏/1‏/2021 at 22:27, AlwaZeeR said:

 

DoCmd.OpenForm "InvoiceSales", , , "[id]=" & Me.Id

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

Expand  

 

[AlwaZeeR]

Invoicepay

هذا النموذج؟؟

اين هو؟

ما هو اسم النموذج الذي تريد فتحه عند الضغط على رقم الفاتورة؟

ما هو المعيار ؟

[Mohamed rafaat]

  في 18‏/1‏/2021 at 22:41, AlwaZeeR said:

Invoicepay

هذا النموذج؟؟

اين هو؟

ما هو اسم النموذج الذي تريد فتحه عند الضغط على رقم الفاتورة؟

ما هو المعيار ؟

Expand  

النموذج InvoiceSales

عند الضغط علي رقم الفاتوره بالتقرير يتم فتح الفاتورة التي اختارتها

[Mohamed rafaat]

ارجو المساعد من الأعضاء 

[Mohamed rafaat]

  في 18‏/1‏/2021 at 22:44, Mohamed rafaat said:

النموذج InvoiceSales

عند الضغط علي رقم الفاتوره بالتقرير يتم فتح الفاتورة التي اختارتها

Expand  

 

  في 18‏/1‏/2021 at 22:41, AlwaZeeR said:

Invoicepay

هذا النموذج؟؟

اين هو؟

ما هو اسم النموذج الذي تريد فتحه عند الضغط على رقم الفاتورة؟

ما هو المعيار ؟

Expand  

حضرتك ماوصلتش لحل للمشكله

[Mohamed rafaat]

ارجو المساعده لضرورة الامر

[Mohamed rafaat]

انا اسف للجميع ارجو المساعده في طلبي والنموذج مرفق فالاعلي

[biskra]

  في 22‏/1‏/2021 at 11:49, Mohamed rafaat said:

انا اسف للجميع ارجو المساعده في طلبي والنموذج مرفق فالاعلي

Expand  

يظهر أن ئؤالك غير واضح أخي الكريم، حسب الملف الذي أرفقته، لو استبدلت الكود الموجود في الملف

DoCmd.OpenForm "InvoiceSales", , , "[IdInv]=" & Me.Id

بالكود المقترح أعلاه سوف يفتح لك الفورم الذي ذكرته في طلبك

DoCmd.OpenForm "InvoiceSales", , , "[id]=" & Me.Id

إلا إذا كان ما تريده شيئا آخر

[Mohamed rafaat]

  في 22‏/1‏/2021 at 12:52, biskra said:

يظهر أن ئؤالك غير واضح أخي الكريم، حسب الملف الذي أرفقته، لو استبدلت الكود الموجود في الملف

DoCmd.OpenForm "InvoiceSales", , , "[IdInv]=" & Me.Id

بالكود المقترح أعلاه سوف يفتح لك الفورم الذي ذكرته في طلبك

DoCmd.OpenForm "InvoiceSales", , , "[id]=" & Me.Id

إلا إذا كان ما تريده شيئا آخر

Expand  

شكرا لرد حضرتك

سؤالي هو عند عمل بحث يتم اظهار نتيجه البحث بالتقرير اريد عند الضغط علي رقم الفاتوره بالتقرير فتح النموذج برقم الفاتوره

المشكله عند الضغط علي رقم فاتوره ٣ يتم فتح الفاتوره رقم ١ فقط ولم يتم فتح الفاتوره التي تم اختيارها اعتقد ان المشكله بالنموذج

 

[biskra]

Private Sub Id_Click()
DoCmd.OpenForm "InvoiceSales"
Dim s
s = Me.Id
DoCmd.GoToControl "Idinv"
[Forms]![invoiceSales]![IdInv] = s
End Sub

جرب الكود التالي

 

[Mohamed rafaat]

  في 22‏/1‏/2021 at 13:47, biskra said:

Private Sub Id_Click()
DoCmd.OpenForm "InvoiceSales"
Dim s
s = Me.Id
DoCmd.GoToControl "Idinv"
[Forms]![invoiceSales]![IdInv] = s
End Sub

جرب الكود التالي

 

Expand  

حضرتك جربتها علي الملف واشتغل معاك تمام فتح الفاتوره بجميع بياناتها 

لاني قمت بكتابة كود مشابه ولم يدرك بيانات الفاتورة كامله والكود في الاول خالص

[Mohamed rafaat]

برجاء المساعده 

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

[Mohamed rafaat]

Database1.rarFetching info...