تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[Acces2003] تعديل على كود استعلام بيسيط
#1
السلام عليكم 
كود لبحث عن كلمة من جملة مخزونة في قاعدة البيانات وقرأت سابقا كود مشابه اذا كنت مش غلطان يشبه الكود ادناة واذا كان خطا ممكن كود اسعلام عن كلمة من جملة موجودة في قاعدة بيانات اكسس 2003 مربوطة ب data1
PHP كود :
Data1.RecordSource "Select       (Select Count(min) From Table1 Where type ='  " % & lcd &  % " ') As bbbb  From Table1"
Data1.Refresh
If Data1.Recordset.RecordCount 0 Then
Label1
.Caption Data1.Recordset.Fields("bbbb").Value 
الرد }}}}
تم الشكر بواسطة:
#2
أهلا أخي الكريم , تعديل الكود كالآتي :

PHP كود :
Data1.RecordSource "Select * From Table1 Where type  LIKE ' %" % & lcd &  % "%'"
Data1.Refresh 
الرد }}}}
#3
الف شكر استاذنا الغالي

لكن انا اريد الاستعلام عن عدد مرات ذكرها
الرد }}}}
تم الشكر بواسطة:
#4
أهلا أخي الكريم , أرجو المعذرة  لم تذكر عدد التكرار في نص المشاركة , على العموم هذا التعديل الجديد :

PHP كود :
Data1.RecordSource "Select  (Select Count(type) From Table1 Where type LIKE '%" lcd "%') As zTotal  From Table1"
Data1.Refresh
If Data1.Recordset.RecordCount 0 Then
    Label1
.Caption Data1.Recordset.Fields("zTotal").Value 
Else
 
   Label1.Caption "0"
End IF 
الرد }}}}
#5
شكرا استاذي الغالي على المساعدة والمتابعة لكن بيعترض على % التي داخل " يخطا سنتكاس ايرور
الرد }}}}
تم الشكر بواسطة:
#6
أهلا أخي الكريم , أرجو المعذرة نسيت من علامات الـ % الزائدة , على العموم تم تعديل ردي السابق .
الرد }}}}
تم الشكر بواسطة: ahmedabdelaliem , Amir_alzubidy
#7
تعبتك معي استاذنا العزيز الكود السابق ينفذ لكن يعطي النتيجة 0 مع العلم ان الكلمة المراد البحث عنها موجوده في قاعدة البيانات بشكل منفرد وبشكل جملة اي يعني موجود مع جملة
الرد }}}}
تم الشكر بواسطة:
#8
السلام عليكم و رحمة الله و بركاته...

استعمل الكود التالي:

PHP كود :
Data1.RecordSource "SELECT COUNT(*) As bbbb FROM Table1 WHERE [type] LIKE '%" lcd "%'"
Data1.Refresh
If Data1.Recordset.RecordCount 0 Then
    Label1
.Caption Data1.Recordset("bbbb")
Else
 
   Label1.Caption "0"
End If 

مع ملاحظة:

1. أنك لا تحتاج إلى جملتي SELECT متداخلتين.
2. بما أن المقارنة جزئية (أي أن الكلمة قد تكون منفردة أو ضمن جملة) فيجب استعمال العامل LIKE و ليس علامة اليساوي (=).
3. بما أن كلمة type قد تكون كلمة محجوزة (و أنت تستعملها كاسم حقل) فإننا نضعها بين قوسين مربعين [ ... ]

* و أخيراً فإنه هناك مشكلة مع الخاصية RecordCount حيث أنها تعطي أحياناً القيمة -1 !!!

نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد }}}}
#9
شكرا على المتابعة لكن ايضا 0 حاولت تغير اسم العامود ايضا 0 هل هناك مشكلة في كتابة الكود ام في قاعدة البيانات طلبي الصغير منكم اختبار الكود على اي مشروع بسيط وشكرا للمساعدة
الرد }}}}
تم الشكر بواسطة:
#10
ارفع مثالك اخي للتعديل عليه

بالتوفيق
محاسب / أحمد عبد العليم
الرد }}}}


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Lightbulb [سؤال] مسأله استعلام ADODC / VB6 / MS access mustafaalnassah 3 73 30-10-16, 01:05 AM
آخر رد: Ahmed_Mansoor
  اريد تعديل هذا الكود للبحث لاى كلمه فى النص رجل الكهرباء 2 112 03-10-16, 02:19 AM
آخر رد: رجل الكهرباء
  [vb6.0] طلب تعديل على برنامج iisys 21 582 23-09-16, 03:03 PM
آخر رد: iisys
  تعديل على كود استدعاء بيانات محددة من ثلاث جداول مصمم هاوي 10 270 16-09-16, 08:33 PM
آخر رد: Amir_alzubidy
  الاخوة الكرام نرجو المساعدة فى تعديل المرفق gadr 13 412 21-08-16, 04:50 PM
آخر رد: gadr
  تعديل على كود بسيط في list mohfar 0 114 14-07-16, 11:18 PM
آخر رد: mohfar
  [vb6.0] مساعدة في تعديل كود مقارنة أرقام ثم وضعها في لست بوكس asto 1 117 14-06-16, 08:00 AM
آخر رد: Ahmed_Mansoor
  [ تمّ الحل ] : طلب تعديل على كود البحث عبد العزيز البسكري 3 180 25-05-16, 09:39 AM
آخر رد: Amir_alzubidy
  تعديل على كود الارسال عيسى ابو ارميس 1 146 14-03-16, 02:40 PM
آخر رد: mhareek
  كود استعلام عن التاريخ ؟ mohfar 5 308 13-03-16, 08:26 PM
آخر رد: khodor1985

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


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