bonjour,
 
j'utilise un script vbs pour que les postes clients aillent chercher les mises à jour sue notre serveur sus et ça fonctionne correctement
 
par contre elles ne s'installent pas automatiquement
il faut double clicker sur icône Windows update
 
comment faire pour que l'install se fasse aussi automatiquement ?
 
merci beaucoup
slts
ste29

et ton script vbs il ressemble à quoi ?
 
ça aiderait pour t'aider...
 
et puis tu aurais pu poster sur le topic sus : http://forum.hardware.fr/hardwaref [...] 8275-1.htm
 
!
 

désolé
voici mon script
 
Dim WSHShell  
Set WSHShell = wscript.CreateObject("wscript.Shell" )  
 
Function RegExists(value)
On Error Resume Next
Set WS = CreateObject("WScript.Shell" )
val = WS.RegRead(value)
If (Err.number = -2147024893) Or (Err.number = -2147024894) Then
RegExists = False
Else
RegExists = True
End If
End Function
 
 
WSHShell.Run "net stop wuauserv"  
Wscript.Sleep 10000  
 
 
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\wuauserv\start", 2, "REG_DWORD"  
Wscript.Sleep 5000  
 
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoUpdate", 0, "REG_DWORD"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\AUOptions", 4, "REG_DWORD"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\ScheduledInstallDay", 0, "REG_DWORD"  
 
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\ScheduledInstallTime", 8, "REG_DWORD"
 
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\UseWUServer", 1, "REG_DWORD"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoRebootWithLoggedOnUsers", 1, "REG_DWORD"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\AU\RescheduleWaitTime", 1, "REG_DWORD"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\WUServer", "http://....", "REG_SZ"  
WSHShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\WindowsUpdate\WUStatusServer", "http://....", "REG_SZ"  
 
If RegExists ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\windowsupdate\auto update\LastWaitTimeout" ) Then
WSHShell.RegDelete "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\windowsupdate\auto update\LastWaitTimeout"
else
End If  
 
If RegExists ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\windowsupdate\auto update\DetectionStartTime" ) Then
WSHShell.RegDelete "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\windowsupdate\auto update\DetectionStartTime"
else
End If
 
WSHShell.Run "net start wuauserv"  
Wscript.Sleep 10000  
 
 
strComputer = "."  
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )  
Set colRunningServices = objWMIService.ExecQuery ("Select * from Win32_Service" )  
For Each objService in colRunningServices  
 if objService.DisplayName = "Automatic Updates" then  
     if objService.State = "Stopped" then  
       wscript.echo "Automatic Updates a été configuré. Vous devez redémarrer l'ordinateur pour pour que les paramètres soient effectifs."  
     else  
       wscript.echo "Automatic Updates a été configuré."  
     end if  
 end if  
Next  
 
wscript.Quit(0)
 
merci
slts

A creuser : http://forum.hardware.fr/hardwaref [...] 8275-8.htm

bonjour,
 
ça ne m'aide pas beaucoup
en fait je veux mettre dans mon script l'option 4 que l'on retrouve dans le modele d'administration
 
slts
stéphane