تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خطأ أثناء عملية البحث في DATAGRIDVIEW
#1
السلام عليكم ورحمة الله وبركاته
وأثناء عملية البحث في محتوى الداتاقريد فيو 
تضهر رسالة الخطأ التالية
row associated with the currency manager's position cannot be made invisible
مع العلم أنا أستعمل الكود التالي
كود :
Private Sub Sellected()
       Dim T As TextBox = TextBoxSearch
       With T
           .Select()
           .BackColor = Color.LightCyan
       End With
       Dim DGV As DataGridView = DGView
       With DGV
           .RowsDefaultCellStyle.BackColor = Color.CadetBlue
           .AlternatingRowsDefaultCellStyle.BackColor = Color.LightCyan
       End With
   End Sub
    
    Private Sub TextBoxSearch_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBoxSearch.TextChanged
       Try
           For i As Integer = 0 To DGView.Rows.Count - 2
               DGView.Rows(i).Visible = True
               If DGView.Rows(i).Cells(1).Value.ToString.Contains(TextBoxSearch.Text.Trim) Then
                  Sellected()
                   DGView.Rows(i).Visible = True
               Else
                   DGView.Rows(i).Visible = False
               End If
           Next
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub
وتقبل الله صيامكم وقيامكم
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

من المؤكد انك تقوم بتعبئة الداتا جريد من خلال 
بيانات يتم جلبها من قاعدة البيانات

فى هذه الحالة اذا كان التعبئة تتم من خلال DS

فاليك الكود التالى بدلاً من الكود بموضوعك
كود :
   Private Sub TextBoxSearch_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBoxSearch.TextChanged
       Try
           Dim dv As DataView
           dv = New DataView(ds.Tables(0), "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)
           DataGridView1.DataSource = dv
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub

مع مراعاه تغيير المسميات فى هذا السطر
كود :
dv = New DataView(ds.Tables(0), "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)

طيب واذا كنت تقوم بتعبئة الداتا جريد من خلال DT

فاليك الكود التالى بدلاً من الكود بموضوعك 
كود :
   Private Sub TextBoxSearch_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBoxSearch.TextChanged
       Try
           Dim dv As DataView
           dv = New DataView(dt, "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)
           DataGridView1.DataSource = dv
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub

مع مراعاه تغيير المسميات فى هذا السطر
كود :
dv = New DataView(dt, "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: حريف برمجة
#3
شكرا لك أخي على الرد
مرة أخرى يضهر الخطأ
cannot find columm nom
إسم الحقل في الجدول هو nom
وإسم الجدول هو Emp

لست أدري ما المقصود بـ: "MyName Desc"
الرد }}}
تم الشكر بواسطة:
#4
الشكر لله والحمد لله
والحمد لله على كل حال

بخصوص المسميات سيكون كالتالى
كود :
dv = New DataView(dt, "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)

تجعله بهذا الشكل
كود :
dv = New DataView(dt, "nom Like '%" & TextBoxSearch.Text.Trim & "%'", "nom Desc", DataViewRowState.CurrentRows)

وبخصوص 
كود :
nom Desc

هو يخص الترتيب التصاعدى والتنازلى
بمعنى لو كان نتائج البحث يحتوى على اكثر من ناتج
فسيتم عرض الترتيب حسب الابجدياً واذا كنت تريد حسب ID
ولنقول ان لديك عمود التريق باسم ID

فستكون الجملة بهذا الشكل
كود :
"ID Desc"

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: حريف برمجة
#5
شكرا لك أخي بارك الله فيك
الرد }}}
تم الشكر بواسطة:
#6
(14-05-19, 02:30 PM)ahmedfa71 كتب : شكرا لك أخي بارك الله فيك


الشكر لله والحمد لله

والحمد لله على كل حال

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: larbihamri



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


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