احتاج كود بحث لانه جنني

السلام عليكم ....

هدا كود بحث لعله يفيدك استخدمته في مشروعي .....وتكتبه بعد تنفيد خطوات الاتصال بقاعدة بياناتك

اللي هي كما يلي :

1. عمل connect to database

2. عمل oledb dataadapter

3. عملdataset

بعد كدا قم بكتابت الفضاء المسمى الخاص باستدعاء القاعدة

Imports system.data.oledb

ثم قم بكتابت الكود التالي عسى يفيدك

Private Sub Picturesearsh1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Picturesearsh1.Click

Dim ser As New OleDbCommand

Dim rd As OleDbDataReader

ser.Connection = OleDbConnection1

ser.CommandText = "select*from asia where(cuo='" & Textcon.Text & "')"

OleDbConnection1.Open()

rd = ser.ExecuteReader()

If rd.Read() Then

Textcon.Text = rd.GetString(0)

Texthth.Text = rd.GetString(1)

Textcsto.Text = rd.GetString(2)

Textlan.Text = rd.GetString(3)

Textlng.Text = rd.GetString(4)

Textkin.Text = rd.GetString(5)

Textspi.Text = rd.GetString(6)

Else

MessageBox.Show("لايوجد معلومات متوفرة عن دولة " & Textcon.Text, "ERROR")

End If

OleDbConnection1.Close()

rd.Close()

End Sub

الكود السابق حددت البحث من مربع النص الخاص مثلا عندي باسم الدولة

وشكرا

على فكرة الكود الخاص بالبحث تكتبة على حدث الزر الخاص بالبحث

شكرا يارب يوفقك

ويارب يزبط معايا دعواتك

تحياتي

للاسف الطريقة مازبطت

كل الطرق باءت بالفشل

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

تحياتي

:rolleyes: آسف على ردي المتأخر ولكن من الاخطاء اللي تعرضت لها وأنا في المشروع تعلمت أشياء كثير

ومنها من اسباب عدم عمل زر البحث يكون هناك خطأ في اسماء الحقول أو يكون هناك حقول فارغة ....... تحقق منها وإن شاء الله يظبط الكود . وادا ماظبط ممكن ترسل نص الرساله اللي تضهرلك عند التشغيل يمكن اقدر اساعدك

اذا كنت تريد البحث عن صف أو مجموعة صفوف من ال DataSet

Dim dv As New DataView(DataSetName.TableName
'في حالة البحث في حقل رقمي
dv.RowFilter="FieldName=" & TextBox1.Text
'أما في حالة البحث في حقل نصي 
dv.RowFilter="FieldName='" & TextBox1.Text & "'"

DataGrid1.DataSource=dv

مع ملاحظة التالي علي الشفرة السابقة :

إستبدل DataSetName باسم كائن ال DataSet الموجود في مشروعك

إستبدل DataTable باسم الجدول الموجود في ال DataSet الذي تريد البحث فيه

إستبدل FieldName باسم الحقل الذي تريد البحث فيه

والله الموفق