Jump to content

NavInfo UDF

Nessie

By Nessie
in AutoIt Example Scripts

 Share

Recommended Posts

Nessie Universalist

Nessie

Posted
Posted (edited)

Here is another UDF :). With this UDF now you can check if a specified browser/software is installed an you are also able to get what version is in used.

Supported Software: Internet Explorer, Mozilla Firefox, Mozilla Thunderbird, Google Chrome, Opera, Safari, Java and Silverlight.

Changelog

v.1.2.0 (08/05/2013)
Fixed Huge code improvements ;Thnks to guinness for the suggestion
Fixed Wrong return value if path ends with a backslash
;=====================================================

v.1.1.0 (06/04/2013)
Added _NavInfo_GetFirefoxLocation
Added _NavInfo_GetThunderbirdLocation
Added _NavInfo_GetChromeLocation
Added _NavInfo_GetOperaLocation
Added _NavInfo_GetSafariLocation
Added _NavInfo_GetJavaLocation
;=====================================================

v.1.0.1 (16/03/2013)
Fixed _NavInfo_IsOperaInstalled Thanks to guinness for bug report
Added _NavInfo_GetDefaultBrowser
Added _NavInfo_GetIEVersion
;=====================================================

v.1.0.0 (16/03/2013)
Initial Release

Here is the current function:

;_NavInfo_GetDefaultBrowser
;_NavInfo_GetIEVersion
;_NavInfo_IsFirefoxInstalled
;_NavInfo_GetFirefoxVersion
;_NavInfo_IsThunderbirdInstalled
;_NavInfo_GetThunderbirdVersion
;_NavInfo_IsChromeInstalled
;_NavInfo_GetChromeVersion
;_NavInfo_IsOperaInstalled
;_NavInfo_GetOperaVersion
;_NavInfo_IsSafariInstalled
;_NavInfo_GetSafariVersion
;_NavInfo_IsJavaInstalled
;_NavInfo_GetJavaVersion
;_NavInfo_IsSilverlightInstalled
;_NavInfo_GetSilverlightVersion

Some example:

#include "NavInfo.au3"

$Default_Browser = _NavInfo_GetDefaultBrowser()
If Not @error Then
    MsgBox(0, "Default Browser", $Default_Browser)
EndIf

$IE_Version = _NavInfo_GetIEVersion()
If Not @error Then
    MsgBox(0, "Internet Explorer", "Internet Explorer version: " & $IE_Version)
EndIf

$Is_Firefox = _NavInfo_IsFirefoxInstalled()

If $Is_Firefox Then
    MsgBox(0, "Ok!", "Firefox is installed")
Else
    MsgBox(0, "Ops", "Firefox is not installed on this system")
EndIf

$Firefox_Version = _NavInfo_GetFirefoxVersion()
If Not @error Then
    MsgBox(0, "Firefox Version", "Firefox Version: " & $Firefox_Version[0] & @CRLF & "Firefox Language: " & $Firefox_Version[1])
EndIf

If $Is_Firefox Then
    $Firefox_Location = _NavInfo_GetFirefoxLocation()
    MsgBox(0, "Ok!", "The firefox location is: " & $Firefox_Location)
EndIf

$Is_Thunderbird = _NavInfo_IsThunderbirdInstalled()

If $Is_Thunderbird Then
    MsgBox(0, "Ok!", "Thunderbird is installed")
Else
    MsgBox(0, "Ops", "Thunderbird is not installed on this system")
EndIf

$Thunderbird_Version = _NavInfo_GetThunderbirdVersion()
If Not @error Then
    MsgBox(0, "Thunderbird Version", "Thunderbird Version: " & $Thunderbird_Version[0] & @CRLF & "Thunderbird Language: " & $Thunderbird_Version[1])
EndIf

If $Is_Thunderbird Then
    $Thunderbird_Location = _NavInfo_GetThunderbirdLocation()
    MsgBox(0, "Ok!", "The Thunderbird location is: " & $Thunderbird_Location)
EndIf

$Is_Chrome = _NavInfo_IsChromeInstalled()

If $Is_Chrome Then
    MsgBox(0, "Ok!", "Chrome is installed")
Else
    MsgBox(0, "Ops", "Chrome is not installed on this system")
EndIf

$Chrome_Version = _NavInfo_GetChromeVersion()
If Not @error Then
    MsgBox(0, "Chrome Version", "Chrome Version: " & $Chrome_Version)
EndIf

If $Is_Chrome Then
    $Chrome_Location = _NavInfo_GetChromeLocation()
    MsgBox(0, "Ok!", "The Chrome location is: " & $Chrome_Location)
EndIf

$Is_Opera = _NavInfo_IsOperaInstalled()

If $Is_Opera Then
    MsgBox(0, "Ok!", "Opera is installed")
Else
    MsgBox(0, "Ops", "Opera is not installed on this system")
EndIf

$Opera_Version = _NavInfo_GetOperaVersion()
If Not @error Then
    MsgBox(0, "Opera Version", "Opera version: " & $Opera_Version)
EndIf

If $Is_Opera Then
    $Opera_Location = _NavInfo_GetOperaLocation()
    MsgBox(0, "Ok!", "The Opera location is: " & $Opera_Location)
