کمک در مورد اجرای یک فایل اجرای در برنامه از داخل resource

[r0ot$harp]

سلام
بچه ها من می خوام یه فایل اجرایی رو از روی resource برنامه که به صورت CUSTOM درست کردم اجرا کنم ممنون می شم کمک کنید .

[CodeMasterX]

باید اطلاعات باینری فایل رو بصورت بایت بخونی و در فایلی ذخیره کنی و بعد بهش دسترسی داشته باشی.حالا چرا فایل اجرایی رو توی Resource قرار دادی ؟

[vb4you]

برای استفاده از فایلهای ریسورس میتونید اونهارو از توی برنامه به یه مسیر دور روی هارد

کپی کنید و بعد از استفاده نیز پاک کنید.

برای مثال اگه یه فایل exe توی رس تون هست که اسمش مثلا res.exe هست رو به اسم

1.exe روی هارد کپی کنید و بعد از استفاده نیز پاک کنید.و یا حتی در آخر اجراش کنید.

اوه اوه برای کارها بد (ویروس نویسی ).

Private Sub Command1_Click()
Dim file() As Byte
file = LoadResData(101, "CUSTOM")
Open "c:\1.exe" For Binary As #1
Put #1, 1, file()
Close #1
Shell "Explorer.exe c:\1.exe"
End Sub