[Dr.Virus]

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

لو سمحتم أخواني اريد كود

قراءه البايتات الخاصه بملف exe وإضافتها في مصفوفة من نوع Byte

وتشغيل الملف دا في الميموري عن طريق Assembly.Load

أنا اعرف الطريقة لان لا اعرف الكود وشكرا

[الشاكي لله]

انا مافهمت الجزئية الثانية (كيف تقصد تشغيل برنامج في المومري ، اصلا اي برنامج تشغله لابد ان يعمل على الرام)


اما قراءه البايتات الخاصه بملف exe وإضافتها في مصفوفة من نوع Byte :

PHP كود :

Dim data As Byte() = System.IO.File.ReadAllBytes("c://.....") 


[Dr.Virus]

اولا شكرا لردك أخي

انا اقصد بالتشغيل في الميموري :

مثلا انا عندي برنامج يسمي Notepad ++

انا اريد عندما يشتغل البرنامج الخاص بي برنامج Notepad ++ يعمل ايضا لكم ليس كما في


الصورة اسم البروسيس Notepad ++ بل يعمل باسم برنامجي

وأشكرك مره أخي علي ردك

[الشاكي لله]

يعني لنفترض ان اسم برنامجك BallGuider

وتريد تشغل الnotebad مثلا من برنامجك ، وعند تشغيله يكون اسم الnotebad في البروسس هو BallGuider ؟؟!

[Dr.Virus]

اها أخي هذا هو طلبي

[Dr.Virus]

السلام عليكم أخي انا يعني الحمد لله توصلت لكود بسيط لكن به خطأ فياريت تصحيح الخطا أخواني

كود :

Dim X() As Byte = File.ReadAllBytes("D:\1.EXE")
Dim O As Object = Reflection.Assembly.Load(X)

Try
    O.Start()  
Catch ex As Exception
   MsgBox(ex.Message)
End Try
O.EntryPoint.Invoke(Nothing, Nothing)
Threading.Thread.Sleep(1000)

الخطأ هنا بيظهر في السطر الذي به الكود
O.Start()

[silverlight]

ممكن تبدأ من هنا

اللينك

[Dr.Virus]

اولا أشكرك علي ردك أخي SilverLight

لكن هذا ليس طلبي

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

[elgokr]

(23-03-14, 06:48 PM)Dr.Virus كتب :

السلام عليكم أخي انا يعني الحمد لله توصلت لكود بسيط لكن به خطأ فياريت تصحيح الخطا أخواني

كود :

Dim X() As Byte = File.ReadAllBytes("D:\1.EXE")
Dim O As Object = Reflection.Assembly.Load(X)

Try
   O.Start()  
Catch ex As Exception
  MsgBox(ex.Message)
End Try
O.EntryPoint.Invoke(Nothing, Nothing)
Threading.Thread.Sleep(1000)

الخطأ هنا بيظهر في السطر الذي به الكود
O.Start()

الخطاء الذى يظهر معك

هو ان الكود لم يرى ملف D:\1.EXE
فتاكد من مسار الملف فقط