Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1504
  • Last Modified:

MSI package for the latest flash player update.

Could someone point me out to the latest upgrade for Adobe Flash Player. We would like to deploy it via SMS to all the computer. Does someone has deployed yet? Anyone could provide the MSI?

Thanks.
0
llarava
Asked:
llarava
  • 3
1 Solution
 
rparsons1000Commented:
Appdeploy.com can help you out with most major application deployments. You'll get all of the links plus the syntax for the .MIS's and EXE's.

If you are deploying software vie SMS, SCCM or GPO, you'll love this place.

http://www.appdeploy.com/packages/browse.asp?cat=alpha&str=a

0
 
0111110Commented:
Here is the notes that I have for installing the updated flash player.  I just followed them to create a new package.


I obtained msi installer file from http://www.adobe.com/products/flashplayer/fp_distribution3.html after agreeing to distribution license agreement information.
There are two different msi files from adobe, one for the ActiveX control and the other one is labeled as a plugin.  I downloaded and will install both.  The ActiveX installer is used by web browsers to run flash and the pluggin is used by other programs to access flash.
Changes to the MSI file


FLASH 10 PACKAGE NOTES

Created a text file called mms.cfg and saved it as UNI-8 coding.  In the text file add the following command to the first line of text:  AutoUpdateDisable=1.  This will turn off the Auto Update feature in version 10 of flash.  I added this file to the plugin msi file.  Have file copy to the folder C:\Windows\System32\Macromed\Flash folder.


SCRIPT CODE


On Error Resume Next

Set Shell = CreateObject("Wscript.Shell")
Set Env = Shell.Environment("PROCESS")
Set FSO = CreateObject("Scripting.FileSystemObject")

Const FlashFolder = "C:\Windows\System32\macromed\flash"

'Disable Security Popup
Env("SEE_MASK_NOZONECHECKS") = 1

'Create new log file folder
If Not FSO.FolderExists("C:\Windows\SCCMInstLogs") Then
    FSO.CreateFolder "C:\Windows\SCCMInstLogs"
    Shell.Run "%comspec% /c cacls c:\Windows\SCCMInstLogs /G users:c /E /T",0,True
End If        

'Delete packaged version if needed
'RetVal = Shell.Run("%comspec% /c msiexec.exe /qn /x ""Adobe Flash Player 9.0.115.msi"" /lime+ C:\Windows\SCCMInstLogs\ARUninstall.log",0,True)

'Delete any msi packaged versions of flash if found
Const HKLM = &H80000002
UninstallKey = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
CheckKeyName = "DisplayName"
ProgramName = "Flash Player"

Set WMIRegistry = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
 & ".\root\default:StdRegProv")

WMIRegistry.EnumKey HKLM, UninstallKey, KeyList

For Each RegKey in KeyList

    WMIRegistry.GetStringValue HKLM, UninstallKey & "\" & RegKey, _
        CheckKeyName, KeyValue

    If Not KeyValue = "" Then
        If InStr(KeyValue, ProgramName) > 0 And Left(RegKey, 1) = "{" Then
            RetVal = Shell.Run("%comspec% /c msiexec.exe /x " & RegKey _
                & " /qn /lime+ C:\Windows\SCCMInstLogs\ARUninstall.log",0,True)
           
            WScript.Sleep 30000
        End If
    End If
Next

'Delete any remaining files
Set Folder = FSO.GetFolder(FlashFolder)
Set Files = Folder.Files

If Files.Count > 0 Then
    For Each File In Folder.Files
        FSO.DeleteFile File,True
    Next
End If
Wscript.Sleep 5000

'Remove Flash9*.ocx files
RetVal = Shell.Run("%comspec% /c regsvr32.exe /s /u " & FlashFolder & "/Flash9*.ocx",0,True)
WScript.Sleep 5000
RetVal = Shell.Run("%comspec% /c uninstall_flash_player.exe /s",0,True)

'Delete any remaining files
Set Folder = FSO.GetFolder(FlashFolder)
Set Files = Folder.Files

If Files.Count > 0 Then
    For Each File In Folder.Files
        FSO.DeleteFile File,True
    Next
End If
Wscript.Sleep 5000

