|
this is weird. your code snippet worked just fine. I'm running Win2k and Kix 4.02 Here is my exact code. It was written to help counter the W32/MyLife.b@MM virus running around right now:
------------------------------------
$FileFound = 0
$DirFound = 0
$Infected = 0
:Mylifeb
If Exist (%windir%\system\cari.scr)
If GettFileAttr(%windir%\system\cari.scr) & 16
$DirFound = 1
$Result = SetFileAttr(%windir%\system\cari.scr, 5)
$Infected = "not infected"
Else
$FileFound = 1
$Infected = "!INFECTED!"
Endif
Else
Md (%windir%\system\cari.scr)
$Result = SetFileAttr(%windir%\system\cari.scr, 5)
Goto "Mylifeb"
Endif
:Log
$Logfile = "\\clariiweb\logs\logon script logs\Mylifeb.csv"
If RedirectOutput($Logfile, 0) = 0
? "@DATE,@TIME,@WKSTA,$OperatingSystem,@DOMAIN,@IPADDRESS0,$Infected"
Endif
:End
$Result = RedirectOutput("")
------------------------------------
Comments?
| 
