عاجل - ماهو كود البحث في قاعدة البيانات Ado

[zeko]

:confused: مبروك لعودة المنتدى بهذا الثوب القشيب - عندي سؤال كيف ابرمج زر البحث في قاعدة بيانات معمول في الاكسس ومربوط بالاداة ADO ??????????????

[X_Programmer]

أهلاً وسهلاً بك
أخي الطريقة هي نفس الطريقة اللي تبحث فيها في الـ DAO
وهي:
Ado.FindFirst
Ado.FindNext
Ado.FindPrevious
Ado.FindLast

* يرجى من المشرف نقل هذا الموضوع إلى قسم قواعد البيانات

[جورجي]

استخدم التالي وان شاءالله يضبط معاك
rs.filter="اسم الحقل المراد البحث على اساسه=<>او>الشرط الذي تريده ثم القيمه المراد البحث عنها"
مثال
اضغط على boutton لكي تقوم ببرمجه زر البحث
"rs.filter="name=ahmed وهكذا يبحث لك على حسب الاسم وهو احمد في حقل الاسم
واسماء الحقول يجب ان تكون بالانجليزي
وهكذا يظهر لك احمد في الصندوق لانك طلبت منه البحث عن احمد ثم وضعه في الصندوق

textbox1.text=rs.filed ("nam").value

[zeko]

ارجو من السيد/ جورجي التوضيح اكثر لان المسالة مش راضية تضبط - مع شكري وتقديري

[zeko]

يا اخواني انا عاوز ابرمج زر البحث في adodc بحيث يكون مثل زر البحث في الاكسس بالضبط
ممكن حد يساعدني وله دعوة صالحة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[جورجي]

زيكو اذامشروعك مرتبط بالاكسس سوف اشرح لك بواسطه مثال مبسط اولا افتح الاكسس واعمل جدول فيه الرقم ثم الاسم طبعا بالانجليزي سمي الجدول student وخزنه في السي وسميه scc ثم افتح مشروعك فى
الفيجوال ثم ارسم لبيل للرقم ولبيل للاسم ثم اعمل صندوق امام الرقم واخر امام الاسم وصندوق لكي تضع فيه ا لاسم الذي تريد البحث عنه ويضع النتيجه في الصندوق الرابع وزر اكتب عليه بحث عن طريق الاسم .الى الان ان شالله واضح
تانيا: اربط مشروعك بالاكسس وذلك عن طريق اذهب الى قائمه project
ثم add refrence
تطلع نافذه فيها خانه نت و كوم وخانه اخرى اذهب الى خانه كومcom
ابحث عن microsoftactivex2.7
ثم اعملselect all
ثم ok
كدا انت ربط مشرعك بالاكسس بكل سهوله
الان نبرمج المشروع اللى فوق برمج فى فورم لود اضغط على الفورم مرتين تفتح صفحه البرمجه عرف الاتصال اولا ثم عرف كائن السجلات بالطريقه التاليه
dim con as new adodb.connection
dim rs as new adodb.recordset
rs.open("student","provider=microsoft.jet.oledb.4.0;data source=c\scc.mdb",...static,...optimastic
لاتنسى تقفل القوس النقط الى وضعتها للك هي اختصار لكلام طويل نهايته الكلمه الى كتبتها اصلا تطلع مباشره لك وانت تختار ها وهي تعتبر خاصيه مهمه وكذلك الخاصيه الاخرى تطلع وانت تختارها ولكي تتم عمليه البحث يجب ان تضيف خاصيه اخرى وتكتب قبل rs.open
وهي rs.cursorlocation=adodb.cursorloction enum...client
وهي خصائص تطلع عليك اختيارها فقط

الان برمج زر بحث يبحث عن الاسم الموجود في الصندوق الثالث ويضع النتيجه في الصندوق الرابع
اضغط علىbottun
" ' "& rs.filter="name=' " & textbox3.text
مهم جدا جدا ان تضع مسافه بين سنقل كوتيشن ودبل كوتيشن و& كلها بينها مسافات
textbox4.text=rs.filed("name").value
انت هنا تطلب منه يبحث عن الاسم الموجود في الصندوق الثالث ويضع نتيجه البحث في الصندوق الرابع
اوكي
ان شالله تكون استفدت
جورجي

[eng_mostafa]

هو مش قصدو كده

هو قصدو اللى هو عايز كود البحث

يعنى يضغط على الكومند بوطون يبحث عن المطلوب

سواء كان بالعربى او الانجليزى وميطريطش الانجليزى

ولكم جزيل الشكر