这是一套脚本一个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