Toggle Add/Remove Programs (W2K)

Author: fade8 (talk, contrib)

Description

Tested with Windows 2000 as a restricted user. Toggles Add/Remove programs on the fly.

The Script

; Toggle Add/Remove Programs for Windows 2000, XP and Win98
; Example by fade8,  laibr@wyeth.com
 
Name "AddRemoveTest"
OutFile "ToggleAddRemove.exe"
SetFont "Verdana" 9
SilentInstall Silent
 
BrandingText /TRIMCENTER "Toggle Add/Remove Programs"
Caption "Toggle Add/Remove Programs"
 
FileErrorText "Something unexpected happened.\nCan not read-write the file
$\r$\n$0$\r$\n"
AutoCloseWindow True
 
 Function .onInit
;  Call isAdmin
 FunctionEnd
 
Section "Install" 
 
ReadRegDWORD $0 HKCU
Software\Microsoft\Windows\CurrentVersion\Policies\Uninstall
"NoAddRemovePrograms"
 
StrCmp $0 0 0 +4
WriteRegDWORD HKCU
Software\Microsoft\Windows\CurrentVersion\Policies\Uninstall
"NoAddRemovePrograms" "00000001"
MessageBox MB_OK "Add Remove Programs disabled!"
Goto +3
WriteRegDWORD HKCU
Software\Microsoft\Windows\CurrentVersion\Policies\Uninstall
"NoAddRemovePrograms" "00000000"
MessageBox MB_OK "Add Remove Programs enabled!"
 
SectionEnd

Hope its useful. -Brandon L laibr@wyeth.com