SMS 2003 Policy sini Client'da cekip, uygulamak

Doug Eby'nin yazdigi asagidaki script araciligi ile SMS Advanced Client (versiyon 2004) yuklu bir istemcinin SMS sunucunuzdan son kullanici policy i cekerek uygulamasini hizlandirabilirsiniz, ozellikle test asamasinda cok faydali olacagindan tavsiye ederim.

On Error Resume Next

Dim objCPAppletMgr
Dim objClientActions
Dim objClientAction
Dim strActionName
strActionName="Request & Evaluate User Policy"
set objCPAppletMgr = CreateObject("CPApplet.CPAppletMgr")
set objClientActions=objCPAppletMgr.GetClientActions
For Each objClientAction In objClientActions
If objClientAction.Name = strActionName Then
objClientAction.PerformAction
End If
Next