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


الملفات المرفقة
.rar   WindowsApplication4.rar (الحجم : 106.26 ك ب / التحميلات : 21)
الرد }}}}
تم الشكر بواسطة:
#2
اخي الكريم وجدت الكود التالي بزر البحث
PHP كود :
Try
            
cler()
            
Dim sql As String "select * from tbl1  WHERE HijriID LIKE '" TextBox1.Text "'"
            
Dim da As New OleDb.OleDbDataAdapter(sqlcon)
            
da.Fill(dt)
            
txtid.Text dt.Rows(0)("HijriID")


            If 
dt.Rows.Count 0 Then
            
Else
                
MsgBox("لاتوجد معاملات بهذا الرقم")
            
End If
        Catch 
ex As Exception
            MessageBox
.Show(ex.Message"Error"MessageBoxButtons.OKMessageBoxIcon.Error)
        
End Try 

ثم انك استخدمت المعامل Like
هل انت متاكد من هذا؟

عدلت كود البحث الى التالي
PHP كود :
Try
            
cler()
            
Dim sql As String "select * from tbl1  WHERE HijriID LIKE '" TextBox1.Text "'"
            
Dim bda As New OleDb.OleDbDataAdapter(sqlcon)
            
Dim bdt As New DataTable
            bda
.Fill(bdt)
            
txtid.Text bdt.Rows(0)("HijriID")


            If 
bdt.Rows.Count 0 Then
            
Else
                
MsgBox("لاتوجد معاملات بهذا الرقم")
            
End If
        Catch 
ex As Exception
            MessageBox
.Show(ex.Message"Error"MessageBoxButtons.OKMessageBoxIcon.Error)
        
End Try 
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#3
طيب اخي سعود كيف املي باقي الحقول مثل حقل تاريخ الصادر وباقي الحقول

هل تكون جميع الصفوف تكتب هكذا
(txtid.Text = bdt.Rows(0)("HijriID



كلها بنفس (bdt.Rows(0=
الرد }}}}
تم الشكر بواسطة:
#4
(29-05-16, 09:33 PM)علي كعبي كتب : طيب اخي سعود كيف املي باقي الحقول مثل حقل تاريخ الصادر وباقي الحقول

هل تكون جميع الصفوف تكتب هكذا
(txtid.Text = bdt.Rows(0)("HijriID



كلها بنفس    (bdt.Rows(0=

الرقم 0 يمثل اول نتيجة في البحث,,,  وما بعده واقصد 
(hijriId) هذا واضح اسم العمود الاول امش على هذه الطريقة لكافة الاعمدة ...
لكن ان كانت النتيجة تعود باكثر من صف فتحتاج شبيكة  بيانات لتستقبل كل الصفوف.
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#5
مشكور اخي سعود وجعلها في موازين حسنتك
الرد }}}}
تم الشكر بواسطة: سعود
#6
(29-05-16, 10:15 PM)علي كعبي كتب : مشكور اخي سعود وجعلها في موازين حسنتك

الحمدلله ... واياك اخي
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] طلب تعديل كود بحث من البحث في الاكسس الى البحث بالسكيول وشكراً m22sf 1 17 منذ 2 ساعة مضت
آخر رد: thevirus
Photo [سؤال] ارجوا توضيح المشكلة بعد عملية الحفظ أبووسم 7 118 أمس, 03:07 AM
آخر رد: أبووسم
  [VB.NET] مساعدة في نقل الصنف من شاشه البحث الي فاتوره الشراء gmailali 1 38 20-01-17, 11:00 PM
آخر رد: مساعدة
  [VB.NET] كيف يتم البحث فى ليست فيو موجودة فى فورم اخر الماجيك مسعد 15 218 19-01-17, 08:33 PM
آخر رد: الماجيك مسعد
  [سؤال] كود البحث عن طريق اسم naden 2 176 15-12-16, 02:33 AM
آخر رد: naden
  [VB.NET] خطا بالكود عند اجراء عملية حذف لاحد العملاء في البنك بسبب وجود علاقة بين الحقول في ال Asmaa adel 2 112 08-12-16, 11:57 AM
آخر رد: Asmaa adel
  [VB.NET] كود البحث لا يظهر اي نتائج ولا اي اخطاء Asmaa adel 1 97 03-12-16, 09:41 AM
آخر رد: ابراهيم النعيمي
  [كود] تعديل كود البحث بين تاريخينب hglogtd 2 101 29-11-16, 01:37 AM
آخر رد: hglogtd
  البحث مثل جوجل Samosoft 4 136 29-11-16, 01:35 AM
آخر رد: Samosoft
  خطأ عند البحث khalid475 1 101 28-11-16, 06:23 PM
آخر رد: khalid475

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


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