Const HIDDEN_WINDOW = 12
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")
errReturn = objProcess.Create("C:\[path to your miner]\bitcoin-miner.exe -a 5 -o http://[pool address]:8332 -u [email protected] -p supersecretpassword", null, objConfig, intProcessID)
It's a vbs script for ufasoft miner. Put it in start up folder. You may also want to limit processor load. There was a script floating around for that too.