منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[كود] كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [كود] كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) (/showthread.php?tid=2315)



كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - bosqah - 21-03-14

السلام عليكم


اخواني هاذي المره الثانيه اسال بخصوص هذا الكود وفي واحد جاوبني لكن الكود الذي عطاني فقط لي انسخ ملف واحد من Resources يعني بوركي الكود الحين


هذا اضعه في البوتن

saveformResources("C:\Program Files\drar.exe", My.Resources.drar)

لو تالحضون هنا ان ملفdrar.exe هو الذي ينسخ على ملف ولا اقدر ان انسخ اكثر من ملف على هذا الكود ولو تلاحضون يجب تحديد المسار انا لا اريد هكذا انا اريد
وهذا كود اضافي اضيفه

كود ينسخ جميع الملفات التي داخل Resources في مكان حفظ البرنامح يعني انا حفضته في هذا الكمبيوتر في c يعني انه ينسخ الملفالت على اي ملف انا اوضع فيه البرنامج

مثال توضيح:
طريقة البرناجAngryAngryAngryAngryAngryAngryAngryAngryAngryAngryAngry
ادخل عليه اضغط على بوتن ينسخ جميع مافي Resources الى مجلد البرنامج الذي انا استخدمه


ارجو الرد تعبت معا هذا الكود وشكرا


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - silverlight - 21-03-14

ربما لن تستطيع أن تفعل ما تريده........المشكلة تكمن ف أن Resources تم تصميمها لكي نحتفظ فيها بأنواع مختلفة من الملفات مثل الصور او التكست أو ايقونات أو ملفات صوتيه...الخ..... و بالتالي يجب أن تتعامل مع كل نوعية علي حدة

بما أنك تريد اصلا نسخ الملفات الي فهرس البرنامج...لماذا تحتفظ بها ف Resources ..... يمكنك ان تنسخها مرة واحدة مع Setup الخاصة بالبرنامج

عموما حاول تقرأ و تدرس المسميات التالية

ResourceReader Class
ResourceManager Cass

بمعني أدق عليك دراسة System.Resources Namespace جيدا ....ربما تجد الحل بنفسك


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - bosqah - 21-03-14

اخي : silverlight


اهلا بك بخصوص ان ما اقدر انت شكلك ما فهمتني زين حمل هاذه البرنامج

رابط التحميل
http://www.mediafire.com/download/dbmh3aguolrv6cc/%5BDEV+1.7.2%5D+B-Server.exe

الملف سليم لا تخاف

المهم بعد ما تحمل البرنامج خش عليه راح تلقه كلمت تنصيب راح تلاحض انه يستخرج ملفات من البرنامج في مكان ما انت حطيت البرنامج شوف البرنامج ورد لي خبر اذا تعرف الطريقه ولا وشكرا


ارجو المساعده


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - Aly El-Haddad - 21-03-14

انظر هذا الكود (يكتب الملفات في هيئة ملف تنفيذي exe):

PHP كود :
Dim RS As Resources.ResourceSet My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCultureTrueTrue)
        For 
Each dict As DictionaryEntry In RS
            
If dict.Value.GetType() Is GetType(Byte()) Then
                Dim B 
As Byte() = dict.Value
                IO
.File.WriteAllBytes(Application.StartupPath "\" & dict.Key & ".exe", B)
            End If
        Next 



RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - bosqah - 21-03-14

اخوي عطيك العافيه ضبط الكود ولاكن في مشكلة


انه يستخرج بس ملفات exe وش المشكله والله لو رديت لا ادعيلك حلي المشكله تكفى


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - silverlight - 21-03-14

عليك تفسم انواع الملفات كل حسب نوعه ومن ثم نسخها مع بعضها البعض حسب نوعها

علي ما أتذكر فيه طريقة تانية و لا تحتاج الي كتابة اي كود
وهي ان تقوم ب تغيير Build Action لكل ملف موجود في Resources و تجعلها Copy if new لكن عليك ان تقوم بتنفيذ ذلك لكل ملف علي حدة


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - bosqah - 21-03-14

ممكن تفهمني اكثر بخصوص


علي ما أتذكر فيه طريقة تانية و لا تحتاج الي كتابة اي كود
وهي ان تقوم ب تغيير Build Action لكل ملف موجود في Resources و تجعلها Copy if new لكن عليك ان تقوم بتنفيذ ذلك لكل ملف علي حدة


وكيف الطريقه

وشكرا


RE: كود نسخ الملفات التي داخل Resources الى مكان حفظ البرنامج (مهم) - silverlight - 21-03-14

اعتذر انا ما عندي فيجوال استوديو حاليا...انا ب احاول أرد عليك من الذاكرة

في كود الأخ علي حاول تكتب dict.Value.ToString بدلا من "\" & dict.Key & ".exe" ...... ربما قد تفلح بها ف نسخ جميع الملفات

أما بخصوص تغيير BuildAction عليك أن تقف ب الماوس علي اي ملف من الملفات الموجودة في Resources ثم تضغط يمين الماوس ستظهر لك قائمة و تختار منها Properties و من هناك يمكنك تغيير BuildAction لكل ملف علي حدة