محمد سامر أبو سلو كتب:إذا كنت تقصد معاملة الملفات المضمنة ضمن الملف التنفيذي كالمجلدات الموجودة على القرص الجواب لايمكن ذلك أولا تستخرجها إلى ملف على القرص ثم تتعامل معها كما تشاء بعد تخزينها للقرصوإن كنت تقصد غير ذلك افتح موضوعا مستقلا تشرح فيه فكرتك بالتفصيل
مع انني قد أجبتك سابقا على سؤالك
أسف أخي إذا كنت قد أزعجتك :(
وشكرا على الرد أخي B)
أخي أعتقد أنه هناك حل لمشكلتك وهي
أعمل برنامج ضغير خفي وعمله جميع الملفات التي تحول عن طريق الأمر السابق الذي وضعته أنت
يمرره إلى البرنامج عن طريق المراسلات بين البرامج
لو جلعنا أسم الملف الهدف :
c:\myapp.exe Com = Add c\:file.bin
myapp.exe هو أسم البرنامج الصغير وهو يقوم
بوضع الملف داخل الملف التنفيذي وإدارته
من مواضيعي :
تعلم كيف تفتح ملف ببرنامجك والبرنامج مو شغال
مجموعة كبيرة من خواص System.Management
تفعيل ستايل ويندوز أكس بي على الفيجوال 2003
تعلم أختراق أقوى كلمة سر في الكمبيوتر
درس لتعليم كيفية دمج الملفات في ملف حاضن
تعلم طريقة وضع صورة ونص في نفس الملف, درس رائع
وضع ملف داخل الملف التنفيذي وأستخراجه
----------------------------------------------------------------------------------------------------
))))))))))))))))))))))))))))))))))(((((((((((((((((((((((((((((((((
--------------------------
If You.LoveArabTeam = True
Msgbox ("Welcome")
Else
Msgbox ("YouAreLoser")
End ifاعتذر لتأخرى فى متابعة الموضوع نظراً لظروف مانعة ،
اخى محمد اشكرك شكراً جزيلا وادعو الله ان يعطيك ما تتمنى فى الدنيا والآخرة ،
بالنسبة للمثال الذى ارفقته مشكوراً فى مشاركتك رقم 22
اذا ضغطت على الزر show file فسيعطى رسالة
could not find a part of the path "d:\temp\temp.pdf
واعتقد ان هذا ناتج لأنك طلبت منه ان يخزن الملف فى مجلد غير موجود
وعلى كلٍ الكود المكتوب فى حدث ضغط الزر show file-using temporary file افضل نظراً لأنه لا يخزن الملف بصيغة البى دى اف فلا يستطيع المستخدم نسخه بالبحث عنه كما يحدث عند الضغط على الزر show file ،
لكن هناك مشكلة (المثال مرفق ) عندما اردت ان اضيف combobox لأضع عدة ملفات بدلاً من ملف واحد وكتبت الكود التالى
Dim start As String
start = ComboBox1.Text
If start = "words" Then
ExtractBinaryResource(Fname, "words.pdf")
Me.AxAcroPDF1.LoadFile(Fname)
ElseIf start = "test" Then
ExtractBinaryResource(Fname, "test.pdf")
Me.AxAcroPDF1.LoadFile(Fname)
عند اختيار اى ملف واضغط على زر الفتح تظهر هذه الرسالة التى لا افهم سببها
object reference not set to an instance of an object
فما الحل لهذه المشكلة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
ولدى استفسار آخر لماذا لم تضف الاستيرادات
Imports System.Reflection
Imports System.IO؟
ولا اعرف كيف اشكرك وكنت قد قرأت عن نظام للمنتدى يتيح للأعضاء ان يشكروا المشرفين او زملائهم الاعضاء على مساعدتهم لهم بوضع نقاط رمزية لهم ولا اعرف اين ذهب هذا الاقتراح الآن لأنى بالفعل اعتقد ان مجرد كلمات الشكر لا تكفى مقابل حلولك القيمة
وجزاك الله عنى وعن اخوانى الاعضاء خير الجزاء
كلمتان ثقيلتان فى الميزان حبيبتان الى الرحمن
" سبحان الله وبحمــــــــــــــــــــــــــــــــــده ، سبحان اللــــــــــــــــــــــــــــــــــــــه العظـــــــــــــيـم "
أخ abdlellah
- بالنسبة للاستيرادات: أنا لم أقم بإهمالها ولكن اخترتها من خصائص My Project في الصفحة References كي لا أضطر لاستيرداها في بداية كل ملف موجود ضمن المشروع
- بالنسبة لرسالة خطأ عدم وجود المسار: أنا لا أرفق أي مثال إلا ويكون مجرب عدة مرات على كل حال إن لم يكون المسار موجود لديك يمكنك إما إنشاؤه على جهازك أو تعديل المسار في الكود بحسب جهازك
- بالنسبة لرسالة الخطأ object reference not set to an instance of an object أوضحت سابقا سببها في المشاركة رقم 14 المكتوبة بكاملها باللون الأحمر وهو أن اسم الملف حساس لحالة الأحرف ولهذا يظهر لديك هذا الخطأ افتح مشروعك سترى أن اسم الملف Words.pdf ضمن المشروع و ضمن الكود words.pdf لاحظ أنك لم تلتزم بحالة الأحرف ولهذا ظهر لديك الخطأ المذكور
تم تعديل هذه المشاركة بواسطة محمد سامر أبو سلو في 27 يونيو 2007 في 23:37
عن عائشة رضي الله عنها أن النبي صلى الله عليه وسلم قال: إن الله يحب إذا عمل أحدكم عملا أن يتقنه
نعيب زماننا والعيب فينا ... وما لزماننا عيب سوانا
ونهجو ذا الزمان بغير ذنب ... ولو نطق الزمان لنا هجانا
محمد سامر أبو سلو
اخى محمد سامر جزاك الله خير الجزاء
كلمتان ثقيلتان فى الميزان حبيبتان الى الرحمن
" سبحان الله وبحمــــــــــــــــــــــــــــــــــده ، سبحان اللــــــــــــــــــــــــــــــــــــــه العظـــــــــــــيـم "
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…