archive
/
windows-server-2003
mirror of https://github.com/selfrender/Windows-Server-2003
2
0
Fork 0
Code Issues Projects Releases Wiki Activity
Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
4 Commits
1 Branch
0 Tags
4.9 GiB
Tree: 5c6fe3db62
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '5c6fe3db62'
${ noResults }
windows-server-2003/enduser/sakit/sak/plugins/alertemail/reg/regdel.vbs

19 lines
1.2 KiB
Raw Normal View History

commiting as it is
4 years ago
​
​
​
​
​
​
​
​
​
​
​
​
​
​
​
​
​
​
  1. 'Copyright (c)<2000>Microsoft Corporation. All rights reserved.
  2. Dim WshShell
  3. Dim te
  5. Set WshShell = WScript.CreateObject("WScript.Shell")
  6. On Error Resume Next
  7. WshShell.RegDelete "HKLM\Software\Microsoft\ServerAppliance\ElementManager\WebElementDefinitions\TabsMaintenanceAlertEmail\"
  8. WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\ServerAppliance\ApplianceManager\ObjectManagers\Microsoft_SA_Task\SetAlertEmail\"
  9. WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\ServerAppliance\AlertEmail\"
  10. WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\ServerAppliance\ElementManager\WebElementDefinitions\AlertDefinitionsMSSAKitComm4C00000B\"
  11. WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\ServerAppliance\ElementManager\WebElementDefinitions\AlertDefinitionsMSSAKitComm4C00000BUA\"
  12. 'END
  13. On Error Resume Next
  14. te = WshShell.RegRead("HKLM\Software\Microsoft\ServerAppliance\ApplianceManager\ObjectManagers\Microsoft_SA_TASK\ApplianceInitializationTask\TaskExecutables")
  16. 'Remove alloccurances of SetChimeSettings incase there are more
  17. te = Replace(te," Setalertemail.alertemail.1"," ",1,-1,1)
  19. WshShell.RegWrite "HKLM\Software\Microsoft\ServerAppliance\ApplianceManager\ObjectManagers\Microsoft_SA_TASK\ApplianceInitializationTask\TaskExecutables",te