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.
|
|
Set Args = wscript.Arguments Set regSR = GetObject("winmgmts:{impersonationLevel=impersonate}!root/default:SystemRestoreConfig='SR'")
If Args.Count() = 0 Then Wscript.Echo "Usage: RegSR [RP{Session|Global|Life}Interval[=value]] [DiskPercent[=value]]" Else For i = 0 To Args.Count() - 1 Myarg = Args.Item(i) Pos = InStr(Myarg, "=") If Pos <> 0 Then Myarray = Split(Myarg, "=", -1, 1) myoption = Myarray(0) value = Myarray(1) Else myoption = Myarg End If If myoption = "RPSessionInterval" Then If Pos = 0 Then Wscript.Echo "RPSessionInterval = " & regSR.RPSessionInterval Else regSR.RPSessionInterval = value regSR.Put_ End If ElseIf myoption = "RPGlobalInterval" Then If Pos = 0 Then Wscript.Echo "RPGlobalInterval = " & regSR.RPGlobalInterval Else regSR.RPGlobalInterval = value regSR.Put_ End If ElseIf myoption = "RPLifeInterval" Then If Pos = 0 Then Wscript.Echo "RPLifeInterval = " & regSR.RPLifeInterval Else regSR.RPLifeInterval = value regSR.Put_ End If ElseIf myoption = "DiskPercent" Then If Pos = 0 Then Wscript.Echo "DiskPercent = " & regSR.DiskPercent Else regSR.DiskPercent = value regSR.Put_ End If End If Next End If
|