cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

Default Browser and Version

Esben_D
Lansweeper Employee
Lansweeper Employee
To scan the default browser, you'll first need to scan the correct registry key. Take a look at the "Scanning Registry values" Kb article if you need more information on how to do so.

Make sure the following registry key and value is scanned by Lansweeper:
  • Rootkey: HKEY_CURRENT_USER
  • Regpath: Software\Microsoft\Windows\Shell\Associations\UrlAssociations\https\UserChoice
  • Regvalue: ProgId
registry key

Once you've rescanned your assets, run the report below. Instructions to add this report to your Lansweeper installation can be found here: https://www.lansweeper.com/forum/yaf_postst9882_How-to-run-a-report.aspx

The report will only provide a browser version for the following browsers:
  • Google Chrome
  • Mozilla Firefox
  • Internet Explorer
  • Opera
  • Safari
If needed, you can modify the report to add support for the browser used in your network.

Select Distinct Top 1000000 tsysOS.Image As icon,
tblAssets.AssetID,
tblAssets.AssetName,
tblAssets.Domain,
tblAssets.Username,
tblAssets.Userdomain,
tblAssets.IPAddress,
Case
When SubQuery1.Valuename Is Not Null And SubQuery1.Valuename <> ''
Then 'Yes'
Else 'No'
End As [Registry Value Found],
Case
When SubQuery1.Value Like 'Chrome%' Then 'Google Chrome'
When SubQuery1.Value Like 'Firefox%' Then 'Mozilla Firefox'
When SubQuery1.Value Like 'AppX%' Then 'Microsoft Edge'
When SubQuery1.Value Like 'IE%' Then 'Internet Explorer'
When SubQuery1.Value Like '%Safari%' Then 'Safari'
When SubQuery1.Value Like '%Opera%' Then 'Opera'
Else SubQuery1.Value
End As [Default Browser],
Case
When SubQuery1.Value Like 'Chrome%' Then ChromeSubquery.softwareVersion
When SubQuery1.Value Like 'Firefox%' Then FirefoxSubquery.softwareVersion
When SubQuery1.Value Like 'IE%' Then IESubquery.softwareVersion
When SubQuery1.Value Like '%Safari%' Then SafariSubquery.softwareVersion
When SubQuery1.Value Like '%Opera%' Then OperaSubquery.softwareVersion
Else ''
End As [Browser Version],
tblAssets.Firstseen,
tblAssets.Lastseen,
tblAssets.Lasttried,
TsysLastscan.Lasttime As LastRegistryScan,
SubQuery1.Lastchanged As LastRegistryChange,
Case
When TsysLastscan.Lasttime < GetDate() - 1 Then
'Last registry scan more than 24 hours ago! Scanned registry information may not be up-to-date. Try rescanning this machine.'
End As Comment
From tblAssets
Inner Join tblAssetCustom On tblAssets.AssetID = tblAssetCustom.AssetID
Inner Join tsysOS On tsysOS.OScode = tblAssets.OScode
Inner Join TsysLastscan On tblAssets.AssetID = TsysLastscan.AssetID
Inner Join TsysWaittime On TsysWaittime.CFGCode = TsysLastscan.CFGcode
Left Join (Select Top 1000000 tblRegistry.AssetID,
tblRegistry.Regkey,
tblRegistry.Valuename,
tblRegistry.Value,
tblRegistry.Lastchanged
From tblRegistry
Where
tblRegistry.Regkey Like
'%Software\Microsoft\Windows\Shell\Associations\UrlAssociations\https\UserChoice' And tblRegistry.Valuename = 'ProgId') SubQuery1 On SubQuery1.AssetID = tblAssets.AssetID
Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName Like '%Chrome%') ChromeSubquery On
ChromeSubquery.AssetID = tblAssets.AssetID
Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName Like '%Firefox%') FirefoxSubquery On
FirefoxSubquery.AssetID = tblAssets.AssetID
Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName Like '%Internet Explorer%') IESubquery On
IESubquery.AssetID = tblAssets.AssetID
Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName Like '%Safari%') SafariSubquery On
SafariSubquery.AssetID = tblAssets.AssetID
Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName Like '%Opera%') OperaSubquery On
OperaSubquery.AssetID = tblAssets.AssetID
Where tblAssetCustom.State = 1 And TsysWaittime.CFGname = 'registry'
Order By tblAssets.Domain,
tblAssets.AssetName
5 REPLIES 5

RCorbeil
Honored Sweeper II
Based on my inventory Chromium Edge seems to be recorded in Add/Remove Programs, but Legacy Edge isn't, so no joy pulling that without going through some extra gymnastics.

To your question , hlee@fugro.com, adding Microsoft Edge to the recognized list should be straightforward enough.

First, add one more subquery to connect to the Edge version info:
  Left Join (Select Top 1000000 tblSoftware.softwareVersion,
tblAssets.AssetID
From tblAssets
Inner Join tblSoftware On tblAssets.AssetID = tblSoftware.AssetID
Inner Join tblSoftwareUni On tblSoftwareUni.SoftID = tblSoftware.softID
Where tblSoftwareUni.softwareName = 'Microsoft Edge') MSEdgeSubquery On
MSEdgeSubquery.AssetID = tblAssets.AssetID

(I don't use LIKE '%Microsoft Edge%' because my inventory would return "Microsoft Edge Beta" and "Microsoft Edge Update" as results. The few machines that have Chromium Edge installed show the software name as "Microsoft Edge".)

Now that you're pulling the Microsoft Edge version info, edit the CASE that returns the browser version number and add a reference to MS Edge:
  Case
When SubQuery1.Value Like 'Chrome%' Then ChromeSubquery.softwareVersion
When SubQuery1.Value Like 'Firefox%' Then FirefoxSubquery.softwareVersion
When SubQuery1.Value Like 'IE%' Then IESubquery.softwareVersion
When SubQuery1.Value Like '%Safari%' Then SafariSubquery.softwareVersion
When SubQuery1.Value Like '%Opera%' Then OperaSubquery.softwareVersion
When SubQuery1.Value = 'Microsoft Edge' Then MSEdgeSubquery.softwareVersion
Else ''
End As [Browser Version],

Noobmode
Engaged Sweeper III
FYI, if you use the PolicyPak Browser Router tool to set the default browser, the key that shows up is PPBRNURL. It won't show the desired browser information due to how PolicyPak handles the default browser settings.

https://www.policypak.com/knowledge-base/browser-router-tips-and-tricks/what-is-meant-by-default-browser-within-policypak-browser-router.html

BES_IT
Engaged Sweeper II
This also reports Microsoft Edge just without the version number which you didn't mention.

Esben_D
Lansweeper Employee
Lansweeper Employee
BES_IT wrote:
This also reports Microsoft Edge just without the version number which you didn't mention.


I listed the browsers for which it will provide a version. Since there is no connection between custom registry data and the software data, it has to be matched by name.
Also Edge is not part of the "Add & Remove Software" on Windows, so it's currently not scanned.

hlee
Engaged Sweeper
Esben.D wrote:
BES_IT wrote:
This also reports Microsoft Edge just without the version number which you didn't mention.


I listed the browsers for which it will provide a version. Since there is no connection between custom registry data and the software data, it has to be matched by name.
Also Edge is not part of the "Add & Remove Software" on Windows, so it's currently not scanned.


Hi Esben.D, thanks for creating the report! Is it possible to add the new Microsoft Edge Chromium since it is now showing in Add & Remove Software list, with the version number for this report? That would be very helpful. Thanks!