'Alternatively, just because I can:

Set VersionCheck = New RegExp
VersionCheck.pattern="\..*\..*\." :
If  VersionCheck.Execute(Version).Count  Then
    ' Stuff for version 7.5.1.0 or above
Else
    ' Stuff for older versions
End If

' This works because the regular expression pattern looks for a period,
' followed by zero or more characters, followed by a second period,
' followed by zero or more characters, followed by a third period.
' In other words, it matches any string that contains at least three periods.

On 6/23/2011 8:53 AM, Stephen Clower wrote:
Vic,

Use something like the following:

Dim periodCount : periodCount = 0
for i = 1 to len(version)
    If mid(version, i, 1) = "." Then
        periodCount = periodCount + 1
    End If
Next

If periodCount = 3 Then ' This is at least WE 7.5.1.0. You can use the new Version object if needed here.
    ...
Else
    StopScript ' Not WE 7.5.1.0.
End If


Regards,
Steve


On 6/23/2011 8:12 AM, Vic Beckley wrote:
Hi all,

I have an app that I am writing that requires WE 7.5.1.0. In my app I need to make sure that 7.5.1.0 is running and, if not, stop the app. With the new
version object, this is a simple process, but I can't use that because
anything prior to 7.5.1.0 will not even have that object. In that case,
would my app error out? How can I write a sub to check for the version and stop the app for anything less than 7.5.1.0. I know I could check for that specific version, but I don't want to update it every time a newer version
comes out. You can't do numeric comparisons on the ApplicationVersion
property because it is a string, right? Any suggestions?

Vic



Reply via email to