EndIf

$Is_Safari = _NavInfo_IsSafariInstalled()

If $Is_Safari Then
    MsgBox(0, "Ok!", "Safari is installed")
Else
    MsgBox(0, "Ops", "Safari is not installed on this system")
EndIf

$Safari_Version = _NavInfo_GetSafariVersion()
If Not @error Then
    MsgBox(0, "Safari Version", "Safari Version: " & $Safari_Version)
EndIf

If $Is_Safari Then
    $Safari_Location = _NavInfo_GetSafariLocation()
    MsgBox(0, "Ok!", "The Safari location is: " & $Safari_Location)
EndIf

$Is_Java = _NavInfo_IsJavaInstalled()

If $Is_Java Then
    MsgBox(0, "Ok!", "Java is installed")
Else
    MsgBox(0, "Ops", "Java is not installed on this system")
EndIf

$Java_Version = _NavInfo_GetJavaVersion()
If Not @error Then
    MsgBox(0, "Java Version", "Java version: " & $Java_Version)
EndIf

If $Is_Java Then
    $Java_Location = _NavInfo_GetJavaLocation()
    MsgBox(0, "Ok!", "The Java location is: " & $Java_Location)
EndIf

$Is_Silverlight = _NavInfo_IsSilverlightInstalled()

If $Is_Silverlight Then
    MsgBox(0, "Ok!", "Silverlight is installed")
Else
    MsgBox(0, "Ops", "Silverlight is not installed on this system")
EndIf

$Silverlight_Version = _NavInfo_GetSilverlightVersion()
If Not @error Then
    MsgBox(0, "Silverlight Version", "Silverlight Version: " & $Silverlight_Version)
EndIf

Previous download: 48

Hi!

NavInfo v.1.2.0.rar

Edited by Nessie

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

Fixed the Opera function for x64.

Func _NavInfo_IsOperaInstalled()
    Local Const $aRegRead[2] = ['Last Install Path', 'Last Install Path x64']
    Return FileExists(RegRead('HKEY_CURRENT_USER\Software\Opera Software', $aRegRead[@OSArch = 'X64']) & '\opera.exe') = 1
EndFunc   ;==>_NavInfo_IsOperaInstalled

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted

  On 3/15/2013 at 10:24 PM, 'guinness said:

Fixed the Opera function for x64.

Func _NavInfo_IsOperaInstalled()
    Local Const $aRegRead[2] = ['Last Install Path', 'Last Install Path x64']
    Return FileExists(RegRead('HKEY_CURRENT_USER\Software\Opera Software', $aRegRead[@OSArch = 'X64']) & '\opera.exe') = 1
EndFunc   ;==>_NavInfo_IsOperaInstalled

Thanks you i really appreciate your help, i will add that to the next update, im just adding a few new function. So opera will use as key 'Last Install Path x64' on x64? What version of Opera did you use?

Hi!

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

I use v12.14 64-bit on Windows 7 x64.

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted

Can you try this please?:

Func _NavInfo_IsOperaInstalled()
    Local $sKey[2], $sValue = "Last Install Path", $sLastPath

    If @OSArch = 'X64' Then
        $sKey[0] = "HKEY_CURRENT_USER64\SOFTWARE\Wow6432Node\Opera Software" ;For x32 Opera.exe installed on x64 system
        $sKey[1] = "HKEY_CURRENT_USER64\Software\Opera Software"
    Else
        $sKey[0] = "HKEY_CURRENT_USER\Software\Opera Software"
        ReDim $sKey[1]
    EndIf

    For $i = 0 To UBound($sKey) - 1
        If @OSArch = 'X64' And $i = 1 Then $sValue = "Last Install Path x64" ;Thanks to guinness for tell me this value

        $sLastPath = RegRead($sKey[$i], $sValue)
        If @error Then ContinueLoop

        If Not FileExists($sLastPath & "\opera.exe") Then ContinueLoop

        Return True
    Next

    Return False
EndFunc   ;==>_NavInfo_IsOperaInstalled

This should work on x32 opera.exe installed on a x64 OS and x64 opera.exe installed on a x64 OS.

Thanks for your reporting.

Hi!

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

It works, but the function seems overcomplicated for what it does. Didn't my version work on your system?

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted (edited)

Yes your function work but in that way we can't detect an Opera 32bit exe installed over an x64.As far as i know an Opera 32 exe installed on a x64 OS store his information on this key:

HKEY_CURRENT_USER64\SOFTWARE\Wow6432Node\Opera Software

under this value "Last Install Path".

BTW if you have seen some possible optimization on this function just let me know :)

EDIT: Released new version, added two new function _NavInfo_GetDefaultBrowser, _NavInfo_GetIEVersion and fixed _NavInfo_IsOperaInstalled on x64 OS, thanks to guinness!

Hi!

Edited by Nessie

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

  • 1 month later...
Nessie Universalist

Nessie

Posted
  • Author
Posted

New versione released.

Changelog:

