+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=25102)
استخراج الملفات من ال Resources - YousefOkasha - 26-05-18
السلام عليكم و رحمه الله و بركاته اهل المنتدي ..
قمت بإضافه ملف في ال Resources و ليكن مثلا ملف صيغته .exe او .zip و قمت بإضافة في الForm .. زر button و عندما اضغط عليه يظهر لي او للمستخدم اداة SaveFileDilog لحفظ الملف المحدد في ال Resources ..
فقمت بالبحث عن هذا و لم أجد شئ يزيدني علماً 
RE: استخراج الملفات من ال Resources - elgokr - 26-05-18
كل ما عليك وضع هذا الكود داخل الزر
كود :
Using SaveFileEXE_ As New SaveFileDialog
With SaveFileEXE_
.AddExtension = True
.DefaultExt = ".exe"
.Filter = "Portable Document Files (*.exe)|*.exe"
.FilterIndex = 1
.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments
.Title = "Select The Location To Save This EXE File"
.ValidateNames = True
End With
If SaveFileEXE_.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim b As Byte() = My.Resources.Pro_V02
My.Computer.FileSystem.WriteAllBytes(SaveFileEXE_.FileName, b, False)
End If
End Usingمع التنبيه بتغيير هذه الكلمة
PHP كود :
Pro_V02
الى اسم الملف داخل الـ Resources
تحياتى لك
وتمنياتى لك التوفيق
RE: استخراج الملفات من ال Resources - YousefOkasha - 26-05-18
شكرا لك و لمجهودك ..
و إذا كنت تملك اكواد مفيدة ..
فهل يمكن ان ترفعها لي ؟
RE: استخراج الملفات من ال Resources - elgokr - 27-05-18
الشكر لله
لا امتلك اكواد محددة
ولكن عن قريب ساقوم بعمل كم موضوع قد اجمع بها اغلب الاكواد
من خلال الاستفسارات المتكررة او الغالبة التى قد يحتجها اى شخص
حتى يستفاد منها الجميع
تحياتى لك