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

كيف يمكن التأكد من وجود من ملف dll فى أكثر من مكان بالجهاز ؟

بدأه bakkar2000 في 24 نوفمبر 2009 · 3 رد · 665 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

post-148704-12590924387372_thumb.gif

أخوانى أولاً آلف آلف مبروك على الثوب الجديد للفريق العربى أعتقد أنة ثوب العيد كل عام وأنتم بآلف خير . المــــــــــــــــــــــــــــــــــــــــــــــــــوضوع  لدينا فى المرفقات مثال لزرع و إخفاء ملف  dll  فى أكثر من مكان مختلف فى الجهاز و المثال يعمل بمنتهى الكفاءة .. ولكن ! عند فتح النموذج من المفروض أن يتأكد من وجود الملفات أم لا و تقوم على ذلك بعض العمليات البرمجية المهم .. عند الفتح لا يحدث هذا !.. إنما يتم التأكد من الملف الذى فى البرتشن  C و الباقى وجودهم زى عدم وجودهم .. المطلوب .. عند فتح النموذج يتم التأكد من وجود أو عدم وجود الملفات الثلاثة التى تم زرعها فى الجهاز  ولابد من تواجد الثلاثة ملفات حاولت كثيراً بعدة طرق ولكن ؟؟؟ إليكم المرفق LookUP_Dll.rar 

post-148704-1259093439125_thumb.gif
#2

UP

post-148704-8175_thumb.gif

#3

السلام عليكم ورحمة الله وبركاته

أخي الكريم هذه الصورة العامة للتأكد من وجود ملف من عدمه .. تستطيع تغييرها لما يناسبك

Dim fs As Object

	Set fs = CreateObject("Scripting.FileSystemObject")
	If fs.FileExists("D:\1.txt") Then
    	MsgBox "File exists."
	Else
    	MsgBox "File does not exist."
	End If
fs.close

تم التعديل ووضع السطر الأخير من الكود لهدم أو تحرير الكائن من الذاكرة

تم تعديل هذه المشاركة بواسطة koao في 4 ديسمبر 2009 في 20:24

اللهم صلي على محمد وعلى آل محمد كما صليت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

وبارك على محمد وعلى آل محمد كما باركت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

#4

بارك الله لك أخى الكريم / koao 

أكوادك تقريباً هى نفس فكرة أكواد المثال المرفق لكنة يعمل معى ولا أعلم كيف!!!

لك منى أسمى آيات الإحترام

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

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

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

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

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