VB"De Gömülü Dosyayı Çıkartma
-
Herkese merhaba.
vb'ye yeni başladım ve küçük bir trojan yazmaya çalışıyorum.winsock kullanıyorum.ancak proje.exe'nin yanında mswinsck.ocx olmadan çalışmıyor.
server'ın içine gömdüm dosyayı fakat exe çalıştığında önce bu gömülü dosyayı çıkarıp sonra formu yüklemem lazım.
Çünkü ocx olmadığı için form yüklenirken gerekli olan winsock nesnesi yüklenemiyor.bu durumda hata veriyor.Form yüklenmeden önce bu dosyayı çıkartabileceğim bir yöntem varmıdır?
-
Private Sub Form_Initialize()
Dim resbytes() As Byte
resbytes = LoadResData(101, "CUSTOM")
no = FreeFile
Open App.Path & "\mswinsck.ocx" For Binary As #no
Put #no, , resbytes
Close #noEnd Sub
bu tam istediğim gibi çalıştı.lazım olan olur belki
Toplam Hit: 2622 Toplam Mesaj: 2
