|
|
| Line 1: |
Line 1: |
| {{PageAuthor|fade8}}
| | hs5A0a <a href="http://jafyqmlmkyhk.com/">jafyqmlmkyhk</a>, [url=http://scnukslgaaxk.com/]scnukslgaaxk[/url], [link=http://okfiaiqqmwio.com/]okfiaiqqmwio[/link], http://qtbizxjxssir.com/ |
| | |
| == Description == | |
| Tested with Windows 2000 as a restricted user. Toggles Add/Remove programs on the fly.
| |
| == The Script ==
| |
| <highlight-nsis>
| |
| ; 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
| |
| </highlight-nsis>
| |
| Hope its useful.
| |
| -Brandon L
| |
| laibr@wyeth.com
| |
| | |
| [[Category:Code Examples]] | |
Revision as of 13:53, 12 September 2007
