Break On
Dim $SO
$SO=SetOption('Explicit','On')
$SO=SetOption('NoVarsInStrings','On')
$SO=SetOption('NoMacrosInStrings','On')
 
DIM $LFile, $SFile, $LVersion, $SVersion, $Msg, $FFile
$LFile = "C:\Program Files\Citrix\pn.exe"
$LVersion = GetFileVersion($LFile,'BinFileVersion')
$SFile = "\\ctmstxp\ctx$\pn.exe"
$SVersion = GetFileVersion($SFile,'BinFileVersion')

If @ERROR
  'Error getting LOCAL file information: ' + @ERROR + ' - ' + @SERROR ?
EndIf
 
'Local file version is: ' + $LVersion ?
'Server file version is: ' + $SVersion ?
 
If $SVersion <> $LVersion
  OPEN (1, "\\ctmstxp\ctx$\ica.txt", 5)
	   WRITELINE (1, @USERID + " has old ica client version" + @CRLF)
	   Close(1)
	ENDIF	


  

WRITELINE (1, @USERID + " has old ica client version" + $LVersion + @CRLF)

Quote:

---

1.01.01" and "1.1.1" should be the same version

---