[araxis]

عندى داتا بيز مربوظة بداتا جريد فيو باستخدام الربط عن طريق المعالج
فية عمود المفروض انا عاملة PRIMARY KEY فالمفروض اى قيمة تدخل فى الخلايا تحت العمود دة متكونش متكررة
انا عاوز اتحقق قبل اما اضيف قيمة جديدة هل القيمة دى موجودة ولا لا لو مش موجودة يضيف لو موجودة يظهرلى مسج بوكس

[ابراهيم النعيمي]

السلام عليكم
جرب التالي:
في حدث (CellBeginEdit) اضف السطور التالية:

كود :

 ' تستطيع بدل الرقم 1 وضع تسلسل الصف في الداتا كرد فيو علماً ان التسلسل يبدأ من الصفر
       If Me.DataGridView1.CurrentCell.ColumnIndex.ToString = 1 Then
           Dim cmd As New SqlCommand
           Dim ValueCount As Integer = 0
           With cmd
               '  يجب وضع عنصر الاتصال الخاص بك بدل المستخدم ادناه
               .Connection = con
               '  يجب تعديل الجملة ادناه حسب اسم اسم الحقل و اسم الجدول و شرط الجملة
               .CommandText = "Select count([FieldName]) From [TableName] Where [Condition]=" & DataGridView1.CurrentRow.Cells(1).Value
               con.Open()
               ValueCount = .ExecuteScalar
               con.Close()
           End With
           If ValueCount > 0 Then
               MsgBox("القيمة المدخلة مكررة", MsgBoxStyle.Critical, "خطأ")
               e.Cancel = True
           End If
       End If

و اعلمنا بالنتائج

تحياتي ..

[araxis]

مانفعت انا استخدم الربط عن طريق المعالج ؟؟

[ابراهيم النعيمي]

لا يوجد مشكلة مع طريقة الربط بالمعالج و لكن السؤال هو .. هل غيرت اسماء الحقول و اسم الجدول في السطر التالي:

PHP كود :

 .CommandText = "Select count([FieldName]) From [TableName] Where [Condition]=" & DataGridView1.CurrentRow.Cells(1).Value 


تحياتي..

[amgad525]

PHP كود :

Dim value As String = "aaaaaaaaa"
Dim isExist As Boolean = Me.DataSet1.table1.AsEnumerable().Any(Function(r) r("column1").Equals(value))
If isExist Then
    MsgBox "Value already exists"
    Exit Sub
End If