📜 VBScript (WSH)
Check "Disable Tailored Experiences" Status (VBScript)
Reads the registry value behind the "Disable Tailored Experiences" tweak to confirm whether it's applied.
CheckDisableTailoredExperiencesStatus.vbs
' ============================================================
' CheckDisableTailoredExperiencesStatus.vbs
'
' Checks whether "Disable Tailored Experiences" is currently applied.
'
' Usage: cscript CheckDisableTailoredExperiencesStatus.vbs
' ============================================================
Option Explicit
Dim objShell, currentValue
Set objShell = CreateObject("WScript.Shell")
On Error Resume Next
currentValue = objShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Privacy\TailoredExperiencesWithDiagnosticDataEnabled")
If Err.Number <> 0 Then
WScript.Echo "'TailoredExperiencesWithDiagnosticDataEnabled' is not set (using the Windows default)."
Else
WScript.Echo "Current value of 'TailoredExperiencesWithDiagnosticDataEnabled': " & currentValue
End If
On Error Goto 0