منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ما سبب الخطاء عند الحدث Adodc1.Refresh
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الاخوة الكرام
                   صممت مشروع فيه طريقة بحث في التكست كما في المثال المرفق بحيث تظهر نتائج البحث 
                   مباشرة على DBgrid عدد اثنين و تم ربط الاولى مع data و الثانية مع Adodc 
          
               تجرب تدخل في تكست البحث السريع الاول تمام ام الثاني يظهر رسالة ( خطاء في بناء الجملة في جزء من العبارة)

            المعذرة انا رابط مع قاعدة البيانات عن طريق الادوات
ابشر اخي الكريم الملف  في المرفق

و جزيت خيرا على الرد .....
السلام عليكم
تحياتي وشكري وتقديري لصديقي العزيز امير وجزاه الله كل خير
اما بخصوص موضع الاخ allobaed وبعد اطلاعي على ملفه المرفق وبالتحديد بخصوص طلبك يمكنك استخدام الكود التالي
Dim x As String
x = Text4.Text
Adodc1.RecordSource = "Select * From Emp Where Num LIKE '" & x & "%'"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
و عليكم السلام .....يا عالي
شكر لك اخي الكريم لعلي اجرب و انظر النتيجه

جزيت خيرا يا الغالي تمام الكود
و لي سؤال او تكرمت
ما هي وضيفة الكود التالي الذي اضفته Adodc1.CommandType = adCmdText