دخول

أحمد 13 · 08-02-2014, 05:52 PM

السلام عليكم

لدي قاعدة بيانات فيها عدة جداول من بينها جدول سميته bien و في الجدول هذا أود البحث بواسطة رقم bien و الذي سميته NumBien
لقد جربت البحث بواسطة الفلترة و اليكم الكود و نتجية خاطئة اي لا يعمل

كود :
IF sedit1.GetTextLen<> 0 then
    begin
     dm.ADOQuery1.Filter:='NumBien='''+sEdit1.Text+'*''';
      dm.ADOQuery1.Filtered:=true;

    end
    else
    begin
      dm.ADOQuery1.Filtered:=false;
      end;

و لقد جربت البحث بطريقة ثانية أخرى و تظهر لي رسائل خطأ عديدة و اليكم الكود الثاني :

كود :
dm.ADOQuery1.Close ;
 dm.ADOQuery1.Parameters.ParamByName('c').value:=sEdit1.text;
 dm.ADOQuery1.Open;

 if  dm.ADOQuery1.RecordCount=0 then showmessage('Ne Exist Pas') else showmessage ('Exist') ;

و في قسم الخصائص و بالضبط في SQL وضعت الامر التالي :

كود :
select*from Tbien where NumBien.code=:c

لم أفهم مصدر الخطأ ، و جزاكم الله خيرا لما تقدمونه خدمة للأعضاء .

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة