BeyazEylem Posted August 31, 2008 Share Posted August 31, 2008 visual basic te Resource Editör ile hack.exe yi içine koydum CUSTOM 101 kodu söyle yaptım Private Sub Command1_Click() cikart Shell "hack.exe" End Sub Public Sub cikart() Dim resbytes() As Byte resbytes = LoadResData(101, "CUSTOM") Dim no As Byte no = FreeFile Open App.Path & "\hack.exe" For Binary As #no Put #no, , resbytes Close #no End End Sub cikartiyor ama açmıyor hemen formu kapatıyor neden olabilir? Link to comment Share on other sites More sharing options...
mustiback Posted September 1, 2008 Share Posted September 1, 2008 orada bi hata var en sonda end sub un üzerinde end yazmışsın onu sil öle bi dene Link to comment Share on other sites More sharing options...
Recommended Posts
Archived
This topic is now archived and is closed to further replies.