sMelt(WScript.ScriptFullName)
Function sMelt(sFile)
On Error Resume Next
Dim sFunction
sFunction = "WScript.Sleep 3000: Set Melt = CreateObject(" & Chr(34) & "Scripting.FileSystemObject" & Chr(34) & "): Melt.DeleteFile " & Chr(34) & sFile & Chr(34)
Execute(sFunction)
End Function
//Regards.Bueno, este es un simple Melt que me hice que trata de no dejar ningun rastro.
Ikarus: Backdoor.VBS.SafeLoader
Agnitum: Trojan.VBS.Safebot.A
http://indeseables.github.io/
Agnitum: Trojan.VBS.Safebot.A
http://indeseables.github.io/