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

[safaa salem5]

عايزه لما افتح فورم اسمه

visit_frm

يروح يشوف فى جدول اسمه

test_order_tbl

لو 

test

 امامه كلمة

see report

متعلم عليها صح

تتنقل نفس الكلمه فى فيلد اسمه

Result

---------------------------------------------------------------------------------

النقطه التانيه عايزه لما اضغط على زرار 

result

يروح يشوف فى الجدول

test_order_tbl

لو 

test

 امامه كلمة

see report

متعلم عليها صح

يفتحلى نموزج بنفس اسم التحليل

-------------------------------------------------------------

لكن لو مش متعلم عليها صح
هيفتح فورم

 بناء على وجود احد الخياررات من جدول 

الاعدادات

---------------------------------------

الاول

فى حالة 

result_collect =-1

فى جدول

settings_general_tbl

فى الحاله دى

يفتح الفورم اللى اسمه

result_collect_frm

 

بنفس التحاليل  الموجوده فى

visit_frm

 بناء على المجموعه الفرعيه الخاصه بهم

sub

------------------------------------------------

التانى 

التحاليل فى حالة 

result_all  =-1

فى جدول

settings_general_tbl

فى الحاله دى

يفتح الفورم اللى اسمه

result_lab_frm

لكل تحليل على حده

 --------------------------------------------------------  

الاخيره 

التحاليل فى حالة

result_collect =-1

result_all  =-1

فى جدول

settings_general_tbl

فى الحاله دى

يفتح الفورم اللى اسمه

result_collect_frm

بناء على ال مجموعه الرءيسيه

main 

الخاص بالتحاليل المطلوبه

lab0.rar

[safaa salem5]

2 hours ago, safaa salem5 said:

 بالظبط زى المثال دا

 

 

تم تعديل نوفمبر 6, 2023 بواسطه safaa salem5

[safaa salem5]

??

[safaa salem5]

ممكن حد يساعدنى

[عمر ضاحى]

بالنسبه للنقطه هذه 

20 ساعات مضت, safaa salem5 said:

عايزه لما افتح فورم اسمه

visit_frm

يروح يشوف فى جدول اسمه

test_order_tbl

لو 

test

 امامه كلمة

see report

متعلم عليها صح

تتنقل نفس الكلمه فى فيلد اسمه

Result

استخدمي هذا الاستعلام 

UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'')
WHERE (((test_order_tbl.see_report)=Yes));

 

[safaa salem5]

40 minutes ago, عمر ضاحى said:

بالنسبه للنقطه هذه 

استخدمي هذا الاستعلام 

UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'')
WHERE (((test_order_tbl.see_report)=Yes));

 

تمام بس النور يجى وهجربها 

متشكره اوى لحضرتك  استاذ عمر

تحت حدث عند الفتح صح كدا

تم تعديل نوفمبر 7, 2023 بواسطه safaa salem5

[safaa salem5]

5 minutes ago, عمر ضاحى said:

بالنسبه للنقطه هذه 

استخدمي هذا الاستعلام 

UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'')
WHERE (((test_order_tbl.see_report)=Yes));

 

 

6 minutes ago, عمر ضاحى said:

بالنسبه للنقطه هذه 

استخدمي هذا الاستعلام 

UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'')
WHERE (((test_order_tbl.see_report)=Yes));

 

عمل خط احمر فى حاجه غلط

[safaa salem5]

??

[عمر ضاحى]

3 ساعات مضت, safaa salem5 said:

 

عمل خط احمر فى حاجه غلط

لا لا مش كده 

بصي ده الملف ال كنت شغال عليه 
لكن للاسف ما كملت الشغل بسبب الشغل واطريت اوقف العمل فيه 
lab0.rar

ال كتبته لكي ده كود SQL لاستعلام 
وبيتم تشغيل الاستعلام من داخل النموذج بهذه الطريقة 
 

DoCmd.SetWarnings False
DoCmd.OpenQuery "UpdateTestTable"
DoCmd.SetWarnings True

على فرض ان الاستعلام اسمه   UpdateTestTable

 

ان شاء الله انا بحاول انفذ الفكره بتعتك لكن المشكله فى تواجدي على الجهاز 
فان شاء الله بحاول اخلثها لك غدا وانا فى الدوام 

في 6‏/11‏/2023 at 18:58, safaa salem5 said:

result_collect =-1

 

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

[safaa salem5]

13 minutes ago, عمر ضاحى said:

لا لا مش كده 

