المشاركات : 662
المواضيع 39
الإنتساب : Feb 2014
السمعة :
195
الشكر: 1474
تم شكره 1740 مرات في 622 مشاركات
05-09-16, 07:13 PM
(آخر تعديل لهذه المشاركة : 05-09-16, 07:25 PM {2} بواسطة ابو ليلى.)
لم افهم ماذا تقصد بالجراوند
ضع كود يشرح العملية و نحن بنعدل ان شاء الله
انت بستخد Access او Sql Server
اه الان فهمت عليك يعني انت بتعرض سجل البحث في مربعات نص
و ماذا لو كان ناتج البحث يحتوي على اكثر من سجل (على فرض في اكثر من تفصيل للاسم الواحد يعني علاقة بجدولين)
بكل الاحوال الناتج العائد من تنفيذ الاستعلام السابق هو جدول قد يحتوي على سجل او اكثر
بعد ذلك انت ستسند مصدر البيانات الخاص بصناديق النصوص الى الجدول العائد من تنفيذ الاستعلام
لو وضعت الكود لكان التعديل اسهل
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
المشاركات : 179
المواضيع 29
الإنتساب : May 2016
السمعة :
8
الشكر: 261
تم شكره 95 مرات في 65 مشاركات
05-09-16, 08:13 PM
(آخر تعديل لهذه المشاركة : 05-09-16, 08:15 PM {2} بواسطة Abou Eman.)
كنت عملتها مرة
عرف المتغيرات دى فى الجنرال
Dim ConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source =" & Application.StartupPath & "\MyData.mdb"
Dim Conn As New OleDbConnection(ConStr)
Dim DataSet1 As New DataSet
فى زر البحث اكتب الكود ده
Dim SQLstr As String = "SELECT * FROM Table1 WHERE name = '" & TextBox1.Text & "'"
DataBindings.Clear()
DataSet1.Clear()
Conn.Open()
Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
DataAdapter1.Fill(DataSet1, "Table1")
Conn.Close()
On Error Resume Next
TextBox2.DataBindings.Add("Text", DataSet1, "Table1.Name")
TextBox3.DataBindings.Add("Text", DataSet1, "Table1.City")
TextBox4.DataBindings.Add("Text", DataSet1, "Table1.mobile")
ولو عندك جريد هتكتب الكود ده فى اخر سطور زر البحث عشان يظهر النتائج فيها
'DataGridView1.DataSource = DataSet1
'DataGridView1.DataMember = "Table1"
لو الكود مش واضح ممكن اعمل لك مثال