كتابة رقم الخدمة تظهر الخدمة وسعرها فى ال

ضع هذا الكود فى حدث بعد التحديث لكود الخدمة

Me.name_kh = DLookup("name_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Me.pr_kh = DLookup("pr_kh", "t_kh", "id_kh='" & Me.id_kh & "'")

Abo_Yossof كتب:

ضع هذا الكود فى حدث بعد التحديث لكود الخدمة

Me.name_kh = DLookup("name_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Me.pr_kh = DLookup("pr_kh", "t_kh", "id_kh='" & Me.id_kh & "'")

اشكرك بشدة ومرسى جدا لاهتمامك البالغ

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

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

حد طيب يرد على انا مش عارف احل المشكلة دى

اخى الكريم

تحلى بالصبر اكثر من ذلك

الاجابة الاولى كانت على قدر سؤالك

If DCount("id_kh", "t_kh", "id_kh='" & Me.id_kh & "'") > 0 Then
Me.name_kh = DLookup("name_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Me.pr_kh = DLookup("pr_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Else
MsgBox "جديد"
End If

Abo_Yossof كتب:

اخى الكريم

تحلى بالصبر اكثر من ذلك

الاجابة الاولى كانت على قدر سؤالك

If DCount("id_kh", "t_kh", "id_kh='" & Me.id_kh & "'") > 0 Then
Me.name_kh = DLookup("name_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Me.pr_kh = DLookup("pr_kh", "t_kh", "id_kh='" & Me.id_kh & "'")
Else
MsgBox "جديد"


End If

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

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

واسف على الازعاج مرة اخرى