(تمت الاجابة) إنشاء إستعلام جديد بالكود

[عبدالله المجرب]

السلام عليكم

قمت بلمحاولة ان يتم انشاء استعلام جديد (بشروط) بواسطة الكود (يتم تفعيله عن طريق زر أمر)

فقمت بكتابة هذا السطر في الكود

DoCmd.RunSQL "SELECT Mydt.SRNO, Mydt.MyName, Mydt.Fuc, Mydt.Site" & vbCrLf & _

"FROM Mydt" & vbCrLf & _

"WHERE (((Mydt.MyName) Like ""*"" & [ادخل جزء من الأسم] & ""*"" )) ;"

مع العلم بان هذه الجملة هي في الاصل جملة SQL تم تحويلها الى كود بعد الاطلاع على عدد من اعمال الاساتذة بهذا الخصوص وهذه الجملة هي كالتالي

SELECT Mydt.SRNO,  Mydt.MyName, Mydt.Fuc, Mydt.Site

FROM Mydt

WHERE (((Mydt.Rank) Like "*" & [ادخل جزء من الأسم] & "*"));

ولكن عند تفعيل زر الأمر تظهر هذه الرسالة

=================================

قد أكون اخطأت في كتابة الجملة وارجو التصحيح والمهم هو كيفية إنشاء إستعلام جديد (بأسم محدد) بالشروط الموجود على ان يتم حذفه أو تحديثه في كل مرة يتم تفعيل الزر

[ابومريم]

السلام عليكم

الاخ الغالي ابو احمد

اللي اعرفه يتم انشاء استعلام من خلال جملة sql

ومن ثم ممكن نفتحة عن طريق زر امر

DoCmd.OpenQuery "QueryName"

الا اذا كان هناك راي ثان للاعضاء

موفق اخي

تم تعديل يناير 1, 2013 بواسطه ابومريم

[عبدالله المجرب]

السلام عليكم

اخي ابو مريم شكراً للرد

طلبي ان يتم انشاء الاستعلام بالكود وليس يدوياً

[عبد الفتاح كيرة]

أهلا حبيبنا عبد الله

الاستعلامات التى يمكن إجراؤها عن طريق الكود ليست من نوع استعلام التحديد

بل تكون من أنواع أخرى

مثل

استعلامات التحديث

أو الحذف

أما استعلام التحديد ذات الكلمة select فيتطلب شاشة الاستعلام

و هذا منطقى

لأنه لا توجد شاشة يتم التحديد فيها

تم تعديل يناير 2, 2013 بواسطه أبو لميس

[عبدالله المجرب]

يعني لا يمكن عن طريق الكود انشاء استعلام جديد بشروط

[منتصر الانسي]

تماما كما تفضل الاستاذ ابو لميس فالاستعلامات التي يمكن تنفيذها بالكود هي الاستعلامات الإجرائية التي سيترتب عليها إجراء معين (كالتحديث أو الإلحاق أو الحذف)

أما إستعلامات التحديد (كما في مثالك) فيتم التعامل معها كمتغيرات فقط وليس كنتيجة إجراء .

أي أنه يمكنك إستخدامها كـ(RecordSet) او كمصدر بيانات يتم التعامل (أو إختبار نتائجه) للإستفادة منها في الكود

أرجو أن يكون الشرح واضح

تحياتي,,,

[عبدالله المجرب]

أي أنه يمكنك إستخدامها كـ(RecordSet) او كمصدر بيانات يتم التعامل (أو إختبار نتائجه) للإستفادة منها في الكود

هل ممكن تعديل الكود بإضافة هذه الجملة اليه

[منتصر الانسي]

اخي العزيز عبدالله

لا يمكن عمل التعديل مالم يكون مفهوما وظيفته أي أنه يمكنني وضع متغير من نوع Record Set واقرنه بجملة الإستعلام ولكن (وهو الأهم) ماذا بعد ذلك ؟؟؟

يعني ماهو الشيئ او الوظيفة التي أريد تنفيذها ؟

وهذا لن اعرفه مالم اكون ملما بالعمل في هذه الجزئية على الأقل

لذا رأيت أن ارفق لك مثال يتم فيه الإستفادة من هذا النوع من المتغيرات في تعبئة كومبوبوكس في النموذج ارجو أن يكون مفيداً

تحياتي,,,

RecordsetBind.rar

[عبدالله المجرب]

بصراحة لم اتمكن من فهم المرفق وعلاقته بالطلب فاعذرني فلازلت في البداية

==

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

[منتصر الانسي]

يبدو ان هناك لبس لدى كلينا

اخي العزيز كما سبق وبينا انه يجب نعرف الوظيفة التي تريدها للكود .

طيب هنا ماهي النتيجة النهائية التي تريدها ؟

هل تريد فتح جدول يحتوي على نتيجة الاستعلام ام ماذا ؟

ارجو التوضيح وان شاء الله نصل للحل

تحياتي,,,

[منتصر الانسي]

عموما اذا كان هذا هو طلبك فأرجو أن يكون هذا المثال ملبيا له

تحياتي,,,

انشاء استعلام عن طريق الكود.rar

[عبدالله المجرب]

عموما اذا كان هذا هو طلبك فأرجو أن يكون هذا المثال ملبيا له

تحياتي,,,

هو بالضبط ما اريد والان ساحاول التطبيق على ما لدي

[منتصر الانسي]

احمد الله ان المثال قد جاء بحسب ماطلبت

ولكن لابد هنا من التأكيد على ماسبق ذكره فالكود هنا لم يسفيد من نتائج الإستعلام بل قام بعمل إجرائي وهو إنشاء إستعلام بغض النظر عما جاء به من بيانات وفي حال أردت إستخدام ماجاء فيه من بيانات فإن الكود سيقوم بالتعامل مع الإستعلام الجديد الذي تم إنشاءه

تحياتي,,,

[عبدالله المجرب]

شكراً لك استاذ ابو ناصر

تمت الاجابة