بصي ده الملف ال كنت شغال عليه 
لكن للاسف ما كملت الشغل بسبب الشغل واطريت اوقف العمل فيه 
lab0.rar

ال كتبته لكي ده كود SQL لاستعلام 
وبيتم تشغيل الاستعلام من داخل النموذج بهذه الطريقة 
 

DoCmd.SetWarnings False
DoCmd.OpenQuery "UpdateTestTable"
DoCmd.SetWarnings True

على فرض ان الاستعلام اسمه   UpdateTestTable

 

ان شاء الله انا بحاول انفذ الفكره بتعتك لكن المشكله فى تواجدي على الجهاز 
فان شاء الله بحاول اخلثها لك غدا وانا فى الدوام 

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

 ميرسى لحضرتك يا استاذ عمر

تمام منتظره حضرتك . ولو فى امكانيه تحويل الاستعلام لكود بالكامل يبقى افضل

[عمر ضاحى]

8 دقائق مضت, safaa salem5 said:

 ميرسى لحضرتك يا استاذ عمر

تمام منتظره حضرتك . ولو فى امكانيه تحويل الاستعلام لكود بالكامل يبقى افضل

Dim strSQL As String
strSQL = "UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'') " & _
         "WHERE (((test_order_tbl.see_report)=Yes));"
DoCmd.RunSQL strSQL

اتفضلى 
لكن محتاج توضيح بخصوص 
هذه النقطه 
 

 

27 دقائق مضت, عمر ضاحى said:

 

في 6‏/11‏/2023 at 18:58, safaa salem5 said:

result_collect =-1

 

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

 

[safaa salem5]

11 minutes ago, عمر ضاحى said:

Dim strSQL As String
strSQL = "UPDATE test_order_tbl SET test_order_tbl.result = IIf([see_report]=Yes,[test],'') " & _
         "WHERE (((test_order_tbl.see_report)=Yes));"
DoCmd.RunSQL strSQL

اتفضلى 
لكن محتاج توضيح بخصوص 
هذه النقطه 
 

 

 

بيعمل

UPDATE 

باسم التحليل

لا انا عايزه يعمل

UPDATE 

بقيمه ثابته اللى هى كلمة 

SEE REPORT

 

[عمر ضاحى]

اوك
سهله 
غيري فى الكود الكلمة

[test]

الى 

 

'SEE REPORT'

بالنسبه لباقى التعديلات حسب فهمي للمطلوب
اتمني يكون ده المطلوب

راجعي الملف المرفق

 

 

lab0.rar

تم تعديل نوفمبر 7, 2023 بواسطه عمر ضاحى

[safaa salem5]

19 minutes ago, safaa salem5 said:

بيعمل

UPDATE 

باسم التحليل

لا انا عايزه يعمل

UPDATE 

بقيمه ثابته اللى هى كلمة 

SEE REPORT

 

ملخص الفكره  كلها 

 ان فى تحليل بيكون جزأ من مجموعه فرعيه 

هكلمك مثلا على وظايف الكى

فيها 

UREA

CREATININE

URIC ACID

SODIUM

POTASSIUM

فى الحاله دى

وظايف الكلى هى المجموعه الفرعيه 

SUB

كل تحليل من اللى انا زكرتهم داخل تحت ال 

SUB دي

تمام

------------------------------------------------------------

طيب 

وظايف الكلى ووظايف الكبد مجموعه الدهون

كلها مجموعات فرعيه

SUB

تقع تحت مجموعه رأيسيه

MAIN

اسمها 

CHEMISTRY

---------------------------------------------------------------

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

لكن فى بعض الاوقات بيكون التحليل تقريره كبير 

زى صورة الدم وزى البول 

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

تم تعديل نوفمبر 7, 2023 بواسطه safaa salem5

[عمر ضاحى]

8 دقائق مضت, safaa salem5 said:

ملخص الفكره  كلها 

 ان فى تحليل بيكون جزأ من مجموعه فرعيه 

هكلمك مثلا على وظايف الكى

فيها 

UREA

CREATININE

URIC ACID

SODIUM

POTASSIUM

فى الحاله دى

وظايف الكلى هى المجموعه الفرعيه 

SUB

كل تحليل من اللى انا زكرتهم داخل تحت ال 

SUB دي

تمام

------------------------------------------------------------

طيب 

وظايف الكلى ووظايف الكبد مجموعه الدهون

كلها مجموعات فرعيه

SUB

تقع تحت مجموعه رأيسيه

MAIN

اسمها 

CHEMISTRY

---------------------------------------------------------------

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

