تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب مساعدة بسيطة
#1
اريد كود يتاكد من ان عمود يحتوي على قيمة محددة
وشكرا
الرد
تم الشكر بواسطة:
#2
(21-10-17, 04:13 PM)hikmat كتب : اريد كود يتاكد من ان عمود يحتوي على قيمة محددة
وشكرا

وضح اكثر صديقي 
اي عمود datagridview or listview 
وضح سؤالك
الرد
تم الشكر بواسطة:
#3
(21-10-17, 07:56 PM)Rabeea Qbaha كتب :
(21-10-17, 04:13 PM)hikmat كتب : اريد كود يتاكد من ان عمود يحتوي على قيمة محددة
وشكرا

وضح اكثر صديقي 
اي عمود datagridview or listview 
وضح سؤالك

datagridview
 المطلوب لدي فورم لادخال البيانات اريد ان اتاكد ان الاسم الذي تم ادخالة غير موجود مسبقا في عمود الاسم في datagridview
الرد
تم الشكر بواسطة:
#4
(21-10-17, 08:28 PM)hikmat كتب :
(21-10-17, 07:56 PM)Rabeea Qbaha كتب :
(21-10-17, 04:13 PM)hikmat كتب : اريد كود يتاكد من ان عمود يحتوي على قيمة محددة
وشكرا

وضح اكثر صديقي 
اي عمود datagridview or listview 
وضح سؤالك

datagridview
 المطلوب لدي فورم لادخال البيانات اريد ان اتاكد ان الاسم الذي تم ادخالة غير موجود مسبقا في عمود الاسم في datagridview

هل هذه الاسماء مسجله بقاعده البيانات ؟؟

تستطيع فحص البيانات الموجوده في datagridview عن طريق هذا الكود :
كود :
Dim isFound As Boolean = False  

     For Each row As GridViewRow  In DataGridView1.Rows
          for i As Integer = 0 to DataGridView1.Columns.Count -1
        If row.Cells[i].Text = TextBox1.text  Then
           isFound = True
           exit for
        End If
          Next
       Next


If (isFound) Then
     MessageBox.Show("Data Exists!")
Else
      MessageBox.Show("Data Not Exists!")
EndIf
اما اذا اردت ان تتاكد اذا كان الاسم مسجل فب قاعده البيانات وهي الطريقه الافضل استخدم الكود التالي 

كود :
Public Function UserEx(ByVal Name As String) As Boolean
       Dim correct_version As Boolean = False
       Dim command As New SqlCommand("SELECT name FROM Employees WHERE name= @name", SQL.conn)
       command.Parameters.AddWithValue("@name", name)
       SQL.conn.Open()
       Using reader As SqlDataReader = command.ExecuteReader
           While reader.Read
               If IsDBNull(reader("name")) Then
                   correct_version = False
               Else
                   correct_version = True
               End If
           End While
       End Using
       command.Parameters.Clear()
       SQL.conn.Close()
       Return correct_version
   End Function
كود :
If UserEx(id_number_txt.Text) = True Then
               ErrorProvider1.SetError(id_number_txt, "! رقم الهوية هذا مسجل مسبقا")
               id_number_txt.Text = ""
               id_number_txt.BackColor = Color.LightPink
               id_number_txt.Focus()
               Return
           End If
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة بسيطة اسامه الهرماوي 4 74 16-05-19, 01:53 PM
آخر رد: elgokr
  مساعدة جزاكم الله خير fouadhdfouad 1 66 08-05-19, 10:57 PM
آخر رد: ابراهيم ايبو
  [VB.NET] طلب شرح واجهة بسيطة محمد اسماعيل 6 143 06-05-19, 11:20 AM
آخر رد: ahmadpal
Photo [مشروع] مساعدة في برنامج hamadz 1 88 06-05-19, 06:02 AM
آخر رد: ابراهيم ايبو
  [VB.NET] ممكن مساعدة bmgtouch 2 101 02-05-19, 10:44 PM
آخر رد: bmgtouch
  [VB.NET] مساعدة في..listbox e-coder 1 79 26-04-19, 06:49 PM
آخر رد: elgokr
  طلب مساعدة في اضافة save restore حاتمي 6 201 24-04-19, 12:39 AM
آخر رد: حاتمي
  سحب والافلات.Drag and Drop.مساعدة e-coder 7 145 22-04-19, 03:46 AM
آخر رد: elgokr
Rainbow (تم الحل )احتاج مساعدة حول خطأ system.accessviolationexception was unhandled dametucorazon 5 77 22-04-19, 12:47 AM
آخر رد: elgokr
  [VB.NET] مساعدة بخصوص برنامج مبيعات hodanet 4 152 20-04-19, 12:16 PM
آخر رد: elgokr

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


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