Note that there are some explanatory texts on larger screens.

plurals
  1. PO
    primarykey
    data
    text
    <p>Here's a Little script i whipped up for you that will obfuscate any <code>vbs</code> file....</p> <p>The obfuscation is pretty simple, so anyone familiar with <code>vbs</code> can prolly de-obfuscate it in 1 min.</p> <p>If you want higher level of obfuscation, well you need to pay me... :) but for this i'll take your votes! :D</p> <p>The resulting script <code>obfuscated.vbs</code> will remain a valid <code>vbs</code> file.</p> <p>I could've made a self decrypting vbs, but chances are that will cause a red-flag with an antivirus...and if your anti-virus is any good, it should flag this as suspicious.</p> <p>Please note, <em>Standard disclaimer applies...I'm not responsible for any damage that maybe occur due to the script, use at own risk. I don't guarantee it'll work all the time</em></p> <pre><code>'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(" &amp; Obfuscate(body) &amp; " ) " Function Obfuscate(txt) enc = "" for i = 1 to len(txt) enc = enc &amp; "chr( " &amp; form( asc(mid(txt,i,1)) ) &amp; " ) &amp; " next Obfuscate = enc &amp; " vbcrlf " End Function Function form(n) r = int(rnd * 10000) k = int(rnd * 3) if( k = 0) then ret = (r+n) &amp; "-" &amp; r if( k = 1) then ret = (n-r) &amp; "+" &amp; r if( k = 2) then ret = (n*r) &amp; "/" &amp; r form = ret End Function </code></pre>
    singulars
    1. This table or related slice is empty.
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. VO
      singulars
      1. This table or related slice is empty.
    2. VO
      singulars
      1. This table or related slice is empty.
    3. VO
      singulars
      1. This table or related slice is empty.
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload