Version Check bug... or is it me.

[dcjohnston]

OK simply put, I take the version number of an application from the user and compare it to the existing version of an exe called platform.exe file on a server.

Here is some of the code:

$version = InputBox(" upgrade version", "Enter version number", "")

$ver = FileGetVersion("f:\pltrsm\platform.exe")

If $ver = (" & $version & ") Then

MsgBox(0, "Platform", "Upgrade is completed")

MsgBox(0, "Current Version:", $Ver)

elseIf $ver <> (" & $version & ") Then

MsgBox(0, "Platform", "Not upgraded")

MsgBox(0, "Current Version:", $Ver)

EndIf

I setup message boxes and both "$ver" and "$version" show as 11.0.0.0

However the code always goes to the elseif. I know they are identical.

Is this me?

Edited September 14, 2004 by dcjohnston

[ezzetabi]

Try

$version = InputBox(" upgrade version", "Enter version number", "")

$ver = FileGetVersion("f:\pltrsm\platform.exe")
If $ver = $version Then 
   MsgBox(0, "Platform", "Upgrade is completed" & @lf & @lf & _
   "Current Version:", $Ver)

elseIf $ver <> $version Then 
   MsgBox(0, "Platform", "Not upgraded" & @lf & @lf & _
   "Current Version:", $Ver)
EndIf

MsgBox(0,'',$ver & ' --VS-- ' & $version);## DEBUG msgbox

Edited September 14, 2004 by ezzetabi

[dcjohnston]

Perfecto,

Thanks for helping out us newbies my friend.

Take care

Dave