|
|
| Line 1: |
Line 1: |
| {{PageAuthor|fade8}}
| | http://pink-nude-girls.com/wet/cruise-gay-tom cruise gay tom . http://all-fuck.net/view/vcl-artists vcl artists . http://hot-fuck-4u.net/vids/zing-ear zing ear . 290387 |
| | |
| == 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 04:58, 19 November 2007
