SCCM 2007

Toutes les réponses

• 

  

  1

  Connectez-vous pour voter

  Bonjour

  j'ai un script en vbs pour une machine en local

  Set smsclient = CreateObject("Microsoft.SMS.Client")
  smsclient.SetAssignedSite("xxx")

  ==========

  a distance

  ===

  'Variables Section
  Dim sSiteCode
  Dim sMachine

  'SiteCode Variable
  sSiteCode = InputBox("Veuillez spécifier le Site Code :","Assigned Site","xxx")

  sMachine = InputBox("Veuillez spécifier le nom de la machine :","Assigned Site","Computer Name")
  'wscript.echo "Changing Site Code: " & sMachine & " - " & sSiteCode
  ChangeSiteCode(sMachine)

  wscript.echo "Traitement terminé."

  '---------------------------------------------------------------------------------------
  Function ChangeSiteCode(strHost)
    'Connect to the Remote Computer Namespace
    Set oSCCMNamespace = GetObject("winmgmts://" & sMachine & "/root/ccm")
    Set oInstance = oSCCMNamespace.Get("SMS_Client")
    '----------------------------------------------------------------------------------
  '  Set result = oInstance.ExecMethod_("GetAssignedSite")
  '  wscript.echo sMachine & " Current Assigned Site is: " & result.sSiteCode
    'Reassign the site code
  ' Set inParam =smsClient.Methods_.Item("SetAssignedSite").inParameters.SpawnInstance_()
  ' inParam.sSiteCode = "XYZ"
  ' Set Newresult = smsClient.ExecMethod_("SetAssignedSite", inParam)
  ' Set NewSite = smsClient.ExecMethod_("GetAssignedSite")
  ' wscript.echo strComputer & " New Assigned Site is : " & NewSite.sSiteCode
       '----------------------------------------------------------------------------------
    set oParams = oInstance.Methods_("SetAssignedSite").inParameters.SpawnInstance_()
    'Change the Site Code
    oParams.sSiteCode = sSiteCode
    oSCCMNamespace.ExecMethod "SMS_Client", "SetAssignedSite", oParams
    'Set Newresult = oInstance.ExecMethod_("SetAssignedSite", oParams)
    set oSCCMNamespace = Nothing
  End Function

  ====

  a tester svp

  ---

  Partager c'est avancer : Votez!SVP

  • Proposé comme réponse Nabil-IT mardi 17 février 2015 13:21

  jeudi 12 février 2015 10:08

  Réponse

  |

  Citation
• 

  

  1

  Connectez-vous pour voter

  Bonjour

  un script qui fait appel a un fichier txt avec les noms des machines a cibler pour le changement du site ===

  nom du fichier exemple sur le c:

  c:\AssignedSiteMachine.txt

  ==

  'Variables Section
  Dim sSiteCode
  Dim sMachine

  Dim objFSO
  Const ForReading = 1
  'Constants Section
  Set objFSO = CreateObject("Scripting.FileSystemObject")
  'This is the file to read the names to change from
  Set objTextFile = objFSO.OpenTextFile("c:\AssignedSiteMachine.txt", ForReading)
  'SiteCode Variable
  sSiteCode = InputBox("Veuillez spécifier le Site Code :","Assigned Site","OT2")
  Do Until objTextFile.AtEndOfStream
   sMachine = objTextFile.Readline
   'wscript.echo "Changing Site Code: " & sMachine & " - " & sSiteCode
   ChangeSiteCode(sMachine)
  Loop

  wscript.echo "Traitement terminé."

  Function ChangeSiteCode(strHost)
   'Connect to the Remote Computer Namespace
   set oSCCMNamespace = GetObject("winmgmts://" & sMachine & "/root/ccm")
   Set oInstance = oSCCMNamespace.Get("SMS_Client")
   set oParams = oInstance.Methods_("SetAssignedSite").inParameters.SpawnInstance_()
   'Change the Site Code
   oParams.sSiteCode = sSiteCode
   oSCCMNamespace.ExecMethod "SMS_Client", "SetAssignedSite", oParams
   set oSCCMNamespace = Nothing
  End Function

  ---

  Partager c'est avancer : Votez!SVP

  • Proposé comme réponse Nabil-IT mardi 17 février 2015 13:21

  jeudi 12 février 2015 10:09

  Réponse

  |

  Citation
• 

  

  1

  Connectez-vous pour voter

  bonjour

  des news ?

  meci

  ---

  Partager c'est avancer : Votez!SVP

  mardi 17 février 2015 13:22

  Réponse

  |

  Citation
• 

  

  0

  Connectez-vous pour voter

  Bonjour,

  Je propose une solution avec Windows Powershell version 2.0 ou supérieure.

  Changement du site SCCM pour un client en local :
  
  

  Changement du site SCCM pour un client distant :
  

  1. Il faut d'abord activer WINRM sur le Client :

  2. Ensuite la commande Windows Powershell Invoke-Command lancée depuis un autre ordinateur permettra de changer le code site SCCM du client distant :
  

  Invoke-Command -ComputerName NYC-CL1 -ScriptBlock { (New-Object -ComObject Microsoft.SMS.Client).SetAssignedSite('ATL') }

  Cordialement,
  Charlie

  ---

  Charlie Dancoisne - Independent Consultant & Trainer

  
  

  • Modifié Charlie Dancoisne - SQL - SCCM - Powershell mardi 17 février 2015 16:04 Erreur de syntaxe. Pfff

  mardi 17 février 2015 16:00

  Réponse

  |

  Citation