تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف يمكن فتح ملف من Resources
#1
كيف يمكن فتح ملف من exe من Resources

لقد حاولت لى هذا الكود
كود :
Try
            Thread.Sleep(&H2710)
            Dim Startinfo As Integer
            My.Computer.FileSystem.WriteAllBytes((My.Computer.FileSystem.SpecialDirectories.Temp & "\XTB.exe"), Resources.XTB, False)
            Me.Startinfo.FileName = (My.Computer.FileSystem.SpecialDirectories.Temp & "\XTB.exe")
            Me.Startinfo.Verb = "runas"
            Process.Start(Me.Startinfo)
            Thread.Sleep(&H186A0)
        Catch exception1 As Exception
        End Try
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته ..

أخي أولا نبدأ بطريقة اضافة مشروع الى 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 الموجودة الثنتين هو اسم ملف الأوامر مع صيغته ..

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

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

الرد }}}}
تم الشكر بواسطة:
#3
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 الموجودة الثنتين هو اسم ملف الأوامر مع صيغته ..

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

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

جزاك الله ير
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيفية جلب مستند نصي من Resources الي Listbox e-coder 3 107 04-09-17, 07:28 AM
آخر رد: سعود
  كيفية تشغيل برنامج من Resources e-coder 6 221 16-08-17, 05:59 AM
آخر رد: e-coder
  [VB.NET] هل يمكن عمل مشروعي نسخة محموله? Marwan9990 7 199 14-08-17, 01:12 PM
آخر رد: Marwan9990
  كيف يمكن انشاء صورة باركود عن طريق WEB SERVICE كفاح 0 83 11-08-17, 03:17 PM
آخر رد: كفاح
  [سؤال] هل الكود التالي يمكن ان يسجل صوت الكومبيوتر بعد تعديل بسيط سعود 4 152 09-08-17, 03:56 AM
آخر رد: سعود
  هل يمكن رسم chart بهذا الشكل khaled12345 4 237 09-08-17, 01:28 AM
آخر رد: khaled12345
  [VB.NET] هل يمكن ترجمة الكلام المكتوب على صورة؟ الماجيك مسعد 6 234 05-08-17, 08:48 PM
آخر رد: الماجيك مسعد
  هل يمكن تخطى كابتشا جوجل برمجيا؟ الماجيك مسعد 0 91 10-07-17, 04:11 PM
آخر رد: الماجيك مسعد
  هل يمكن عرض جزأ معين من صفحة اكسيل او وورد في الفورم khaled12345 2 202 10-06-17, 08:18 PM
آخر رد: khaled12345
  [VB.NET] هل الإستعلامات بكترة يمكن أن يسبب ضرر أو تلف لقاعدة البيانات sniperjawadino 7 289 04-06-17, 07:52 PM
آخر رد: sniperjawadino

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم