تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] استفسار بخصوص انواع كود البحث..
#1
اسعد الله اوقاتكم جميعا .. معاي استفسار بسيط .. 
انظرو ل هذا الصورة المقتبسه من مشروع حملته من موقع انجليزي ولكن مع الاسف لا يعمل لدي اعتقد لانه نسخته 2012 وانا 2010

المهم  .. ننتقل لصور ..



الصوره التي في الاعلى يظهر فيها نموذج المشروع كامل وهو نافذة فيها عدة خيارات مثل اضافة وحذف وتعديل وما شابه ومربوطه بقاعدة البيانات..









اما الصوره الثانيه.. يوجد بها 1- كومو بكس على ما اعتقد ايضا واحد تكس بوكس طبعا هم خيارات البحث في قاعدة البيانات ..

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


ملاحظة .. وجدت مشاريع مختلفه فيها خيار واحد تكس بوكس وختيار نوع البحث بستخدام ادة مختلفه الرديدوم تقريبا ولكن ليس هذا ما ابحث عنه انا ابي نفس المثال الي ب اعلى واحد تكس بوكس واحد كومبو بكس به كل انواع البحث ..

ياليت اذا احد يعرف ايش اسم المشروع ب ضبط الي كذه او كيف ممكن احصل على نموذج مشابه يعلمني ..

مودتي وشكري للكل ..
الرد
تم الشكر بواسطة:
#2
السلام عليكم

يمكن وضع هذا الكود في حدث Click لزر أو حدث TextChanged للبحث أثناء الكتابة في التكست بكس
كود :
Dim adp As New OleDb.OleDbDataAdapter
adp.SelectCommand.Connection = cnn

Select Case ComboBox1.SelectedIndex

    Case 0 ' الاختيار الأول في الكمبوكس
        adp.SelectCommand.CommandText = "SELECT * FROM [table] WHERE [ID]=@param"
        adp.SelectCommand.Parameters.AddWithValue("@param", TextBox1.Text)


    Case 1 ' الاختيار الثاني في الكمبوكس
        adp.SelectCommand.CommandText = "SELECT * FROM [table] WHERE [FirstName]=@param"
        adp.SelectCommand.Parameters.AddWithValue("@param", TextBox1.Text)


' الاختيار الثالث في الكمبوكس
    Case 2
        adp.SelectCommand.CommandText = "SELECT * FROM [table] WHERE [LastName]=@param"
        adp.SelectCommand.Parameters.AddWithValue("@param", TextBox1.Text)

End Select

Dim dt As New DataTable
adp.Fill(dt)

DataGridView1.DataSource = dt
الرد
تم الشكر بواسطة: sendbad100
#3
شكرا اخي علي طرحك للموضوع كان لدي فيه مشكلة
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] جمع فواتير الناتجة عن البحث وعدد الفواتير EMADSSS 2 38 منذ 1 ساعه مضت
آخر رد: EMADSSS
Wink [سؤال] سؤال حول البحث في قاعدة بيانات من نوع اكسس ahmadpal 1 14 منذ 2 ساعة مضت
آخر رد: asemshahen5
  سؤال حول البحث ahmadpal 6 97 20-03-19, 11:37 PM
آخر رد: ahmadpal
  [VB.NET] استفسار :- بخصوص serial number dubai.eig 0 50 19-03-19, 09:32 PM
آخر رد: dubai.eig
  [VB.NET] استفسار panel control & Next previous button dubai.eig 4 94 19-03-19, 02:28 PM
آخر رد: dubai.eig
  [سؤال] بخصوص استضافة godaddy dubai.eig 1 53 19-03-19, 12:55 PM
آخر رد: kiki
Wink [سؤال] سؤال حول البحث ahmadpal 6 127 17-03-19, 11:28 PM
آخر رد: ahmadpal
Wink [VB.NET] سؤال بخصوص المتغيرات ahmadpal 2 87 13-03-19, 06:38 PM
آخر رد: ahmadpal
  [VB.NET] استفسار بخصوص Dispose() dubai.eig 3 112 12-03-19, 10:47 AM
آخر رد: dubai.eig
Lightbulb سؤال بخصوص اعدادات textbox haider kh 8 166 09-03-19, 10:26 AM
آخر رد: ابراهيم ايبو

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


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