كيف نضيف الرقم اللي في الحقل على حسب الأسماء الموجودة في اللـ ListView فقط

طبعاً هنا الحذف ليس فعلياً

وإنما إزالة الإسم من الـ ListView فقط

ممكن توضح اكتر انا مش فاهم

السلام عليكم اخواني

كيف نضيف الرقم اللي في الحقل على حسب الأسماء الموجودة في اللـ ListView فقط

يعني لنفرض إن الـ ListView فيها كثير بيانات ,, وبعد الضغط على زر حذف لن تنحذف فعلياً فقط إخفاء الأسم من الـ Listview

بعدها اريد ان اضيف الرقم اللي في الحقل لجميع الأسماء الموجودة في الـ Listview

في قاعدة البيانات بالعمود الذي يحمل اسم Tel

المشروع بالمرفقات

ألا يوجد كود أخواني بارك الله فيكم

إذا كان ما تريده هو إضافة النص المكتوب بالتكست لكل عناصر العمود الثاني في الـ ListView فقط استخد الكود التالي:

For n = 1 To ListView1.ListItems.Count
	ListView1.ListItems(n).SubItems(2) = ListView1.ListItems(n).SubItems(2) & Text4.Text
Next

حيث ندور على كل عناصر الـ ListView بالحلقة التكرارية ثم نجعل قيمة الـ

ListView1.ListItems(n).SubItems(2)

(اي العنصر الفرعي الثاني (اي العمود الثاني))

هي نفس قيمته مع إضافة النص المكتوب في التكست ...

شكراً أخي محمد غريب

ولكن أخي محمد غريب هل نقدر نضيفها في الداتا بيز

اه نقدر ليه لأ ..

احنا لما نعوز نعدل بيانات في الداتابيز بنعمل ايه ؟؟

بنعدلها في الـ RecordSet ونعمل Update .. زي كدا :

RS.Fields("Tel") = "012"
RS.Update

طاب .. احنا هنا عايزين نعدل كل البيانات في الداتابيز .. يبقى هنحتاج لووب على الجدول كله ونعدل بيانات الحقل لكل السجلات

زي كدا ..

Do Until RS.EOF
	RS.Fields("Tel") = RS.Fields("Tel") & Text4.Text
	RS.Update

	RS.MoveNext
Loop

بارك الله فيك أخي محمد غريب

الله يقويك ويحميك

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

تم التقييم والترشيح

شكراً لك

المهم ان المعلومة وصلت والإفادة تمت, دي اهم حاجة وده الي اتمناه ...