تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
بحث عن طريق الكومبوبوكس
#1
السلام عليكم اخواني ممكن ان  تساعدوني بطريقة بحث عن البيانات في اكسيس عن طريق الكومبوبوكس  
وكما في المرفق


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 95.1 ك ب / التحميلات : 45)
الرد }}}
تم الشكر بواسطة:
#2
للرفع شباب
المشكله ان الكود عندي لكن فية مشكله
الرد }}}
تم الشكر بواسطة:
#3
هذا المثال بعد التعديل ان شاء الله يكون حسب المطلوب


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 101.93 ك ب / التحميلات : 85)
الرد }}}
تم الشكر بواسطة: sphinx
#4
اشكرك اخي المبرمج المحترف جدا وجعله عملك هذا في ميزان حسناتك لانك حللت المشكله لدي
لكن في مشكله انه عند البحث بأسم الطفل او رقمه تظهر خانه رقم الطفل رقم 1 دائما
الرد }}}
تم الشكر بواسطة:
#5
شكرا شباب حللت المشكله ووجدت الكود المناسب يعد حهد كبير
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim oledbcom As New OleDbCommand
Dim oledbdata As New OleDbDataAdapter
Dim ds As New DataSet
Dim dt As New DataTable
Dim sqlstring As String
'Button2.Enabled = False
If TextBox1.Text.Trim = Nothing Then
MsgBox("fgfg")
TextBox1.Focus()
Exit Sub
End If
con = Getconnect()
sqlstring = Nothing
If TextBox1.Text <> Nothing Then

Select Case ComboBox1.SelectedIndex
Case 0
sqlstring = "child.id =" & TextBox1.Text & ""

Case 1
sqlstring = "child.Name like '%" & TextBox1.Text & "%' "

'Case 2
' sqlstring = "employees.Tel =" & TextBox1.Text & ""

End Select
End If
Try
oledbcom = con.CreateCommand
oledbcom.CommandText = "select * from child where " & sqlstring
oledbdata.SelectCommand = oledbcom
oledbdata.Fill(ds, "child")
DataGridView2.DataSource = ds
DataGridView2.DataMember = "child"
DataGridView2.ReadOnly = True
Catch ex As Exception

End Try
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  التحقق من خلال محتوى خلية عن طريق textbox صالح عبدالله 2 222 24-01-24, 12:54 PM
آخر رد: صالح عبدالله
  تشغيل الماكرو عن طريق اكواد الفجوال نيمو 0 271 03-11-23, 11:14 AM
آخر رد: نيمو
  اريد ارسال pdf عبر واتساب عن طريق ال API محتاج تعديل على الكود moh61 0 517 03-08-23, 03:41 PM
آخر رد: moh61
  [سؤال] تشغيل راديو عن طريق الانترنت أبوسعود 5 716 01-07-23, 10:34 PM
آخر رد: asmarsou
  [VB.NET] اريد كود البحث او الفلترة عن طريق تيكست بوكس و عرض النتيجة في داتا جريد فيو الحسين احمد 6 10,620 10-06-23, 01:01 PM
آخر رد: mahmoud mostafa 2023
  ربط جهازين عن طريق الانترنت (public ip) mom22jo 5 1,967 15-05-23, 12:25 AM
آخر رد: ابو محمد محمد محمد
  فتح قاعدة البيانات المحمية بكلمة مرور عن طريق الفيجوال بيسك Tajaldeen 1 658 07-03-23, 08:59 AM
آخر رد: Taha Okla
  كيفية تحديد طابعه معينه للطباعه عن طريق PrintDocument حسين ادريس 2 595 14-02-23, 11:16 PM
آخر رد: estefsar
  [VB.NET] كود لجعل الكود ينفذ عن طريق زران في الكيبورد عبدالرحمن الأصبحي 1 541 20-01-23, 03:30 AM
آخر رد: asmarsou

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


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