Using installed version number as a variable

Question

I'm trying to retrieve the version number of various installed applications and then perform an action if they are lower than a certain value. For example:

Dim regKey As RegistryKey
        Dim ver As ???????
        regKey = Registry.LocalMachine.OpenSubKey("Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Adobe Flash Player ActiveX")
        ver = regKey.GetValue("DisplayVersion")
                MessageBox.Show(ver)
            If ver < 11.4.402.287 Then
            'Install updated version of software in question
        End If
        regKey.Close()

How could I define Ver to be able to easily do a greater/less than check? I've tried:

Dim ver as integer
Dim ver as decimal

Both of these return "Additional information: Conversion from string "11.4.402.287" to type 'Decimal' is not valid."

You'll probably need to parse the string into the major/minor/build portions and make your determination based on that (most likely only the first two number - major and minor versions - will be of interest. In the example above, 11 would be the major version number and 4 the minor.) — Tim
– Tim, Commented Oct 24, 2012 at 21:27

U1199880 · Accepted Answer · 2012-10-24 21:34:23Z

1

Simple Parse and check assuming you are looking at first two components:

Dim va = Ver.split("."c)
If va(0) < 11 OrElse (va(0) = 11) and va(1) < 4) Then 
    'Install updated ....
End If

answered Oct 24, 2012 at 21:34

U1199880

9051 gold badge10 silver badges21 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

JDB Over a year ago

This definitely looks like the simplest approach. :)

JDB · Accepted Answer · 2012-10-24 21:35:55Z

0

A regex for this might look something like:

(?<major>\d+)(\.(?<minor>\d+)(\.(?<revision>\d+)(\.(?<build>\d+))?)?)?

You could then extract the version numbers using groups:

Dim l_version As Regex = New Regex("(?<major>\d+)(\.(?<minor>\d+)(\.(?<revision>\d+)(\.(?<build>\d+))?)?)?")
Dim l_versionMatch As Match = l_version.Match( "1.2.3" )

Dim l_major As String = l_versionMatch.Groups("major").Value

answered Oct 24, 2012 at 21:35

JDB

26.1k5 gold badges81 silver badges132 bronze badges

Collectives™ on Stack Overflow

Using installed version number as a variable

2 Answers 2

1 Comment

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

1 Comment

Comments

Your Answer

Sign up or log in

Post as a guest

Related