Voici un petit script je fouetté pour vous qui obscurcir tout fichier vbs
....
L'obscurcissement est assez simple, si quiconque est familier avec vbs
peut prolly de-obscurcir en 1 min.
Si vous voulez plus haut niveau d'obfuscation, bien vous devez me payer ... :) mais pour cela, je vais prendre vos votes! : D
Le script obfuscated.vbs
résultant restera un fichier vbs
valide.
J'aurais pu faire un vbs auto-décryptage, mais il y a de fortes chances que cela provoque un drapeau rouge avec un antivirus ... et si votre anti-virus est bon, il devrait le signaler comme suspect.
S'il vous plaît noter, Avertissement standard s'applique ... Je ne suis pas responsable des dommages qui peuvent survenir en raison du script, l'utilisation à vos risques et périls. Je ne garantis pas que ça va marcher tout le temps
'VBS Obfuscator by st0le
Randomize
set fso = CreateObject("Scripting.FileSystemObject")
fileName = Inputbox("Enter Path of the File to scramble : ")
set src = fso.OpenTextfile(fileName,1)
body = src.readall
set rep = fso.createtextfile("Obfuscated.vbs",true)
rep.writeline "Execute(" & Obfuscate(body) & ") "
Function Obfuscate(txt)
enc = ""
for i = 1 to len(txt)
enc = enc & "chr(" & form(asc(mid(txt,i,1))) & ") & "
next
Obfuscate = enc & " vbcrlf "
End Function
Function form(n)
r = int(rnd * 10000)
k = int(rnd * 3)
if(k = 0) then ret = (r+n) & "-" & r
if(k = 1) then ret = (n-r) & "+" & r
if(k = 2) then ret = (n*r) & "/" & r
form = ret
End Function
Pouvez-vous passer à JScript? – SLaks
[VBShaker] (http://da440dil.narod.ru/vbshaker.html) - obfuscation de code VBScript –