الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

إضافة مرجع لل DAO بالكود

مغلق
بدأه محمد طاهر في 21 أكتوبر 2002 · 1 رد · 416 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

موضوع منقول من المنتدي القديم

الكاتب : أبو حمود

إضافة مرجع للـ DAO بالكود

في حدث عند نقر زر أمر اكتب :

Application.References.AddFromFile _
"C:Program FilesCommon FilesMicrosoft SharedDAODAO360.DLL"

--------------------------------------

الكاتب: ابوحمود

-----------------------------------------

هذا الكود لغرض إضافة مرجع DAO الى قاعدة بيانات في حالة كون كود ما يستخدم هذه المكتبة .

بالإمكان إضافته بطريقة أخرى دون الحاجة لمعرفة المسار الذي يوجد فيه ملف DAO360.DLL

Application.References.AddFromFile Left(Application.References.Item(1).FullPath, _
InStr(Application.References.Item(1).FullPath, "VBA") - 1) & "DAODAO360.DLL"

وهذا مفيد لإضافته عند المستخدمين الآخرين للقاعدة تلقائيا بعد التأكد من عدم وجوده .

--------------------------------------------------------------------------------

تابع أخبار الانتفاضة - البرهان -الحوار الاسلامي المسيحي احصل على بريد اسلامي مجاني (20) ميجا - اعلانات اسلامية [uR

الكاتب: ابوحمود

#2

الى الاخ العزيز محمد طاهر شكراً على هذا الكود :

Application.References.AddFromFile _

"C:Program FilesCommon FilesMicrosoft SharedDAODAO360.DLL"

ولقد عمل لدي

اما الكود الثاني فلم يعمل لدي فانه يعترض على Item(1)

Application.References.AddFromFile Left(Application.References.Item(1).FullPath, _

InStr(Application.References.Item(1).FullPath, "VBA") - 1) & "DAODAO360.DLL"

فالرجاء أن تبلغني عن سبب عدم أشتغال هذا الكود

وكذلك لو كان بالأمكان شرح هذا الكود لي بالتفصيل أن أمكن وتستطيع أن تبعث لي بالجواب ان اردت على عنواني :

watert@uruklink.net

مع فائق الشكر والتقدير والموفقية ( أن شاء الله)

أخوك

قيس عبد الباسط مصطفى الطائي

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…