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

If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

rs.Open "select * FROM XX WHERE XX like '" & Combo1.Text & "'", Adodc1.ConnectionString, 1, 3

علي نتيجة بحث الاتي

If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

rs.Open "SELECT XX, XX, XX, XX, XXl,XX, XX,XX, XX, XX, XX FROM table1 ORDER BY XX, XX, XX, X, XX, XX, XX,XX, XX, XX, XX ", Adodc1.ConnectionString, 1, 3

Set DataGrid1.DataSource = rs
الرد }}}}
تم الشكر بواسطة:
#2
لو ترفق مثال به ماتيرد افضل
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] استعلام وطباعة كنونو 0 51 26-12-16, 02:46 PM
آخر رد: كنونو
  مساعدة في تطبيق هذا الكود bidaya 0 69 06-12-16, 04:46 AM
آخر رد: bidaya
Lightbulb [سؤال] مسأله استعلام ADODC / VB6 / MS access mustafaalnassah 3 108 30-10-16, 01:05 AM
آخر رد: Ahmed_Mansoor
  استفسار بشأن طباعة نتيجة البحث abomna 0 152 01-10-16, 05:41 PM
آخر رد: abomna
Photo [كود] طلب كود جمع الأرقم عشوائية وطهر نتيجة فيجوال بيسك DeMahdi 8 324 25-05-16, 01:25 PM
آخر رد: DeMahdi
  [Acces2003] تعديل على كود استعلام بيسيط mohfar 10 635 20-03-16, 02:42 AM
آخر رد: mohfar
  كود استعلام عن التاريخ ؟ mohfar 5 444 13-03-16, 08:26 PM
آخر رد: khodor1985
  [vb6.0] تعديل استعلام Abdellah 5 436 04-03-16, 12:43 AM
آخر رد: Abdellah
  [مثال] ابي فزعتكم بكود طباعة نتيجة البحث (اكتف ريبورت) layan2000 2 479 01-02-16, 07:00 AM
آخر رد: layan2000
  [SQL] كود استعلام من ثلاث جداول VB_Local 9 790 01-02-16, 03:07 AM
آخر رد: VB_Local

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


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