SCCM 2007客户端安装和修复脚本

这是一套脚本一个vbs一个cmd两个脚本要一并使用

作用：

1、通过组策略的开机脚本去安装SCCM 2007客户端

2、判断是否有用户登录（本地登录），如果有用户登录则等待10分钟后开始检测SCCM 2007服务，目的是为了避免影响到用户登陆的时间。

3、如果SCCM 2007服务不存在启动CMD脚本强制安装SCCM 2007客户端。

4、如果服务存在检测服务是否运行，如果运行则直接将运行状态写到"c:\ccm_install.log"的日志中。

5、如果服务不运行强制将服务器启动，启动后再检测服务启动状态写到"c:\ccm_install.log"的日志中。

VBS脚本内容,需要保存为 ccm2007_install.vbs

'扫描是否有用户登录,如果没有10秒后重新扫描,直至有用户登录为止

strComputer = "."

dim loginusername,loginnum

Do Until loginusername = "\"

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colComputer = objWMIService.ExecQuery _

("Select * from Win32_ComputerSystem")

For Each objComputer in colComputer

loginnum = InStr(objComputer.UserName,"\")

If loginnum > 0 Then

loginusername = "\"

End If

Next

WScript.Sleep 10000

Loop

'检查SCCM2007 Agent服务(ccmexec)是否存在

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colRunningServices = objWMIService.ExecQuery("Select * from Win32_Service where Name = 'ccmexec'")

If colRunningServices.Count = 0 Then

'如果服务不存在执行ccm_install.bat批处理安装SCCM2007 Agent程序

'msgbox "服务不存在"

Set run = CreateObject("Wscript.Shell")

run.run "ccm_install.bat" , 0

Else

'如果服务存在,继续向下检查服务是否是运行

'msgbox "服务存在"

For Each objService in colRunningServices

'Wscript.Echo objService.DisplayName & VbTab & objService.State & objService.StartMode

'如果服务停止,强制将服务启动状态改为"自动",并强制启动服务

If objService.State = "Stopped" Then

errReturnCode = objService.Change( , , , , "Automatic")

objService.StartService

End If

Next

End If

'重新检查ccmexec服务状态,并将状态记录到"C:\ccm_install.log"日志中

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.CreateTextFile("C:\ccm_install.log")

For Each objService in colRunningServices

objFile.WriteLine("CCM_Service: " & objService.State)

Next

objFile.Close

CMD脚本内容,需要保存为 ccm_install.bat

net use o: "\\file\Software\办公软件\安装杀毒\SCCM_Client"

IF EXIST %windir%\ccm_client (

echo aaaaaa

) ELSE (

xcopy o:\. %windir%\ccm_client\ /s /a /d /y

)

net use o: /delete /y

%windir%\ccm_client\ccmsetup.exe