MS10-072: Περιγραφή της ενημέρωση ασφαλείας για τον Microsoft Groove Server 2010: 12 Οκτωβρίου 2010

Περισσότερες πληροφορίες σχετικά με αυτήν την ενημέρωση ασφαλείας

Γνωστά ζητήματα με αυτήν την ενημέρωση ασφαλείας

• Ακόμη και αν η εγκατάσταση ολοκληρωθεί με επιτυχία, ενδέχεται η καταχώρηση αυτής της ενημέρωσης ασφαλείας να απουσιάζει από την "Προσθαφαίρεση προγραμμάτων" (Add/Remove Programs).
  
  Για να καθορίσετε εάν η ενημέρωση έχει εγκατασταθεί στο σύστημά σας, αποθηκεύστε την παρακάτω δέσμη ενεργειών Visual Basic ως "Groove_KB2346298_Check.vbs." Στη συνέχεια, εκτελέστε την με διαπιστευτήρια διαχειριστή. Η δέσμη ενεργειών εμφανίζει ένα παράθυρο διαλόγου με τα αποτελέσματα εντοπισμού.

  Set msi = CreateObject("WindowsInstaller.Installer")
  
  sMspTargets = "{90140000-1106-0000-1000-0000000FF1CE};{90140000-1109-0000-1000-0000000FF1CE}"
  
  sResult = ""
  
  For Each prod in msi.Products
  
      If InStr(sMspTargets,prod) > 0 Then
  
          sPatchCode = "{6EA8F18D-803D-4CB7-AC71-F674B7500670}"
  
          If prod = "{90140000-1109-0000-1000-0000000FF1CE}" Then sPatchCode = "{ACF593FE-E06A-44AB-8872-A8C1BDDE93F5}"
  
          fMspInstalled = False
  
          Set Patches = msi.PatchesEx(prod,"",4,3)
  
          For Each msp in Patches
  
              If msp.PatchCode = sPatchCode Then
  
                  sResult = sResult & msi.ProductInfo(prod,"ProductName") & ": Η ενημέρωση είναι ήδη εγκατεστημένη σε αυτό το σύστημα." & vbCrLf
  
                  fMspInstalled = True
  
                  Exit For
  
              End If
  
          Next
  
          If Not fMspInstalled Then sResult = sResult & msi.ProductInfo(prod,"ProductName") & ": The update is not installed on this system." & vbCrLf
  
      End If
  
  Next
  
  If sResult = "" Then sResult = "There are no products affected by this package on this system."MsgBox sResult,,"Security Update for Microsoft Groove Server 2010 (KB2346298)"