برجاء المساعدة

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

برجاء المساعدة

مُساهمة من طرف عوض الله123 في الجمعة فبراير 28, 2014 11:46 pm

طريقة البحث فى ado
والبحث فى اكثر من حقل
فى المثال لو عايز ابحث عن كل اسم ahmed
والسعر 30
مثلا
avatar
عوض الله123
.
.

تاريخ التسجيل : 28/02/2014
المساهمات : 1
النقاط : 3
التقيم : 0
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: برجاء المساعدة

مُساهمة من طرف السنى في السبت مارس 01, 2014 7:07 am

_ فى البداية نقوم بكتابة كود الاتصال بقاعدة البيانات على النحو التالى :

فى القسم العام

الرمز:
الكود:
Public DB As New ADODB.Connection
Public Rs As New ADODB.Recordset


فى حدث تحميل النافذة

الرمز:
الكود:
DB.CursorLocation = adUseClient
   DB.Provider = "Microsoft.JET.OLEDB.4.0;"
   DB.Open App.Path & "\Data.mdb"
     

_ بعد ذلك يتم إستخدام عبارة SQL و تمريرها الى كائن السجلات R وذلك فى حالات عده وهى على النحو التالى :


الكود:
sql = "select * from Table1 where name = 'ahmed' AND pirce =30"

            R.CursorType = adOpenStatic
          R.CursorLocation = adUseClient
          R.LockType = adLockOptimistic
            R.Open sql, B, , , adCmdText

      If R.RecordCount > 0 Then
          Set DataGrid1.DataSource = R
       Else
          MsgBox "لايوجد نتائج للبحث"
          R.Close
        End If

فى الاستعلام أعلاه سيقوم بجب الحقول التى تحتوى على الاسم ahmed و السعر يساوى الرقم 30
avatar
السنى
.......
.......

تاريخ التسجيل : 18/02/2011
المساهمات : 186
النقاط : 346
التقيم : 18
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: برجاء المساعدة

مُساهمة من طرف السنى في السبت مارس 01, 2014 7:08 am

للمزيد عن طرق البحث يرجى مراجعة المقال التالى :

http://egy-tech.forumegypt.net/t859-topic
avatar
السنى
.......
.......

تاريخ التسجيل : 18/02/2011
المساهمات : 186
النقاط : 346
التقيم : 18
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى