ErrorLog(@ERROR,@SERROR)

Function ErrorLog($error,$serror)
	DIM	$LogFile, $fh, $i
	
	$LogFile 	= "\\server\SoftwarePushes\sms\logging\@MDayNo_@MonthNo_@Year.log", 
			  "\\server\SoftwarePushes\sms\logging\@MDayNo_@MonthNo_@Year-@WKSTA.log",
			  '.\@MDayNo_@MonthNo_@Year-@WKSTA.log'

	For $i = 0 To UBound($logfile)
		$fh = FreeFileHandle
		If Open($fh,$LogFile[$i],5) = 0
			$ = WriteLine($fh,"Error $error:  $serror, @WKSTA, @USERID, @DATE, @TIME, @CRLF")
			$i = UBound($logfile)
			$ = Close($fh)
		EndIf
	Next
EndFunction