تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في Listview
#1
اخواني السلام عليكم ورحمه الله وبركاته


لدي مشكله اثناء عرض المعلومات من قاعدة بيانات اكسس الى Listview

هذا الكود :

PHP كود :
ListView1.View View.Details
        ListView1
.FullRowSelect True
        Me
.CenterToScreen()

        
ListView1.Columns.Add("Name"100)
        
ListView1.Columns.Add("country"100HorizontalAlignment.Center)
        
ListView1.Columns.Add("status"100HorizontalAlignment.Center)
        
ListView1.Columns.Add("internet"100HorizontalAlignment.Center)
        
ListView1.Columns.Add("sms"100HorizontalAlignment.Center)
        
ListView1.Columns.Add("Pic"100HorizontalAlignment.Center)

        
Dim DR As DataRow
        Dim Lst 
As ListViewItem
        
For Each DR In ds.Tables("Table1").Rows
            Lst 
ListView1.Items.Add(DR("Name"))
            
Lst.SubItems.Add(DR("country"))
            
Lst.SubItems.Add(DR("status"))
            
Lst.SubItems.Add(DR("internet"))
            
Lst.SubItems.Add(DR("sms"))
            
Lst.SubItems.Add(DR("pic"))

        
Next 


وهذا الخطأ الذي يظهر لي


[HTML]Overload resolution failed because no Public 'Add' can be called with these arguments:

'Public Function Add(item As System.Windows.Forms.ListViewItem.ListViewSubItem) As System.Windows.Forms.ListViewItem.ListViewSubItem':

Argument matching parameter 'item' cannot convert from 'DBNull' to 'ListViewSubItem'.

'Public Function Add(text As String) As System.Windows.Forms.ListViewItem.ListViewSubItem':

Argument matching parameter 'text' cannot convert from 'DBNull' to 'String'.[/HTML]


المشكلة تكون في اضافة العناصر الاخري بعد الــ Name

التي تكون عباره عن subitems

مع العلم ان ربط القاعدة والاتصال صحيح


فما المشكله ؟؟؟:confused:Sad
الرد }}}}
تم الشكر بواسطة:
#2
جرب هذا التعديل
كود :
ListView1.View = View.Details
ListView1.FullRowSelect = True
Me.CenterToScreen()

ListView1.Columns.Add("Name", 100)
ListView1.Columns.Add("country", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("status", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("internet", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("sms", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("Pic", 100, HorizontalAlignment.Center)

For Each row As DataRow In ds.Tables("Table1").Rows
    Dim itm As New ListViewItem
    itm.Text = row.Item("Name")
    itm.SubItems.Add(row.Item("country"))
    itm.SubItems.Add(row.Item("status"))
    itm.SubItems.Add(row.Item("internet"))
    itm.SubItems.Add(row.Item("sms"))
    itm.SubItems.Add(row.Item("pic"))
    ListView1.Items.Add(itm)
Next
الرد }}}}
تم الشكر بواسطة:
#3
اخي msdos لم ينجح الكود نفس الخطا يظهر لي ..

الكود كان شغال معاي زي الفل بس لما ضفت عمود اخر خاص باضافة الصورة ظهر عندي هذا الخطأ
الرد }}}}
تم الشكر بواسطة:
#4
هل انتبهت للتعديل انسخه مرة أخرى وضعه في Button

ما حكاية Public Function Add(ByVal item As System.Windows.Forms.ListViewItem.ListViewSubItem) As System.Windows.Forms.ListViewItem.ListViewSubItem
و Public Function Add(ByVal text As String) As System.Windows.Forms.ListViewItem.ListViewSubItem

انتظر ردك الآن
الرد }}}}
تم الشكر بواسطة:
#5
eng.khalidvb كتب :اخي msdos لم ينجح الكود نفس الخطا يظهر لي ..

الكود كان شغال معاي زي الفل بس لما ضفت عمود اخر خاص باضافة الصورة ظهر عندي هذا الخطأ

لم انتبه ان احد الحقول صورة ف ListView لا تصلح اعمدته للصور

اذا اردت عرض الصور داخل العرض استخدم DataGridView
الرد }}}}
تم الشكر بواسطة:
#6
اخي نسخة التعديل وجربته وظهرت نفس المشكله

