SCCM-TOOLS.COM Advertisements - Adobe Reader / Professional Update

Adobe Reader / Professional Update

Update Adobe intelligently without SCUP or Adobe Updates

Code

Dim objShell, RegLocate
Set objShell = WScript.CreateObject("WScript.Shell")
On error resume next

'determine if this is a 64bit machine

Set Wmi = GetObject("winmgmts:\\.\root\CIMV2")
Set Col = Wmi.ExecQuery("SELECT * FROM Win32_Processor")
For Each Obj in Col
  MachineType= Obj.AddressWidth
next

if MachineType=32 then

Dim sngVersion

'''' Adobe 9.0.0
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
    if sngVersion="9.0.0" then
      objShell.run "msiexec /p AcroPro-std9.1.msp /qb /norestart", 0, True
    end if

'''' Adobe 9.1.0
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
    if sngVersion="9.1.0" then
      objShell.run "msiexec /p Adobe_9.1.2_pro.msp /qb /norestart", 0, True
    end if

'''' Adobe 9.1.1
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.1" then
        objShell.run "msiexec /p Adobe_9.1.2_pro.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.1.3
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.2" then
       objShell.run "msiexec /p AcrobatUpd913_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.2
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.3" then
       objShell.run "msiexec /p AcrobatUpd920_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.2
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.2.0" then
       objShell.run "msiexec /p AcrobatUpd930_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.2
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.0" then
       objShell.run "msiexec /p AcrobatUpd932_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.2
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.1" then
       objShell.run "msiexec /p AcrobatUpd932_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.3
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.2" then
       objShell.run "msiexec /p AcrobatUpd933_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.4
     sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.3" then
       objShell.run "msiexec /p AcrobatUpd934_all_incr.msp /qb /norestart", 0, True
     end if

else ' MachineType=64

'''' Adobe 9.0.0
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
    if sngVersion="9.0.0" then
      objShell.run "msiexec /p AcroPro-std9.1.msp /qb /norestart", 0, True
    end if

'''' Adobe 9.1.0
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
    if sngVersion="9.1.0" then
      objShell.run "msiexec /p Adobe_9.1.2_pro.msp /qb /norestart", 0, True
    end if

'''' Adobe 9.1.1
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.1" then
        objShell.run "msiexec /p Adobe_9.1.2_pro.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.1.3
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.2" then
       objShell.run "msiexec /p AcrobatUpd913_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.2
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.1.3" then
       objShell.run "msiexec /p AcrobatUpd920_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.2
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.2.0" then
       objShell.run "msiexec /p AcrobatUpd930_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.2
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.0" then
       objShell.run "msiexec /p AcrobatUpd932_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.2
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.1" then
       objShell.run "msiexec /p AcrobatUpd932_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.3
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.2" then
       objShell.run "msiexec /p AcrobatUpd933_all_incr.msp /qb /norestart", 0, True
     end if

'''' Adobe 9.3.4
    sngVersion = objShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-1033-0000-7760-000000000004}\DisplayVersion")
     if sngVersion="9.3.3" then
       objShell.run "msiexec /p AcrobatUpd934_all_incr.msp /qb /norestart", 0, True
     end if

end if

WScript.Quit

-------------------Adobe Reader ------------------
To update Adobe Reader simply modify the Registry and msp files.

32 bit
 sngVersion = objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-7AD7-1033-7B44-A93000000001}\DisplayVersion")

64 bit
sngVersion = objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{AC76BA86-7AD7-1033-7B44-A93000000001}\DisplayVersion")

---------------Collection Query------------------
select SMS_R_SYSTEM.ResourceID,SMS_R_SYSTEM.ResourceType,SMS_R_SYSTEM.Name,SMS_R_SYSTEM.SMSUniqueIdentifier,SMS_R_SYSTEM.ResourceDomainORWorkgroup,SMS_R_SYSTEM.Client from SMS_R_System inner join SMS_G_System_ADD_REMOVE_PROGRAMS on SMS_G_System_ADD_REMOVE_PROGRAMS.ResourceID = SMS_R_System.ResourceId where SMS_G_System_ADD_REMOVE_PROGRAMS.DisplayName = "Adobe Acrobat 9 Pro" and SMS_G_System_ADD_REMOVE_PROGRAMS.Version !="9.3.4"
-----------------------------------

Documentation