لكن فى بعض الاوقات بيكون التحليل تقريره كبير 

زى صورة الدم وزى البول 

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

جربي المرفق ولو فى ملاحظات اكتبيها 

 

[safaa salem5]

كل اللى قدامه كلمة 

SEE REPORT 

تقرير كبير ليه فورم خاص بنفسه

باقى التحاليل هتتجمع فى فورم واحد

سواء كانت تحت مجموعه فرعيه او مجموعه رئيسيه

 لكن 

انا جربت الملف كله بيفتح نفس الفورم

[عمر ضاحى]

غيري فى الاعدادات 

 

[safaa salem5]

كلمة 

See Report

خلاص ظبطها تسلم ايديك

 

Just now, عمر ضاحى said:

غيري فى الاعدادات 

 

بص يا استاذ عمر 

اى تحليل قدامه كلمة 

see report

فى كل الاحوال هيفتح الفورم بتاعه مالوش دعوه بالاعدادات دى

[عمر ضاحى]

واضح انى ممكن اكون مش مركز  وفى غلط انا واقع فيه 
فانا هستأذنك لغدا ان شاء الله لاني مش شايف قدامي وبصحة الساعه 4:30 الفجر 
ف باذن الله هعيد الكود كله من اول وجديد واعطيكى الحل النهائى ان شاء الله

[safaa salem5]

3 minutes ago, عمر ضاحى said:

واضح انى ممكن اكون مش مركز  وفى غلط انا واقع فيه 
فانا هستأذنك لغدا ان شاء الله لاني مش شايف قدامي وبصحة الساعه 4:30 الفجر 
ف باذن الله هعيد الكود كله من اول وجديد واعطيكى الحل النهائى ان شاء الله

متشكره لحضرتك جزاك الله كل خير فى انتظارك

[safaa salem5]

3 hours ago, عمر ضاحى said:

لا لا مش كده 

بصي ده الملف ال كنت شغال عليه 
لكن للاسف ما كملت الشغل بسبب الشغل واطريت اوقف العمل فيه 
lab0.rar

ال كتبته لكي ده كود SQL لاستعلام 
وبيتم تشغيل الاستعلام من داخل النموذج بهذه الطريقة 
 

DoCmd.SetWarnings False
DoCmd.OpenQuery "UpdateTestTable"
DoCmd.SetWarnings True

على فرض ان الاستعلام اسمه   UpdateTestTable

 

ان شاء الله انا بحاول انفذ الفكره بتعتك لكن المشكله فى تواجدي على الجهاز 
فان شاء الله بحاول اخلثها لك غدا وانا فى الدوام 

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

اه سجل واحد

[عمر ضاحى]

جربي الملف ده

lab0.rar

[safaa salem5]

12 hours ago, عمر ضاحى said:

جربي الملف ده

lab0.rar 179.12 kB · 8 downloads

مساء الخير يا استاذ عمر

معلش لسه فاتحه الملف دلوقتى

 تسلم ايديك وجزاك الله خيرا

بس عندى  ملاحظه لو وقتك يسمح

لو  ينفع بدل ما ندخل جدول 

setting 

جوا الفورم 

استبدلها بكود

زى 

dulookup

ياريت ياريت ياريت

--------------------------------------

النقطه التانيه

لما اضغط على زرار 

result 

عايزه قيمة 

sub,code,test

تتنقل من ال

sub form

للفورم الرءيسى زى الصوره

الزرار

lab after.rar

تم تعديل نوفمبر 8, 2023 بواسطه safaa salem5

[عمر ضاحى]

3 دقائق مضت, safaa salem5 said:

مساء الخير يا استاذ عمر

معلش لسه فاتحه الملف دلوقتى

 تسلم ايديك وجزاك الله خيرا

بس عندى  ملاحظه لو وقتك يسمح

لو  ينفع بدل ما ندخل جدول 

setting 

جوا الفورم 

استبدلها بكود

زى 

dulookup

ياريت ياريت ياريت

--------------------------------------

النقطه التانيه

لما اضغط على زرار 

result 

عايزه قيمة 

sub,code,test

تتنقل من ال

sub form

للفورم الرءيسى زى الصوره

الزرار

lab after.rar 752.61 kB · 0 downloads

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

انا كنت حاطه علشان اغير واجرب بدل ما ادخل على جدول الاعدادات وادور واعدل مجرد اختصاره

-------------

بالنسبه للنقطه الثانيه سهله جدا

بس ايه الغرض

[عمر ضاحى]

عموما 

اتفضلى هذا الحل 

lab after.rar