اخي انا احاول ان اعرض بيانات قاعدة البيانات اكسس في اللست فيو عند تحميل الفورم يعني الكتب السابقة كاتبه في حدث form_load الكود كان شغال زي الفل بس انا حاولت اضيف عمود اخر لاضافة صوره والعمود من Ole object بعدما اضفت هذا االعمود الى قاعدة البيانات بداء هذا الخطاء بالظهور يعني كانه حدث الاضافة بالنسبة للعناصر subitems يجب ان يكون له حدث اضافة عام بالنسبة لكامل الفورم .. لم افهمه جيدا
الرد }}}}
تم الشكر بواسطة:
#7
طيب بس الخطاء يظهر ع طول على اول subitems الي هووو

PHP كود :
Lst.SubItems.Add(DR("country")) 


قبل ان يصل الى الشفرة الخاصه بعرض الصورة


انا استخدمة Datagridview وكل شي تمام بس اريد ان اجرب في اللست فيو
الرد }}}}
تم الشكر بواسطة:
#8
اذا احتوى الحقل على DBNull أي بدون اي بيانات (هذا يختلف عن الفارغة العاية) سوف يحدث خطأ

ممكن نعدل المثال لاختبار المحتوى مثل
كود :
ListView1.Columns.Add("Name", 100)
ListView1.Columns.Add("country", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("status", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("internet", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("sms", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("Pic", 100, HorizontalAlignment.Center)

For Each row As DataRow In ds.Tables("Table1").Rows
Dim itm As New ListViewItem
    itm.Text = ListView1.Items.Add(IIf(IsDBNull(row.Item("Name")), "", row.Item("Name")))
    itm.SubItems.Add(IIf(IsDBNull(row.Item("country")), "", row.Item("country")))
    itm.SubItems.Add(IIf(IsDBNull(row.Item("status")), "", row.Item("status")))
    itm.SubItems.Add(IIf(IsDBNull(row.Item("internet")), "", row.Item("internet")))
    itm.SubItems.Add(IIf(IsDBNull(row.Item("sms")), "", row.Item("sms")))
    'itm.SubItems.Add(row.Item("pic"))
    ListView1.Items.Add(itm)
Next

طبعا في طريقة لتلافي DBNull بدون هذ الكود الكويل في كل سطر وذلك بوضع قيمة افتراضية اثناء انشاء الحقل في الجدول اعتقد في الخاصية DefaulValue اذا كانت نصية ضع "" اي علامتين تنصيص بدون مسافة
الرد }}}}
تم الشكر بواسطة:
#9
اخي msdos هل تقصد ان اللست فيو لا تصلح لعرض الصور نهائيا اي انه ليس من خواصها ؟
الرد }}}}
تم الشكر بواسطة:
#10
نعم ليس من خواصها، يمكن تحويل عمود منها لأي أداة ولكنها طريقة معقدة، ومادام عندنا البديل السهل فلنحقظ وقتنا ومجهودنا.
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في بناء قاعدة hglogtd 4 129 05-10-16, 03:48 PM
آخر رد: hglogtd
  [سؤال] مساعدة في حفظ بيانات من جدولين mosasaad 5 265 22-08-16, 10:25 AM
آخر رد: سعود
  طلب مساعدة لكتابة الكود بشكل صحيح moftah70 1 217 12-07-16, 07:52 PM
آخر رد: aliday03
  احتاج مساعدة في الداتا جريد فيو Mo_rb 8 292 18-06-16, 04:28 PM
آخر رد: boudyonline
  مساعدة بحفظ محتوى داخل combox داخل قاعدة البيانات او فكرة مقاربه المثال مرفق رهف العريفي 24 733 17-06-16, 03:05 AM
آخر رد: رهف العريفي
  [VB.NET] مساعدة في اتصال ms sql وربطها بالفجوال استديو 2010 Amrjamil 2 144 06-06-16, 03:50 AM
آخر رد: Amrjamil
  احتاج مساعدة بتعديل كود نسخ احتياطي قاعدة أكيسس ابي احول نسخ اتوماتيكي رهف العريفي 4 290 03-06-16, 07:50 AM
آخر رد: رهف العريفي
  طلب مساعدة في كود تعديل بيانات جدول لو تكرمتم kofa 10 335 31-05-16, 12:10 AM
آخر رد: kofa
  [سؤال] طلب مساعدة في طريقة ربط جدولين اكسس 2007 moftah70 1 274 08-01-16, 04:18 AM
آخر رد: boudyonline
  مساعدة بعمل باك اب وريستور abdulla2 3 233 26-12-15, 01:51 AM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم