POWER _GIRL

عرض بيانات تابعه لبيان معين موجود فالقائمة المنسدله فالنموذج

20 ردود في هذا الموضوع

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

كيفك المنتدى وأخبارو ........................................................تحياتي للجميع

للتوضيح (قمت بعمل قاعدة مصغره توضح طلبي فالمرفقات)

-_- سؤالي أريد أن أعرض جميع السجلات الخاصه بالبيان الذي أختاره من القائمة المنسدله

:huh: مثلا لو إخترت نجمه من القائمة المنسدله تظهرلي فالاسفل سجلات النجوم وطبعا أنا لما خزنت البيانات فالقائمة المنسدله خزنتها مع المفتاح الاساسي

:wacko: أنا حاولت أكتب جمله SQL داخل الوحده النمطه في حدث CHANG الخاص بكائن LIST بس في خطأ

WinRAR_ZIP_archive_____.zip

تم تعديل بواسطه POWER _GIRL
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ممكن تنسيق 2003

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

على راسي :blush:

____________11.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ThanX

هذا المطلوب وزياده وربنا يزيدك علم وأجر وتوفيق :happy:

لكن هل لي أن أسأل عن شيء فالكود :

 Resume Exit_list_Change

مامعنا هذه الجمله !!

وهي لا تعمل معي !! هلا تنظر فالمرفق :blush: وإذا لديك تعديلات على التصميم فلا تبخل علينا

WinRAR_archive_____.rar

تم تعديل بواسطه POWER _GIRL
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

راجعي التهجئة يا سيدتي ، أما التصميم فأتركه لزملائي العزاء :happy:

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

سيدي لا أجد فالتهجئه خطأ !!! :calc: نورنا

تم تعديل بواسطه POWER _GIRL
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

اسمح لي اخي karramil على المداخله

اختي التهجئة غلط لكمة Change

البرنامج بعد التعديل

انظري الى الكود الشرح موجود فيه

اخوك محمد

_______.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

e e e :mad:

ألف شكر أخي محمد

:angry: هناك مشكله أخرى أرجو المساعده وهي في هذا الكود وتحديدا لما احذف بينات من جدولين مايمشي الكود لكن لما أحذف من جدول واحد يمشي ؟!

DoCmd.RunSQL ("delete FROM food_caunt_item_tool , food " & _
"WHERE f_nu_f=" & CVar(list.Column(0)) & " and f_nu=" & CVar(list.Column(0)) & "")

_______.rar

تم تعديل بواسطه POWER _GIRL
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

في حال كان هذا هو طلبك يرجى الرد بتمت الإجابة !!

_______.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

تمت الاجابه

لكن إذا تسمح لي :huh: الطريقه كانت بحذف سجلات كل جدول بأمر منفرد هل هذا يعني انني لا يمكنني حذف مجموعه سجلات من جداول مختلفه بجمله واحد !

وشكرا لكــــــــــــــــــــــــ,,

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

الإجراء كان لحذف السجلات من جدولين مختلفين على أن تحذف السجلات المساوية لإختيارك من القائمة المنسدلة فقط وليس جميع البيانات .

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

الطريقه التي كتب بها الكود تعمل بالشكل التالي

جمله إستدعاء للإجراء يحمل اللجدول الاول (فتنفذ جمله SQL عليها)

ثم

جمله إستدعاء لنفس الإجراء يحمل اللجدول الثاني (فتنفذ جمله SQL عليها أيضا)

ماأقصده أنني لم أشمل الجدولين بعبارة SQL واحده ....................................

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

وهذا هو الإجراء الصحيح

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

شكرا لكـــــــــــــــــ

بمعنا لا يمكن إنشاء جمله حذف لأكثر من جدول كما في جمله select

عندي مشكله فجمله الاضافة

Private Sub add2_com_Click()
DoCmd.RunSQL ("insert into food (f_na,f_coc,c_nu_f)" & _
"VALUES ('ff'," & CInt(f_coco.Value) & "," & CVar(list_c_na.Column(0)) & ")")

أنتظر المساعده

_______.rar

_______.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ولكن أي مثال تقصدين أراهم متشابهين ؟؟؟؟؟؟؟؟؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

أعتذر عن الخطأ :nose_patch: هاهوا

 DoCmd.RunSQL ("insert into food (f_na,f_coc,c_nu_f)" & _
"VALUES (" & CVar(list.Column(0)) & "," & CInt(f_coc.Value) & "," & CVar(list_c_na.Column(0)) & ")")

_______.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

حسناً في جملة الإستعلام الأولى خطأ إذ طلبت الحاق 3 قيم مختلفة لحقلين مختلفين .

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

لم أفهمكــ لكن لعل هذا يوضح شيء من الامر...........

f_na=CVar(list.Column(0)

هنا خطأ ..

f_coc=CInt(f_coc.Value)

هنا خطأ ..

c_nu_f = CVar(list_c_na.Column(0)

هنا أوك..

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

up

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .