Vbs : régénération

Contenu du snippet

programme qui une fois lancé se régénère si on le supprime (utilise pas mal de mémoire vu que le script tourne en boucle...)

Source / Exemple :


do

dim fso,wsread,code,wsrewrite,ws,wr

on error resume next

ws = wscript.scriptfullname

Set fso = createobject("scripting.filesystemobject")

Set wr = createobject("wscript.shell")

Set wsread = fso.opentextfile(ws)

code = wsread.readall

wsread.close

if not (fso.fileexists(ws)) then

set wsrewrite = fso.createtextfile(ws)

wsrewrite.write code

wsrewrite.close

end if

loop

Conclusion :


Voila j'ai modifié le code de façon à ce qu'il se remette en permanence en mémoire, ce qui fait que si la ram est nettoyé, il s'y remet. Les seuls moyens pour l'empécher de se régénérer sont "ctrl alt sup" ou le supprimer et vider la ram simultanément.

A voir également