split or not split ?

[ab81]

Kann mir jemand bitte einen tipp geben, komme überhaupt nicht mehr weiter...funktioniert zwar alles aber,scheint mir etwas durcheinander,
das hier kann man doch bestimmt auch vereinfachen oder?

stub :

Open sPath For Binary As #1
        Seek #1, LOF(1) - 9: Get #1, , sSize
        Seek #1, LOF(1) - 9 - sSize
        bd = Space(sSize)
        Get #1, , bd

und hier im client :

Open App.Path & "\Output.exe" For Binary As #4
Put #4, , b
Put #4, , c.EncryptString(t)
sSize = Len(t)
Put #4, , sSize
Put #4, , 27
Close #4

bei beiden :

Dim sSize   As String * 8

und könnte mann hier die variable sSize weglassen ohne spliten zu müssen?
aber vorerst würde auch nur eine kleiner korrekturtipp reichen.
Vielen Dank schonmal

[Inj3ct]

ich empfehle dir nicht mit einem crypter anzufangen also net mim cryptosy sondern mit einem der vom aufbau etwas leichter is ^^ weil wenn du es verstehst findest du später den hier auch net verwirrend =)