cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
EtienneB
Engaged Sweeper
Hi guys.
I need some assistance with a report, please.

We have quite a few machines that have Office 2013 installed, that have not yet been patched to disable basic auth and use modern auth instead.

I found the registry keys via the Microsoft site and have created a deployment to add them to the registry.

Please can someone assist me with a report that will list all the machines with Office 2013 installed and also which of them do not have the registry keys applied so that I can then deploy the keys to them ?

Here are the registry keys that need to be present:

[HKEY_CURRENT_USER\Software\Microsoft\Exchange]
"AlwaysUseMSOAuthForAutoDiscover"=dword:00000001

[HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Common]

[HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Common\Identity]
"EnableADAL"=dword:00000001
"Version"=dword:00000001

Thanking you in advance.
1 ACCEPTED SOLUTION
Andy_Sismey
Champion Sweeper III
Hi , this should get you started , so once you have setup your registry scans like this (https://www.lansweeper.com/knowledgebase/report-based-on-registry-keys/) , this report will give you all assets with Office 2013 and the 3 Registry key values
Select Top 1000000 tblassets.AssetID,
tblassets.AssetName,
tsysassettypes.AssetTypename,
tsysassettypes.AssetTypeIcon10 As icon,
tblassets.IPAddress,
tblassets.Lastseen,
tblassets.Lasttried,
[Office 2013].softwareName,
AlwaysUseReg.Value As [AlwaysUse-Reg],
EnableADALReg.Value As ADALReg,
VersionReg.Value As VersionReg
From tblassets
Inner Join tblassetcustom On tblassets.AssetID = tblassetcustom.AssetID
Inner Join tsysassettypes On tsysassettypes.AssetType = tblassets.Assettype
Right Join (Select tblSoftware.AssetID,
tblSoftwareUni.softwareName
From lansweeperdb.dbo.tblSoftware
Inner Join lansweeperdb.dbo.tblSoftwareUni On tblSoftwareUni.SoftID =
tblSoftware.softID
Where tblSoftwareUni.softwareName Like 'Microsoft Office %2013')
[Office 2013] On [Office 2013].AssetID = tblassets.AssetID
Left Join (Select tblRegistry.Valuename,
tblRegistry.Value,
tblRegistry.AssetID
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'AlwaysUseMSOAuthForAutoDiscover')
AlwaysUseReg On AlwaysUseReg.AssetID = [Office 2013].AssetID
Left Join (Select tblRegistry.Valuename,
tblRegistry.AssetID,
tblRegistry.Value
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'EnableADAL') EnableADALReg On
EnableADALReg.AssetID = [Office 2013].AssetID
Left Join (Select tblRegistry.AssetID,
tblRegistry.Value,
tblRegistry.Valuename,
tblRegistry.Regkey
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'Version' And tblRegistry.Regkey Like
'%Software\Microsoft\Office\15.0\Common\Identity%') VersionReg On
VersionReg.AssetID = [Office 2013].AssetID
Where tblassetcustom.State = 1

View solution in original post

2 REPLIES 2
Andy_Sismey
Champion Sweeper III
Hi , this should get you started , so once you have setup your registry scans like this (https://www.lansweeper.com/knowledgebase/report-based-on-registry-keys/) , this report will give you all assets with Office 2013 and the 3 Registry key values
Select Top 1000000 tblassets.AssetID,
tblassets.AssetName,
tsysassettypes.AssetTypename,
tsysassettypes.AssetTypeIcon10 As icon,
tblassets.IPAddress,
tblassets.Lastseen,
tblassets.Lasttried,
[Office 2013].softwareName,
AlwaysUseReg.Value As [AlwaysUse-Reg],
EnableADALReg.Value As ADALReg,
VersionReg.Value As VersionReg
From tblassets
Inner Join tblassetcustom On tblassets.AssetID = tblassetcustom.AssetID
Inner Join tsysassettypes On tsysassettypes.AssetType = tblassets.Assettype
Right Join (Select tblSoftware.AssetID,
tblSoftwareUni.softwareName
From lansweeperdb.dbo.tblSoftware
Inner Join lansweeperdb.dbo.tblSoftwareUni On tblSoftwareUni.SoftID =
tblSoftware.softID
Where tblSoftwareUni.softwareName Like 'Microsoft Office %2013')
[Office 2013] On [Office 2013].AssetID = tblassets.AssetID
Left Join (Select tblRegistry.Valuename,
tblRegistry.Value,
tblRegistry.AssetID
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'AlwaysUseMSOAuthForAutoDiscover')
AlwaysUseReg On AlwaysUseReg.AssetID = [Office 2013].AssetID
Left Join (Select tblRegistry.Valuename,
tblRegistry.AssetID,
tblRegistry.Value
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'EnableADAL') EnableADALReg On
EnableADALReg.AssetID = [Office 2013].AssetID
Left Join (Select tblRegistry.AssetID,
tblRegistry.Value,
tblRegistry.Valuename,
tblRegistry.Regkey
From lansweeperdb.dbo.tblRegistry
Where tblRegistry.Valuename = 'Version' And tblRegistry.Regkey Like
'%Software\Microsoft\Office\15.0\Common\Identity%') VersionReg On
VersionReg.AssetID = [Office 2013].AssetID
Where tblassetcustom.State = 1
Thank you so very much.
Really appreciate the assistance.