Overblog Tous les blogs Top blogs Technologie & Science Tous les blogs Technologie & Science
Editer l'article Suivre ce blog Administration + Créer mon blog
MENU

Get Argument instead of SCCM variable to test script in windows before integrate into SCCM

Publié le par damcuvelier

 

FOR EXAMPLE:
the script script.vbs use OSDVAR1 & OSDVAR2:
IN SCCM:                IN WINDOWS:
OSDVAR1 = OSDVALUE1        cscript script.vbs /OSDVAR1:OSDVALUE1
OSDVAR2 = OSDVALUE2        cscript script.vbs /OSDVAR2:OSDVALUE2

 

 


Function GetTsVariable (ByVal TSVarName, ByRef TsVarValue)
  Dim SCCMTSEnvt

  On Error Resume Next
    Set SCCMTSEnvt = CreateObject("Microsoft.SMS.TSEnvironment")
    GetTsVariable = Err.number
  On Error GoTo 0

  'If we are in SCCM Environment => Err.number = 0
  If GetTsVariable=0 Then
    TSVarName =Trim(TSVarName)
    TsVarValue=Trim(SCCMTSEnvt(TSVarName))

    If TsVarValue="" Then
      wscript.echo "SCCM variable " & TSVarName & " reading failed : TsVariable doesn't exist or is empty"
      else
      wscript.echo "Argument variable " & TSVarName & " value is : " & TsVarValue
    End If
  Else
  'If we are not in SCCM Environment => Err.number # 0
    If not objArguments.Exists(TSVarName) or objArguments.Item(TSVarName)="" Then
      wscript.echo "Argument variable " & TSVarName & " reading failed : Argument Variable doesn't exist or is empty"
     Else
     TSVarName =Trim(TSVarName)
     TsVarValue=Trim(objArguments.Item(TSVarName))
     wscript.echo "Argument variable " & TSVarName & " value is : " & TsVarValue
    End If
  End If
End Function

Commenter cet article