[shado1796]

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

أخي أولا نبدأ بطريقة اضافة مشروع الى Resources
الصورة >> http://im33.gulfup.com/JmIX8.jpg

-------------------------------------------------------------------------------------------

الأن لفتح برنامج من Resources

الكود التالي :

كود :

Dim F As String = System.IO.Path.GetTempFileName

Dim arr() As Byte = My.Resources.Shado

System.IO.File.WriteAllBytes(F & ".exe", arr)

Process.Start(F & ".exe")

[COLOR="#0000CD"]

بحيث ان Shado هو لإسم البرنامج الذي تريد فتحه من Resources ----- و exe هي صيغة الملف الذي كتبت اسمه وتريد فتحه
[/COLOR]
---------------------------------------------------------------------------------------------------------------

وهذا لفتح فــديـو و صــوت ..

كود :

Dim F As String = System.IO.Path.GetTempFileName

        Dim arr() As Byte = My.Resources.ShadoMedia
        System.IO.File.WriteAllBytes(F & ".mp4", arr)

        Process.Start(F & ".mp4")

بحيث ShadoMedia هو اسم الفديو أو الصوت ----- و Mp4 صيغة الفديو أو الصوتر.

--------------------------------------------------------------------------

وهذا لفتح ملف اومر Bat.

كود :

My.Computer.FileSystem.WriteAllText("Shado.bat", My.Resources.Shado, False)
Process.Start("Shado.bat")

بحيث Shado.bat الموجودة الثنتين هو اسم ملف الأوامر مع صيغته ..

---------------------------------------------------------------------------

أتمنى لك التوفيق ...