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

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



كود استخراج ملف exe من الرسورس الى ملف محدد - hassan - 27-04-14

السلام عليكم


شباب في كود تعبت وانا احول ادوره ما لقيته


الكود هو


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


ما هو هذا الكود ورجاء شرح الكود

عشان انا توني مبتدئ في هاذي الاشياء وحاب افهم وش معنه كل كود


وشكرا اتمنى احد يجاوبني


RE: كود استخراج ملف exe من الرسورس الى ملف محدد - vbnet - 27-04-14

(27-04-14, 04:32 PM)hassan كتب : ...انا عندي ملف exe في الرسورس ابي استخرجة الى ملف محدد انا احدده
...

مثال على السريع........
(ملاحظة: طبعاً عند استعراض عناصر الريسورس باستخدم My.Resources لا يظهر نوعها مثل exe أوjpg وهكذا، ولكن أنت =المبرمج= من يعلم ذلك)
كود :
' يقوم بحفظ العنصر من الريسورس في اسم الملف المحدد مع مساره
IO.File.WriteAllBytes("C:\program.exe", My.Resources.program)



RE: كود استخراج ملف exe من الرسورس الى ملف محدد - vbnet - 27-04-14

-
إذا كنت تريد تحديد مكان الحفظ عن طريق مربع حوار هذا مثال على السريع...
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    ' إنشاء مربع حوار
    Dim sv As New SaveFileDialog

    ' نحدد له الأنواع التي عليه استعراضها
    sv.Filter = "Programs (*.exe)|*.exe"

    ' نحدد له اسم ملف مبدئي الى حين تغييره
    sv.FileName = "program.exe"

    ' هنا هل تم الضغط على موافق في مربع الحوار
    If sv.ShowDialog = Windows.Forms.DialogResult.OK Then

        ' يقوم بحقظ العنصر من الريسورس في اسم الملف الذي تم اختياره مع المسار
        IO.File.WriteAllBytes(sv.FileName, My.Resources.program)

    End If

End Sub



RE: كود استخراج ملف exe من الرسورس الى ملف محدد - hassan - 27-04-14

الللللللللللللللللللللللللللللللف شكر لك يا vbnet انت انسان مبدع وشكرا على خذا الشرح وعلى هذا الكود شكرااااااا شكراااااا ويعطيك العافيه



وخليك في المنتدى دايم احتاجك في الاكواد هههههههههههههههه



ما قصرت كفيت ووفيت


RE: كود استخراج ملف exe من الرسورس الى ملف محدد - 3efoo - 08-05-14

كود مفيهوش غلطه
جزاك الله خير