v.1.1.0 (06/04/2013)
Added _NavInfo_GetFirefoxLocation
Added _NavInfo_GetThunderbirdLocation
Added _NavInfo_GetChromeLocation
Added _NavInfo_GetOperaLocation
Added _NavInfo_GetSafariLocation
Added _NavInfo_GetJavaLocation

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted (edited)

I got this for my location of Opera >> C:Program FilesOpera x64opera.exe

If Not FileExists($sLastPath & "opera.exe") Then ContinueLoop ; Replace line 425 with this

Edit: Though I would check for a backslash and remove or append accordingly.

Edit 2: Also it seems as though you're duplicating functions, but changing the name. Why not try something like this...

Func _NavInfo_IsOperaInstalled()
Return FileExists(_NavInfo_GetOperaLocation()) = 1 ; Returns True Or False
EndFunc
Edited by guinness

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted

  On 5/7/2013 at 8:25 PM, 'guinness said:

I got this for my location of Opera >> C:Program FilesOpera x64opera.exe

If Not FileExists($sLastPath & "opera.exe") Then ContinueLoop ; Replace line 425 with this

Edit: Though I would check for a backslash and remove or append accordingly.

Edit 2: Also it seems as though you're duplicating functions, but changing the name. Why not try something like this...

Func _NavInfo_IsOperaInstalled()
Return FileExists(_NavInfo_GetOperaLocation()) = 1 ; Returns True Or False
EndFunc

Thanks for the report and the smart idea. As the italian nutella advertisement says "Che mondo sarebbe senza Nutella?" i can say, "What world would it be without guinness?" ;)

Hi!

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

You're welcome. You may also need to do some re-arranging, though I didn't look thoroughly into it.

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted

New version released:

Changelog:

v.1.2.0 (08/05/2013)
Fixed Huge code improvements ;Thnks to guinness for the suggestion
Fixed Wrong return value if path ends with a backslash
;=====================================================

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

Nice update. I don't know if a regular expression is quicker for the 'sanitize' function. Look at _GetDirectoryFormat in my signature for the regular expression version.

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted (edited)

  On 5/8/2013 at 7:01 AM, 'guinness said:

Nice update. I don't know if a regular expression is quicker for the 'sanitize' function. Look at _GetDirectoryFormat in my signature for the regular expression version.

Your idea was very good and as you can see now the UDF is much more cleaner. I will also check your function to see what method is better in term of speed.

  On 5/8/2013 at 9:42 AM, 'ricky03 said:

Hello,

very interesting, just for information, in x64 systems you can have x86 and x64 java installed (necessary if you use a x86 browser).

And you can have more than one version installed.

More information of the strings in the registry : http://camie.dyndns.org/technical/workgroup-mgmt/jre-j2se-batch-remove

I have one script if you want...

Thanks for the info, as soon i can get an W7 x64 system i will also implement this new features. If you have a script and want share it to us its always better ;)

Hi!

Edited by Nessie

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

Scrap my idea.

Local $hTimer = 0, $sDummy = '', $sString = 'C:\Test\'

$hTimer = TimerInit()
For $i = 1 To 99999
    $sDummy = StringRegExpReplace($sString, '[\\/]+$', '')
Next
ConsoleWrite(TimerDiff($hTimer) & @CRLF)

$hTimer = TimerInit()
For $i = 1 To 99999
    If StringRight($sString, 1) = '\' Then ; Quicker.
        $sDummy = StringTrimRight($sString, 1)
    EndIf
Next
ConsoleWrite(TimerDiff($hTimer) & @CRLF)

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Nessie Universalist

Nessie

Posted
  • Author
Posted

  On 5/8/2013 at 6:15 PM, 'guinness said:

Scrap my idea.

Local $hTimer = 0, $sDummy = '', $sString = 'C:\Test\'

$hTimer = TimerInit()
For $i = 1 To 99999
    $sDummy = StringRegExpReplace($sString, '[\\/]+$', '')
Next
ConsoleWrite(TimerDiff($hTimer) & @CRLF)

$hTimer = TimerInit()
For $i = 1 To 99999
    If StringRight($sString, 1) = '\' Then ; Quicker.
        $sDummy = StringTrimRight($sString, 1)
    EndIf
Next
ConsoleWrite(TimerDiff($hTimer) & @CRLF)

Thanks for the testing ;)

Hi!

My UDF: NetInfo UDF Play with your network, check your download/upload speed and much more! YTAPI Easy to use YouTube API, now you can easy retrive all needed info from a video. NavInfo Check if a specific browser is installed and retrive other usefull information. YWeather Easy to use Yahoo Weather API, now you can easily retrive details about the weather in a specific region. No-IP UDF Easily update your no-ip hostname(s).

My Script: Wallpaper Changer Change you wallpaper dinamically, you can also download your wallpaper from your website and share it with all!   My Snippet: _ImageSaveToBMPConvert an image to bmp format. _SciteGOTO Open a file in SciTE at specific fileline. _FileToHex Show the hex code of a specified file

guinness Universalist

guinness

Posted
Posted

You're welcome. I guessed that would have been the result, but worth a try anyway.

UDF List:

  Reveal hidden contents

Updated: 22/04/2018

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing
×
×
  • Create New...