📜 VBScript (WSH)

Check "Disable Window Animations" Status (VBScript)

Reads the registry value behind the "Disable Window Animations" tweak to confirm whether it's applied.

By WindowsScripting.com · 671 B
CheckDisableAnimationsStatus.vbs
' ============================================================
' CheckDisableAnimationsStatus.vbs
'
' Checks whether "Disable Window Animations" is currently applied.
'
' Usage: cscript CheckDisableAnimationsStatus.vbs
' ============================================================

Option Explicit

Dim objShell, currentValue
Set objShell = CreateObject("WScript.Shell")

On Error Resume Next
currentValue = objShell.RegRead("HKCU\Control Panel\Desktop\WindowMetrics\MinAnimate")

If Err.Number <> 0 Then
    WScript.Echo "'MinAnimate' is not set (using the Windows default)."
Else
    WScript.Echo "Current value of 'MinAnimate': " & currentValue
End If
On Error Goto 0