مساعدة لمبتي

هو الحكايه شبه بسيطه

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

هتحط الكود في حدث الكومبو الكي دون

IF KEYCODE="13" THEN
RS.FIND "NAME= '" + COMBO1 + "'"
IF RS.EOF THEN 
MSGBOX " NOT FOUND EMP"
FORM1.SHOW
ELSE
كود اظهار الفاتوره
END IF

RS هو اسم المتغير الذي يحمل جمله فتح الجدول

و NAME بدله باسم حقل العملاء

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

-------

لو مع الداتا كنترول

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

IF KEYCODE="13" THEN
DATA1.RECORDSET.FINDFIRST "NAME= '" + COMBO1 + "'"
IF DATA1.NOMATCH THEN 
MSGBOX " NOT FOUND EMP"
FORM1.SHOW
ELSE
كود اظهار الفاتوره
END IF

ملحوظه علشان تحمل الكومبو تاني باسم العميل الي انضاف جديد لان طبعا الشاشه بتاعت الفتوره مش هتتقفل

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

DATA1.REFRESH

ده لو في حاله انك بتستخدم الدي بي كومبو

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

لان لو كومبو عادي هتعمل اعاده تحميل اللوب علشان يقرا الداتا الجديده

او تعيد تحميل متغير RS

IF RS.STATE=1 THEN RS.CLOSE

RS.OPEN "NAMETABLE",CN,1,2

بحيث CN هي التي تحوي جمله فتح قاعده البيانات البروفيدير يعني

والله هو الأعلم