Windows Taskbar Autıo Hide Scripts

Option Explicit
Const HKCU = &H80000001

Dim objReg
Set objReg = GetObject(“winmgmts:{impersonationLevel=impersonate}root\default:StdRegProv”)
Dim objWMI
Set objWMI = GetObject(“winmgmts:{impersonationLevel=impersonate}root\cimv2”)

‘ Adjust the first bit of the taskbar settings
Dim arrVal()
objReg.GetBinaryValue HKCU, “Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2”, “Settings”, arrVal
arrVal(8) = (arrVal(8) AND &h07) OR &h01
objReg.SetBinaryValue HKCU, “Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2”, “Settings”, arrVal
‘ Restart Explorer for the settings to take effect.
Dim objProcess, colProcesses
Set colProcesses = objWMI.ExecQuery(“Select * from Win32_Process Where Name=’explorer.exe'”)
For Each objProcess In colProcesses
objProcess.Terminate()
Next
As for the keys to change on registry…

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\
Explorer\StuckRects2
Value Name: Settings
Value Type: REG_BINARY
Value Data: (Mine)
hex:28,00,00,00,ff,ff,ff,ff,02,00,00,00,03,00,00,00,6b,00,00,00,1e,\
00,00,00,fe,ff,ff,ff,e4,02,00,00,02,04,00,00,02,03,00,00

SINGLE OPTIONS:
08 = No Settings Enabled
09 = Auto Hide
00 = Show Clock
0A = Always on Top
0C = Show small icons in Start Menu

MULTIPLE OPTIONS:
01 = Auto Hide and Show Clock
02 = Always on Top and Show Clock
03 = Always on Top and Auto Hide and Show Clock
04 = Show small icons in Start Menu and Show Clock
0E = Always on Top and Show small icons in Start Menu
0F = Always on Top and Auto Hide and Show small icons in Start Menu
06 = Always on Top and Show small icons in Start Menu and Show Clock
07 = All Options Enabled
0B = Always on Top and Auto Hide
0D = Auto Hide and Show small icons in Start Menu

The value you want to change is the 9th binary value. To test it, you don’t need to restart or logout, just ctrl+alt+del, kill explorer and start it up again.

Add a Comment

Your email address will not be published. Required fields are marked *