‎02-25-2019 04:55 PM
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
‎11-26-2020 08:00 PM
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
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],
‎03-14-2019 05:18 PM
‎02-26-2019 10:18 AM
‎03-01-2019 09:53 AM
BES_IT wrote:
This also reports Microsoft Edge just without the version number which you didn't mention.
‎11-19-2020 03:50 PM
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.
Experience Lansweeper with your own data. Sign up now for a 14-day free trial.
Try Now