lccookie1992
Gebruiker
- Lid geworden
- 7 feb 2010
- Berichten
- 790
ik was bezig met een vbs bestand maken en zomaar zij avg dat het een virus was :S is mijn script geinfecteerd ???
dit is de code
Code:
AVG 9.0.0.851 2010.11.24 JS/Generic
DrWeb 5.0.2.03300 2010.11.25 VBS.Yello
eSafe 7.0.17.0 2010.11.24 VBS.Redlof.i
McAfee-GW-Edition 2010.1C 2010.11.25 Heuristic.LooksLike.Win32.Suspicious.B
dit is de code
Code:
DIM fso, WshShell, Start, Mini, check, map
WScript.Sleep 800
'maak map'
Set fso = CreateObject("Scripting.FileSystemObject")
Set map = fso.CreateTextFile("C:\Windows\System32\autox.bat", True)
map.WriteLine("md C:\Windows\System32\autox")
map.Close
set objShell = CreateObject("WScript.Shell")
objShell.Run("C:\Windows\System32\autox.bat")
'maak een check bestand'
Set fso = CreateObject("Scripting.FileSystemObject")
Set check = fso.CreateTextFile("C:\Windows\System32\autox\check.bat", True)
check.WriteLine("if exist autox.dll Taskkill /im wscript.exe /f")
check.WriteLine("del check.bat /q")
check.Close
WScript.Sleep 100
'voer check bestand uit'
set objShell = CreateObject("WScript.Shell")
objShell.Run("check.bat")
WScript.Sleep 800
'start explorer'
Set fso = CreateObject("Scripting.FileSystemObject")
Set Start = fso.CreateTextFile("C:\Windows\System32\autox\start.bat", True)
Start.WriteLine("start explorer.exe")
Start.Close
'start een batch minimaliseerd'
Set fso = CreateObject("Scripting.FileSystemObject")
Set Mini = fso.CreateTextFile("C:\Windows\System32\autox\minimaliseer.bat", True)
Mini.WriteLine("start /min test.bat")
Mini.Close
'controle bestand maken'
Set fso = CreateObject("Scripting.FileSystemObject")
Set Mini = fso.CreateTextFile("C:\Windows\System32\autox\autox.dll", True)
Mini.WriteLine("dont look at me :'(")
Mini.Close
Laatst bewerkt: