البيانات تنحذف ليش

[الحكيمي 0]

بسم الله الرحمن الرحيم

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

اليكم الكود

form_activate

dim a as string

dowhile not adodc1.recrdset.eof=true

a= adodc1.recordset.fields('name').value

combo1.additem a

adodc1.recordset.movenext

loop

وشكرا

[HnHn 17]

اخ XP SP3 الكود سليم على ما اعتقد ولا اعلم بصراحه ما سبب الحذف الذي يحدث معك ولكن ارفق المثال لنرى ما يمكننا مساعدتك به

[sameh_ibm 0]

طيب انا اقلك علي حل تاني جربه برده جرب تحط الكود ده في الفورم لود form load حدث الفورم لود يعني اعتقد بيبقي افضل من الحدث activate وجرب كدة وشوف ومنتظر منك ردك عليا

[Super_Pro 1]

طبع الكود السابق سليم 99%

هناك خطأ املائي dowhile ===> do while

اخي الكريم هما احتمالين حسب معلوماتي المتواضعه :D

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

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

adodc1.recordset.movenext

loop

فحاول اضافة

movefirst

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

;)

تم تعديل 25 Dec 2006 بواسطه Super_Pro

[الحكيمي 0]

بسم الله الرحمن الرحيم

اولا شكرا على تعاونكم

ثانيا بالنسبة للخطى الاملائي فيمكن اني غلطت وانا اكتبة هنا بس

ثالثا البيانات لما تنحذف يعني تنحذف من قاعدة البيانات يعني اروح ادورها في القاعدة ما فيش (فاضي)

بالنسبة للمثال سوف ادرجة إن شاء الله

واخيرا اشكركم مرة اخرى