المثال رفعته مرة اخرى
MySaver_for_Listbox_items.zip
الفكرة اخي الكريم ان حفظ محتويات الـ Listbox حال الربط بقاعدة البيانات يختلف عنها حال من غير ربط.
هذه اساس الفكرة ويوجد زرين هما
حفظ الكل من جدول1 الى جدول2
حفظ المحدد من جدول1 الى جدول3
وفي كلا الزرين يتم التحقق من هل اداة Listbox1 الاولى مربوطة ام لا بالشرط او الكود التالي:
اذا تحقق هذا الشرط انظر للكود كيف كتبناه وان لم يتحقق ايضا انظر كيف يكون الكود
ان كان غير مربوط انظر كيف نحفظ القيمة المحددة من الـ Listbox1
الـ itm هذه ضمن جملة For
طيب في حال عدم تحقق الشرط اي ان الاداة مربوطة وهي LIstbox1
الـ tn هي اسم عمود الاسماء في الجدول
اما الزرين الاوليين فلا يهم لانه فقط فصل الاداة وربطها
العفو اخوي
والاجمل تواجدك بالموضوع.
MySaver_for_Listbox_items.zip
(13-09-13, 11:38 AM)Nŏ Coммεητ كتب :
ممكن توضح الفكره اكثر مافهمتها
العنوان واضح لكن الازرار غير واضح المقصود منها
بالنسبه للبرنامج يارايت ترجع ترفعه من جديد
___________
دمت بخير
الفكرة اخي الكريم ان حفظ محتويات الـ Listbox حال الربط بقاعدة البيانات يختلف عنها حال من غير ربط.
هذه اساس الفكرة ويوجد زرين هما
حفظ الكل من جدول1 الى جدول2
حفظ المحدد من جدول1 الى جدول3
وفي كلا الزرين يتم التحقق من هل اداة Listbox1 الاولى مربوطة ام لا بالشرط او الكود التالي:
كود :
If IsNothing(ListBox1.DataSource) Thenان كان غير مربوط انظر كيف نحفظ القيمة المحددة من الـ Listbox1
كود :
cm.Parameters.AddWithValue("@tn", itm)طيب في حال عدم تحقق الشرط اي ان الاداة مربوطة وهي LIstbox1
كود :
cm.Parameters.AddWithValue("@tn", itm("tn"))اما الزرين الاوليين فلا يهم لانه فقط فصل الاداة وربطها
(12-09-13, 10:31 PM)العزابي كتب : جميل جدا جدا وأشكرك ...........
العفو اخوي
والاجمل تواجدك بالموضوع.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير

