تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ايجاد قيمة معية في الداتا جريد فيو
#1
السلام عليكم ورحمة الله وبركاتة

لو سمحت يا جماعة عندي داتا جريد فيو بضبف فيها بيانات

عايز كود يبحث في الداتا جريد فيو في العمود الاول مثلا او قاعدة البيانات في العمود الاول مثلا على اسم معين لو موجود ميضفش بيانات لو مش موجود يضيف البياتا
إِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ

لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ


الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
'طريقة الاستعلام عن سجل في جدول بقاعدة البيانات'
dim StrSql As string="Select * From Table1 Where Column1="TxtColumn1.Text
Dim da 
As New SqlDataAdapter(StrSQLcn)
Dim dt As New DataTable
da
.Fill(dt)
if 
dt.rows.count=0 then
dgv
.rows.add(1,"Test")
else
msgbox("هذا السجل موجود بقاعدة البيانات")
end if
'طريقة البحث في داتاغريدفيو'
TextBox1.Text DataGridView1.Rows.Cast(Of DataGridViewRow).Where(Function(rowCStr(row.Cells(1).Value) = "Test").Count
if TextBox1.Text=0 then
dgv
.rows.add(1,"Test")
else
msgbox("هذا السجل موجود بقاعدة البيانات")
end if 
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , Codack , alshandodi
#3
(13-04-20, 04:58 AM)asemshahen5 كتب :
PHP كود :
'طريقة الاستعلام عن سجل في جدول بقاعدة البيانات'
dim StrSql As string="Select * From Table1 Where Column1="TxtColumn1.Text
Dim da 
As New SqlDataAdapter(StrSQLcn)
Dim dt As New DataTable
da
.Fill(dt)
if 
dt.rows.count=0 then
dgv
.rows.add(1,"Test")
else
msgbox("هذا السجل موجود بقاعدة البيانات")
end if
'طريقة البحث في داتاغريدفيو'
TextBox1.Text DataGridView1.Rows.Cast(Of DataGridViewRow).Where(Function(rowCStr(row.Cells(1).Value) = "Test").Count
if TextBox1.Text=0 then
dgv
.rows.add(1,"Test")
else
msgbox("هذا السجل موجود بقاعدة البيانات")
end if 

عذرا اخي لم تنفع الطريقة للأسف

ممكن تعديل على المشروع دا وهو نفس النموذج اللي عندي
انا عايز لو اسم من اللي في الكومبو بوكس موجود في الداتا جريد فيو تظهر رسالة هذه العضو موجود
لكن لو مش موجود في الداتا جريد فيو يضيف البيانات عادي


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 100.19 ك ب / التحميلات : 35)
إِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ

لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ


الرد }}}
تم الشكر بواسطة:
#4
PHP كود :
   Sub insert_()
 
       Dim dd As Integer DataGridView1.Rows.Cast(Of DataGridViewRow).Where(Function(rowCStr(row.Cells(1).Value) = ComboBox1.SelectedItem).Count
        If dd 
0 Then
            MsgBox
("هذا العضو موجود")
 
           Exit Sub
        End 
If
 
       Dim cmd As New SqlCeCommand("insert into asd  (a, b, c) values('" ComboBox1.Text "','" DateTimePicker2.Text "','" DateTimePicker1.Text "')"Con)
 
       Con.Open()
 
       cmd.ExecuteNonQuery()
 
       Con.Close()
 
   End Sub 
الرد }}}
تم الشكر بواسطة: Codack
#5
(13-04-20, 04:53 PM)asemshahen5 كتب :
PHP كود :
   Sub insert_()
 
       Dim dd As Integer DataGridView1.Rows.Cast(Of DataGridViewRow).Where(Function(rowCStr(row.Cells(1).Value) = ComboBox1.SelectedItem).Count
        If dd 
0 Then
            MsgBox
("هذا العضو موجود")
 
           Exit Sub
        End 
If
 
       Dim cmd As New SqlCeCommand("insert into asd  (a, b, c) values('" ComboBox1.Text "','" DateTimePicker2.Text "','" DateTimePicker1.Text "')"Con)
 
       Con.Open()
 
       cmd.ExecuteNonQuery()
 
       Con.Close()
 
   End Sub 

متشكر ظبط معي
إِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ

لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ


الرد }}}
تم الشكر بواسطة: asemshahen5
#6
الحمد لله و الشكر لله .
الرد }}}
تم الشكر بواسطة: Codack , Codack


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة فى جمع عمود فى داتا جريد فيو احمد خطاب 3 152 06-03-24, 07:49 PM
آخر رد: احمد خطاب
  حذف الاسطر الفارغه من الداتا جريد فيو اليوم السابع 3 2,358 03-03-24, 12:57 AM
آخر رد: مصمم هاوي
  كيفية جمع أرقام عمود فى الداتا جريد فيو بناءاً على بيانات معينة heem1986 5 225 25-02-24, 11:26 PM
آخر رد: heem1986
  كيفية تنفيذ امر عند التعليم على checkbox بالداتا جريد فيو heem1986 2 159 21-02-24, 01:37 AM
آخر رد: heem1986
  [VB.NET] مشكلة التاريخ في الداتا قريد فيو مبرمج صغير 1 6 399 24-01-24, 10:12 PM
آخر رد: annagui
  [سؤال] كيف نستعيد قيمة من دالة ضمن مسار مستقل justforit 2 393 21-11-23, 10:51 AM
آخر رد: justforit
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 461 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  كيف اجعل قيمة dateTimePicker2 تساوي dateTimePicker1 Adel27213 2 280 09-11-23, 09:07 PM
آخر رد: Adel27213
  ممكن كود ترقيم تلقائي في الداتا غريد فيو المبرمج البسيط 16 10,578 08-11-23, 01:44 AM
آخر رد: الحزين اليماني
  انتقال المؤشر بين الخلايا في نفس الصف في الداتا جريد فيو fares_mohammed 2 464 03-11-23, 09:57 PM
آخر رد: fares_mohammed

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


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