脚本――监控打印服务

当网络打印服务器打印量很大或者打印数据过大时,经常容易造成Spooler服务意外终止,尤其是喷墨打印机最容易塞死Spooler服务。作为企业IT管理员,这些事情太琐碎,多了也会烦躁。只好写写脚本减轻自己的工作负担。

用脚本去检测打印服务状态,利用计划任务实现循环检测,频率不必太高,5分钟一次就够了。

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colRunningServices = objWMIService.ExecQuery ("Select * from Win32_Service where Name='Spooler'")
For Each objService in colRunningServices
 If not objService.StartMode = "Automatic" Then
 objService.ChangeStartMode("Automatic")
  If not objService.State = "Running" Then
  objService.StartService() 
  End If
 End If
Next

PS:附件提供代码下载

你可能感兴趣的:(职场,休闲)