'Run install program
RetCode = Shell.Run("msiexec.exe /qn /i ""flash_player_10.msi"" /m flsh10 /lime+ ""C:\Windows\SCCMInstLogs\flash10.0.log""", 0, TRUE)
RetCode = Shell.Run("msiexec.exe /qn /i ""flash_player_10_plugin.msi"" /m flsh10p /lime+ ""C:\Windows\SCCMInstLogs\flash10.0.log""", 0, TRUE)

'Enable Security Popup
Env.Remove("SEE_MASK_NOZONECHECKS")

Set Shell = Nothing
Set Env = Nothing
Set FSO = Nothing

On Error Resume Next

Set Shell = CreateObject("Wscript.Shell") 
Set Env = Shell.Environment("PROCESS")
Set FSO = CreateObject("Scripting.FileSystemObject")

Const FlashFolder = "C:\Windows\System32\macromed\flash"

'Disable Security Popup
Env("SEE_MASK_NOZONECHECKS") = 1

'Create new log file folder
If Not FSO.FolderExists("C:\Windows\SCCMInstLogs") Then
    FSO.CreateFolder "C:\Windows\SCCMInstLogs"
    Shell.Run "%comspec% /c cacls c:\Windows\SCCMInstLogs /G users:c /E /T",0,True
End If         

'Delete packaged version if needed
'RetVal = Shell.Run("%comspec% /c msiexec.exe /qn /x ""Adobe Flash Player 9.0.115.msi"" /lime+ C:\Windows\SCCMInstLogs\ARUninstall.log",0,True)

'Delete any msi packaged versions of flash if found
Const HKLM = &H80000002
UninstallKey = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
CheckKeyName = "DisplayName"
ProgramName = "Flash Player"

Set WMIRegistry = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
 & ".\root\default:StdRegProv")

WMIRegistry.EnumKey HKLM, UninstallKey, KeyList

For Each RegKey in KeyList

    WMIRegistry.GetStringValue HKLM, UninstallKey & "\" & RegKey, _
        CheckKeyName, KeyValue

    If Not KeyValue = "" Then
        If InStr(KeyValue, ProgramName) > 0 And Left(RegKey, 1) = "{" Then
            RetVal = Shell.Run("%comspec% /c msiexec.exe /x " & RegKey _
                & " /qn /lime+ C:\Windows\SCCMInstLogs\ARUninstall.log",0,True)
            
            WScript.Sleep 30000
        End If
    End If
Next

'Delete any remaining files
Set Folder = FSO.GetFolder(FlashFolder)
Set Files = Folder.Files

If Files.Count > 0 Then
    For Each File In Folder.Files
        FSO.DeleteFile File,True
    Next
End If
Wscript.Sleep 5000

'Remove Flash9*.ocx files
RetVal = Shell.Run("%comspec% /c regsvr32.exe /s /u " & FlashFolder & "/Flash9*.ocx",0,True)
WScript.Sleep 5000
RetVal = Shell.Run("%comspec% /c uninstall_flash_player.exe /s",0,True)

'Delete any remaining files
Set Folder = FSO.GetFolder(FlashFolder)
Set Files = Folder.Files

If Files.Count > 0 Then
    For Each File In Folder.Files
        FSO.DeleteFile File,True
    Next
End If
Wscript.Sleep 5000

'Run install program
RetCode = Shell.Run("msiexec.exe /qn /i ""flash_player_10.msi"" /m flsh10 /lime+ ""C:\Windows\SCCMInstLogs\flash10.0.log""", 0, TRUE)
RetCode = Shell.Run("msiexec.exe /qn /i ""flash_player_10_plugin.msi"" /m flsh10p /lime+ ""C:\Windows\SCCMInstLogs\flash10.0.log""", 0, TRUE)

'Enable Security Popup
Env.Remove("SEE_MASK_NOZONECHECKS")

Set Shell = Nothing
Set Env = Nothing
Set FSO = Nothing

Open in new window

0
 
0111110Commented:
Did that work for you?
0
 
llaravaAuthor Commented:
I haven't tried yet. The following week I will try your approach I will let you know ASAP. I appologize for the delay.
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now