السلام عليكــم ورحمـة الله وبركاتــه ،،
اخوتي الكرام .. يوجد لدي مربع نص داخل نموذج خاص بالبيانات الشخصية . أريد باستخدام جملة SQL أن أقوم بإظهار الاسم الأول ..
لقد قمت بعمل هذا الكود ولكن أعتقد بأن في نقص ..
Dim StrSql As String StrSql = "SELECT NAME.FIRSTNAME FROM NAME WHERE NAME.ID='1001';" DoCmd.RunSQL (StrSql) SEL.Value = StrSql
مرفق لكم مثال ...
تحياتي ،،،
تم تعديل هذه المشاركة بواسطة hassaan100 في 22 نوفمبر 2009 في 10:26
وعليكــم السـلام ورحمة الله وبركاتـه..
أخي الكريم، لديك خطآن جوهريان:
الأول، وهو الخطأ الذي يظهر لك، سببه أن الطريقة RunSQL، لا تأخذ إلا عبارات معالجة للبيانات Action Queries، أو تعريف للبيانات Data Definition، مثال النوع الأول الإضافة والحذف والتعديل، ومثال النوع الثاني إنشاء الجداول وحذفها، وكذلك إنشاء الفهارس... هذا يعني أنه لا يصلح استخدام هذه الطريقة مع عبارات الاستعلام عن البيانات SELECT، ولذلك لا تستطيع استخدامها من أجل استعادة قيمة حقل؛ الذي تستطيع استخدامه لذلك على سبيل المثال الدالة DLookup كما يلي:
SEL.Value = DLookup("FIRSTNAME", "NAME", "ID = '" & ID)تجد ذلك في الملف المرفق. أيضاً هناك طرق أخرى، مثل استخدام مجموعة سجلات recordset.
الثاني، أنك أسندت القيمة StrSql لمربع النص، وهذه القيمة هي عبارة الاستعلام بطولها، وليس ناتج العبارة، ولذلك بفرض أن السطر السابق قد مر بسلام، فإنك لن تحصل في الأخير في مربع النص سوى على عبارة استعلام SELECT.
والله أعلم.
ملحوظة: ينصح دائماً عند استخدام الدوال وطرق الكائنات الرجوع إلى ملفات المساعدة من أجل معرفة غرض وطريقة الاستخدام، وهذه أخي بالمناسبة ليست نصيحة نظرية :)
تم تعديل هذه المشاركة بواسطة أحمد مبارك الحيقي في 22 نوفمبر 2009 في 16:25
شكرا لك على ما قمت بتوضيحه .. بارك الله فيك وزادك علما ..
تحياتي ،،،
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…