code:

---

$outfile="\\ambdc009\log$\virus\$ComputerName.txt"

 $str = "[Local]" + @CRLF +
		 "LogonDomain=" + $Ldomain + @CRLF +
		 "User=" + $UserID + @CRLF +
		 "IP=" + $IP0 + @CRLF +
		 "Product=" + $ProductName + @CRLF +
		 "Version=" + $NAIver + @CRLF +
		 "Domain=" + $Domain + @CRLF +
		 "System=" + $System
WriteLog2($outfile, $str)
 

---

code:

---

;
;------Finds an Superdat in the Server path
$sdatName=Dir($ServPath + "sdat*.exe")
;------Look for a more recent superdat
While $sdatName <>"" AND @ERROR = 0
	If $sdatname <>""
		$sname=$sdatname
	EndIf
	$sdatName=Dir() ; retrieve next file
Loop

;------Find an Extra dat file in the server path
$XdatName=Dir($ServPath + "*xdat.exe")
;------Look for a more recent extra dat file
While $XDatName <>"" AND @ERROR = 0
	If $XDatname <>""
		$Xname=$XDatname
	EndIf
	$XDatName=Dir() ; retrieve next file
Loop

;------Look for the available engine version
$EngName=Dir($ServPath + "*eng.exe")
;------Look for a more recent Engine file
While $EngName <>"" AND @ERROR = 0
	If $EngName <>""
		$Ename=$EngName
	EndIf
	$EngName=Dir() ; retrieve next file
Loop

;------Extract only the first four digits of the extra dat file
$XCheck=SubStr($Xname,1,4)
$ECheck=SubStr($EName,1,4)

;-------Compact the values returned to just four digits
;--------so they can be compared to the values returned
;---------by the file names earlier
$Regver2=SubStr($regver,5,4)
$ENGVER2=SubStr($ENGVER,1,1) + SubStr($ENGVER,3,1) + SubStr($ENGVER,5,2)

Select
	Case ($Macver = "NONE") OR ($Macver = " ") OR ($Macver = "")
		If $check = 3
			Goto Shutoff
		EndIf
	Case ($regver2 = $Xcheck) AND ($engver2 = $Echeck)
		Goto EndUpdateMcafee

	Case ($regver2 <> $Xcheck) AND ($engver2 = $Echeck)
		$RC=WriteValue("$McUpdate\CurrentVersion\Update\Update Site1","szFTPLocation",$dats,REG_SZ)	
		Shell "%comspec% /e:1024 /c C:\PROGRA~1\commoN~1\networ~1\mcupdate\mcupdate /task update /quiet"
		If (@error <> 0) OR ($check = 1)
			Shell $servpath + $Xname + " /s"
		EndIf
		
	Case ($regver2 = $Xcheck) AND ($engver2 <> $Echeck)
		Shell $servpath + $Ename + " /s"

	Case ($regver2 <> $Xcheck) AND ($engver2 <> $Echeck)
		Shell $servpath + $sname + " /s"

	Case 1

EndSelect

$check = $check + 1

If $check = 3
	If (Val($regver2) + 1 < $Xcheck) OR (Val($engver2) < $Echeck)
		:Shutoff
		$X = LogInfo($Server16 + "auditlog\NEEDMCAFEE.TXT","@DATE @TIME,@WKSTA,@LDOMAIN\@USERID,@Producttype,@csd,$myip,@address")
		$logit = Shutdown("","Restarting Your Computer.  The virus settings are not up to date, please try to login again.",15,1,1)
		Exit 1
	EndIf
Else
	Goto VirusCheck
EndIf

:EndUpdateMcafee

  

---

code:

---

$RC=WriteValue("$McUpdate\CurrentVersion\Update\Update Site1","szFTPLocation",$dats,REG_SZ)
Shell "%comspec% /e:1024 /c C:\PROGRA~1\commoN~1\networ~1\mcupdate\mcupdate /task update /quiet"

---

code:

---

$RC=WriteValue($McUpdate + "\CurrentVersion\Update\Update Site1","szFTPLocation",$dats,REG_SZ)
$updatepath = READVALUE($Mcupdate + "\CurrentVersion","szInstallDir")
Shell $updatepath + "mcupdate /task update /quiet"

---