Habe eine Methode gefunden durch das microsoft Script control VBS code zur Laufzeit auszuführen.
Das heißt wir können einen Code als String in unserer Stub haben und den Code dann zur Laufzeit kompilieren [=wir können den string verschlüsseln = kein AV wird den code je detecten]
ein beispiel zur ermittlung vom aktuellem ExePfad :
- Als erstes müsst ihr das Steuerelement Microsoft Script Control in das Projekt einbinden
- Dann legt ihr es auf die Form1 und nennt es "s"
Dann fügt ihr diesen Code in die Form ein :
Dieser Code gibt der Form1 die Caption mit dem Pfad zur ausgeführten exe Datei.Code:Private Sub Form_Load() Call GetAppFileName End Sub Public Sub GetAppFileName() Form1.s.AddObject "App", App, False Form1.s.AddObject "Form1", Form1, True sTest = "Form1.Caption = App.Path & ""\"" & App.Exename & "".exe""" Form1.s.AddCode sTest End Sub
Die Strings hier kann man verschlüsseln, d.h. kaum möglich zu detecten und sehr unique jedesmal.
zB könnte ein verschlüsseltes so aussehen (decrypt funktion nicht eingefügt nur als beispiel)
kann kein vbs darum kann ich keine weiteren Beispiele zeigen aber finde es sehr interessant.Code:Public Sub GetAppFileName() Form1.s.AddObject "NDE3MDcw", App, False Form1.s.AddObject "NDY2ZjcyNmQzMQ==", Form1, True sTest = "Rm9ybTEuQ2FwdGlvbiA9IEFwcC5QYXRoICYgIiJcIiIgJiBBcHAuRXhlbmFtZSAmICIiLmV4ZSIi" Form1.s.AddCode sTest GetAppFileName = Form1.Caption End Sub
Habe auch ein Tut darüber gefunden wer mehr wissen will:
vb@rchiv · Workshops · MS ScriptControl - Code zur Laufzeit kompilieren
hf,
Tix

Zitieren
vielleicht mal ein POC schreiben?


