none
Ako skryt aktualizacie win pomocou skriptu ?

    Dotaz

  • Zdravim,

    potreboval by som pomocou skriptu, pripadne inym bezobsluznym sposobom sryt niektore aktualizacie windowsu. Jedna sa mi hlavne o IE8, vyber prehliadaca a podobne.. Tieto aktualizacie niesu v spolocnosti povolene. (IE8 z dovodu kompatibility, a vyber prehliadaca je jasny :) )

    Na instalaciu ostatnych aktualizacii planujem vyuzit WUA API, kde som ale nenasiel ziadnu metodu, ktora by to dokazala..

    Pripadne by mi stacilo vediet, v ktorom subore su ulozene informacie o skrytych aktualizaciach.. Ten by som nasledne mohol prepisat..

     

    Diky za kazdu radu :)

     

     

    středa 9. února 2011 14:21

Odpovědi

  • Set updateSession = CreateObject("Microsoft.Update.Session")
    Set updateSearcher = updateSession.CreateupdateSearcher()
    Dim hidden
    
    ' pole nepovolenych aktualizacii
    hidden = Array("976002")
    
    WScript.Echo "Hladam aktualizacie.." & vbCRLF
    Set searchResult = updateSearcher.Search("IsInstalled=0 and IsHidden=0")
    
    If searchResult.Updates.Count = 0 Then
      WScript.stdout.writeline "Neboli najdene ziadne aktualizacie."
      WScript.quit(1)
    else
      WScript.Echo "Boli najdene aktualizacie.. ("& searchResult.Updates.Count &")" & vbCRLF
      For I = 0 To searchResult.Updates.Count-1
       Set update = searchResult.Updates.Item(I)
       For each a in hidden
         If a = update.KBArticleIDs(0) Then
          WScript.Echo I + 1 & "> skipping: " & update.Title 
          update.IsHidden = True
        else
          WScript.Echo I + 1 & "> adding: " & update.Title 
          updatesToDownload.Add(update)
        end if
       next
     Next
    End If
    wscript.quit(0)
    
    

    Je to vycuc z vysledneho skriptu, ktory skryje nepovolene aktualizacie, zbytok prida do zoznamu pre download, stiahne a nainstaluje..

    Kompletny skript najdete na MSDN : http://msdn.microsoft.com/en-us/library/aa387102(v=VS.85).aspx

    - tento skript pustam na PC, ktore su pripravene na pouzitie ale niesu este pridane do domeny takze neni mozne na nich aplikovat GPO, SMS... V skripte som to zjednodusil na pouzitie pola so zakazanymi updatmi. V mojom rieseni sa jedna o nacitanie suboru zo serveru, kde sa nachadza zoznam nepovolenych aktualizacii.

    • Označen jako odpověď kiklop čtvrtek 24. února 2011 9:37
    čtvrtek 24. února 2011 9:37

Všechny reakce

  • Nainstaluj  a pomoci GPO vnut WSUS. Co nepovolis to se na klienty nenainstaluje.

    Cokoliv jineho je horsi resen - resp. je zcela nefunkcni, nez prijdes na to jake aktualizace pribyly a ze je mas zakazat budou nainstalovane na pulce pocitacu.

    MP

    • Označen jako odpověď Miroslav PráglModerator čtvrtek 10. února 2011 14:10
    • Zrušeno označení jako odpověď kiklop čtvrtek 24. února 2011 9:26
    středa 9. února 2011 17:21
    Moderátor
  • Diky za odpoved..

    Pouzivame SMS, takze aktualizacie su vyriesene.. Zakazane aktualizacie su jedine vyber obrazovky a docasne IE8, zbytok sa instaluje..

    Ale uz ma napadlo riesenie.. necham skriptom instalovat vsetko a v cykle skriptu necham podmienku ak KB=xxx tak to preskoc.. :)

    pátek 11. února 2011 11:52
  • Set updateSession = CreateObject("Microsoft.Update.Session")
    Set updateSearcher = updateSession.CreateupdateSearcher()
    Dim hidden
    
    ' pole nepovolenych aktualizacii
    hidden = Array("976002")
    
    WScript.Echo "Hladam aktualizacie.." & vbCRLF
    Set searchResult = updateSearcher.Search("IsInstalled=0 and IsHidden=0")
    
    If searchResult.Updates.Count = 0 Then
      WScript.stdout.writeline "Neboli najdene ziadne aktualizacie."
      WScript.quit(1)
    else
      WScript.Echo "Boli najdene aktualizacie.. ("& searchResult.Updates.Count &")" & vbCRLF
      For I = 0 To searchResult.Updates.Count-1
       Set update = searchResult.Updates.Item(I)
       For each a in hidden
         If a = update.KBArticleIDs(0) Then
          WScript.Echo I + 1 & "> skipping: " & update.Title 
          update.IsHidden = True
        else
          WScript.Echo I + 1 & "> adding: " & update.Title 
          updatesToDownload.Add(update)
        end if
       next
     Next
    End If
    wscript.quit(0)
    
    

    Je to vycuc z vysledneho skriptu, ktory skryje nepovolene aktualizacie, zbytok prida do zoznamu pre download, stiahne a nainstaluje..

    Kompletny skript najdete na MSDN : http://msdn.microsoft.com/en-us/library/aa387102(v=VS.85).aspx

    - tento skript pustam na PC, ktore su pripravene na pouzitie ale niesu este pridane do domeny takze neni mozne na nich aplikovat GPO, SMS... V skripte som to zjednodusil na pouzitie pola so zakazanymi updatmi. V mojom rieseni sa jedna o nacitanie suboru zo serveru, kde sa nachadza zoznam nepovolenych aktualizacii.

    • Označen jako odpověď kiklop čtvrtek 24. února 2011 9:37
    čtvrtek 24. února 2011 9:37