WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

How To
plus
plus
plus
plus
plus
plus
plus
plus
plus
plus
plus

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Create Startup or Shutdown Script Policies

 Keywords: Startup shutdown logoff GPO Group Policy Policies   

Here's some code that creates startup or shutdown script policies. It works for me on Windows XP Pro. Please let me know if it works for you.
#DefineSubRoutine RegCreatePolicy(Key)
WinDir = Environment("WinDir")
RegSetValue(Hive,Key:"[GPO-ID]","LocalGPO")
RegSetValue(Hive,Key:"[SOM-ID]","Local")
RegSetValue(Hive,Key:"[FileSysPath]",WinDir:"\System32\GroupPolicy\":Subdir)
RegSetValue(Hive,Key:"[DisplayName]","Local Group Policy")
RegSetValue(Hive,Key:"[GPOName]","Local Group Policy")
RegSetValue(Hive,Key:"\":ScriptNum:"[Script]",Cmd)
RegSetValue(Hive,Key:"\":ScriptNum:"[Parameters]",Params)
#EndFunction

#DefineFunction CreateScriptPolicy(PolicyType,ScriptNum,Cmd,Params)
Switch @TRUE
Case PolicyType=="Shutdown" || PolicyType=="Startup"
   Hive = @REGMACHINE
   Subdir = "Machine"
   Subkey = "Machine"
   Break
Case @TRUE
   Return
EndSwitch
WinDir = Environment("WinDir")
ScriptsDir = WinDir:"\System32\GroupPolicy\":Subdir:"\Scripts\"
DirMake(ScriptsDir)
ScriptsIniFile = ScriptsDir:"Scripts.ini"
RegCreatePolicy("Software\Policies\Microsoft\Windows\System\Scripts\":PolicyType:"\0")
RegCreatePolicy("Software\Microsoft\Windows\CurrentVersion\Group Policy\State\":Subkey:"\Scripts\":PolicyType:"\0")
If FileExist(ScriptsIniFile) Then FileAttrSet(ScriptsIniFile,"rsh")
IniWritePvt(PolicyType,ScriptNum:"CmdLine",Cmd,ScriptsIniFile)
IniWritePvt(PolicyType,ScriptNum:"Parameters",Params,ScriptsIniFile)
#EndFunction

CreateScriptPolicy("Shutdown","0","Cmd.exe","/c MD C:\Shutdown0")
CreateScriptPolicy("Shutdown","1","Cmd.exe","/c MD C:\Shutdown1")
CreateScriptPolicy("Startup","0","Cmd.exe","/c MD C:\Startup0")
CreateScriptPolicy("Startup","1","Cmd.exe","/c MD C:\Startup1")

Article ID:   W17921
Filename:   Create Startup or Shutdown Script Policies.txt
File Created: 2008:06:11:11:03:58
Last Updated: 2008:06:11:11:03:58