system restore w/Disk Percent specified

[Briandr]

Hi,

I found this script online for enabling windows system restore. I tried adding in some code that would set the disk percent, but it does not set correctly. I can through this script enable system restore.

Const GLOBAL_INTERVAL_IN_SECONDS = 100000
Const LIFE_INTERVAL_IN_SECONDS = 8000000
Const SESSION_INTERVAL_IN_SECONDS = 500000

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\default")
Set objItem = objWMIService.Get("SystemRestore")
errResults = objItem.Enable("")

Set objItem = objWMIService.Get("SystemRestoreConfig='SR'")
objItem.DiskPercent = 10
objItem.RPGlobalInterval = GLOBAL_INTERVAL_IN_SECONDS
objItem.RPLifeInterval = LIFE_INTERVAL_IN_SECONDS
objItem.RPSessionInterval = SESSION_INTERVAL_IN_SECONDS
objItem.Put_

Thanks.

 

[GrimR]

quick fix just use the dos command

vsscmd="vssadmin Resize ShadowStorage /For=C: /On=C: /Maxsize=10GB"
return = wshshell.run(vsscmd , 0 , true)

vsscmd="vssadmin Resize ShadowStorage /For=C: /On=C: /Maxsize=5%"
return = wshshell.run(vsscmd , 0 , true)

MCSE NT to 2012, MCITP:EA/SA, MCSA, MCDBA, MCTS, MCP+I, MCP