Difference between revisions of "Adobe Reader 8"
From WPKG | Open Source Software Deployment and Distribution
| Line 48: | Line 48: | ||
There is a list of locale IDs at http://www.microsoft.com/globaldev/reference/lcid-all.mspx. | There is a list of locale IDs at http://www.microsoft.com/globaldev/reference/lcid-all.mspx. | ||
| + | Alternate version: | ||
| + | |||
| + | <pre> | ||
| + | <package | ||
| + | id="acrobat" | ||
| + | name="Adobe Reader" | ||
| + | revision="8000" | ||
| + | priority="3" | ||
| + | reboot="false"> | ||
| + | <download lang="ENU" url='http://ardownload.adobe.com/pub/adobe/reader/win/8.x/8.0/enu/AdbeRdr80_en_US.exe' saveto="%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe" /> | ||
| + | <check type="uninstall" condition="exists" path="Adobe Reader 8" /> | ||
| + | <install cmd='cscript.exe %SOFTWARE%\Acrobat\removeOldVersions.vbs' /> | ||
| + | <install cmd='%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe /sPB /rs /l /msi"/qb-! /norestart /log c:\acrobat8.log ALLUSERS=2 EULA_ACCEPT=YES SUPPRESS_APP_LAUNCH=YES"' /> | ||
| + | <install cmd='cmd /d /c del /q /f "%ALLUSERSPROFILE%\Start Menu\Programs\Startup"\*.lnk' /> | ||
| + | <install cmd='regedit /s "%SOFTWARE%\Acrobat\8.0.0\registryMods.reg"' /> | ||
| + | <remove cmd="MsiExec.exe /q /x{AC76BA86-7AD7-1036-7B44-A70500000002}" /> | ||
| + | <upgrade cmd='%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe /sPB /rs /l /msi"/qb-! /norestart /log c:\acrobat8.log ALLUSERS=2 EULA_ACCEPT=YES SUPPRESS_APP_LAUNCH=YES"' /> | ||
| + | <depends package-id="firefox" /> | ||
| + | </package> | ||
| + | </pre> | ||
Registy settings to disable annoyances (called registryMods.reg): | Registy settings to disable annoyances (called registryMods.reg): | ||
| Line 65: | Line 85: | ||
</pre> | </pre> | ||
| + | removeOldVersions.vbs (remove acrobat versions 4,5 and 6. These aren't removed by Acrobat 8) | ||
| + | <pre> | ||
| + | Set objShell = CreateObject("Wscript.Shell") | ||
| + | WinDir = objShell.ExpandEnvironmentStrings("%WinDir%") | ||
| + | |||
| + | sCmd1 = "C:\" & WinDir & "\ISUNINST.EXE -y -a" _ | ||
| + | & " -f""C:\Program Files\Common Files\Adobe\Acrobat 5.0\NT\Uninst.isu""" | ||
| + | sCmd2 = "C:\" & WinDir & "\ISUNINST.EXE -y -a" _ | ||
| + | & " -f""C:\Program Files\Common Files\Adobe\Acrobat 4.0\NT\Uninst.isu""" | ||
| + | sCmd3 = "C:\" & WinDir & "\UNINST.EXE -y -a" _ | ||
| + | & " -f""C:\Acrobat3\Reader\DeIsL1.isu""" | ||
| + | |||
| + | If RegKeyExists("HKLM\Software\Adobe\Acrobat Reader\5.0\") Then | ||
| + | objShell.Run sCmd1 | ||
| + | End If | ||
| + | |||
| + | If RegKeyExists("HKLM\Software\Adobe\Adobe Reader\4.0\") Then | ||
| + | objShell.Run sCmd2 | ||
| + | End if | ||
| + | |||
| + | If RegKeyExists("HKLM\Software\Adobe\Adobe Reader 3.1\") Then | ||
| + | objShell.Run sCmd3 | ||
| + | End If | ||
| + | |||
| + | Function RegValueExists(sRegValue) | ||
| + | ' Returns True or False based of the existence of a registry value. | ||
| + | Dim oShell, RegReadReturn | ||
| + | Set oShell = CreateObject("WScript.Shell") | ||
| + | RegValueExists = True ' init value | ||
| + | On Error Resume Next | ||
| + | RegReadReturn = oShell.RegRead(sRegValue) | ||
| + | If Err.Number <> 0 Then | ||
| + | RegValueExists = False | ||
| + | End if | ||
| + | On Error Goto 0 | ||
| + | End Function | ||
| + | |||
| + | |||
| + | Function RegKeyExists(ByVal sRegKey) | ||
| + | ' Returns True or False based on the existence of a registry key. | ||
| + | |||
| + | Dim sDescription, oShell | ||
| + | Set oShell = CreateObject("WScript.Shell") | ||
| + | |||
| + | RegKeyExists = True | ||
| + | sRegKey = Trim (sRegKey) | ||
| + | If Not Right(sRegKey, 1) = "\" Then | ||
| + | sRegKey = sRegKey & "\" | ||
| + | End If | ||
| + | |||
| + | On Error Resume Next | ||
| + | oShell.RegRead "HKEYNotAKey\" | ||
| + | sDescription = Replace(Err.Description, "HKEYNotAKey\", "") | ||
| + | |||
| + | Err.Clear | ||
| + | oShell.RegRead sRegKey | ||
| + | RegKeyExists = sDescription <> Replace(Err.Description, sRegKey, "") | ||
| + | On Error Goto 0 | ||
| + | End Function | ||
| + | </pre> | ||
See also [[Adobe_Reader]] | See also [[Adobe_Reader]] | ||
[[Category:Silent Installers]] | [[Category:Silent Installers]] | ||
Revision as of 09:26, 2 March 2007
Download and install Adobe Reader8
<?xml version="1.0" encoding="UTF-8"?>
<!--
Download from http://www.adobe.com/products/acrobat/readstep2.html
Start installer and copy "%temp%\Adobe Reader 8.0\" folder to "%SOFTWARE%\adobereader\" folder
-->
<packages>
<package
id="adobereader8"
name="Acrobat Reader8"
revision="707"
reboot="false"
priority="10">
<depends package-id="logfolder"/>
<check type="uninstall" condition="exists" path="Adobe Reader 8" />
<install cmd='msiexec /q /i "%SOFTWARE%\adobereader\AcroRead.msi" allusers=1'>
<exit code="0" />
<exit code="0" reboot="true" />
</install>
<remove cmd='MsiExec.exe /q /x{AC76BA86-7AD7-1033-7B44-A80000000002}' />
<upgrade cmd='msiexec /q /i "%SOFTWARE%\adobereader\AcroRead.msi" allusers=1'>
<exit code="0" />
<exit code="0" reboot="true" />
</upgrade>
</package>
</packages>
Exit code 3010 means "reboot"; see the corresponding reboot flag.
In the 'remove' section, change the third part of the alphanumeric chain (i.e. the '1033' in 'AC76BA86-7AD7-1033-7B44-A70500000002') into the correct locale ID (LCID) / National Language Support (NLS) code, for example:
- Chinese (Traditional): 1028
- German: 1031
- English (US): 1033
- French: 1036
- Japanese: 1041
- Korean: 1042
- Polish: 1045
- Chinese (Simplified): 2052
- Italian: 1040
There is a list of locale IDs at http://www.microsoft.com/globaldev/reference/lcid-all.mspx.
Alternate version:
<package
id="acrobat"
name="Adobe Reader"
revision="8000"
priority="3"
reboot="false">
<download lang="ENU" url='http://ardownload.adobe.com/pub/adobe/reader/win/8.x/8.0/enu/AdbeRdr80_en_US.exe' saveto="%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe" />
<check type="uninstall" condition="exists" path="Adobe Reader 8" />
<install cmd='cscript.exe %SOFTWARE%\Acrobat\removeOldVersions.vbs' />
<install cmd='%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe /sPB /rs /l /msi"/qb-! /norestart /log c:\acrobat8.log ALLUSERS=2 EULA_ACCEPT=YES SUPPRESS_APP_LAUNCH=YES"' />
<install cmd='cmd /d /c del /q /f "%ALLUSERSPROFILE%\Start Menu\Programs\Startup"\*.lnk' />
<install cmd='regedit /s "%SOFTWARE%\Acrobat\8.0.0\registryMods.reg"' />
<remove cmd="MsiExec.exe /q /x{AC76BA86-7AD7-1036-7B44-A70500000002}" />
<upgrade cmd='%SOFTWARE%\Acrobat\8.0.0\AdbeRdr80_en_US.exe /sPB /rs /l /msi"/qb-! /norestart /log c:\acrobat8.log ALLUSERS=2 EULA_ACCEPT=YES SUPPRESS_APP_LAUNCH=YES"' />
<depends package-id="firefox" />
</package>
Registy settings to disable annoyances (called registryMods.reg):
Windows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\Software\Adobe\Acrobat Reader\8.0\Downtown] "bDontShowAtLaunch"=dword:1 "bGoOnline"=dword:0 [HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Adobe\Acrobat Reader\8.0\FeatureLockdown] "bUpdater"=dword:00000000 "bShowEbookMenu"=dword:00000000 "bPurchaseAcro"=dword:00000000 "bCreatePDFOnline"=dword:00000000 "bBrowserIntegration"=dword:00000000
removeOldVersions.vbs (remove acrobat versions 4,5 and 6. These aren't removed by Acrobat 8)
Set objShell = CreateObject("Wscript.Shell")
WinDir = objShell.ExpandEnvironmentStrings("%WinDir%")
sCmd1 = "C:\" & WinDir & "\ISUNINST.EXE -y -a" _
& " -f""C:\Program Files\Common Files\Adobe\Acrobat 5.0\NT\Uninst.isu"""
sCmd2 = "C:\" & WinDir & "\ISUNINST.EXE -y -a" _
& " -f""C:\Program Files\Common Files\Adobe\Acrobat 4.0\NT\Uninst.isu"""
sCmd3 = "C:\" & WinDir & "\UNINST.EXE -y -a" _
& " -f""C:\Acrobat3\Reader\DeIsL1.isu"""
If RegKeyExists("HKLM\Software\Adobe\Acrobat Reader\5.0\") Then
objShell.Run sCmd1
End If
If RegKeyExists("HKLM\Software\Adobe\Adobe Reader\4.0\") Then
objShell.Run sCmd2
End if
If RegKeyExists("HKLM\Software\Adobe\Adobe Reader 3.1\") Then
objShell.Run sCmd3
End If
Function RegValueExists(sRegValue)
' Returns True or False based of the existence of a registry value.
Dim oShell, RegReadReturn
Set oShell = CreateObject("WScript.Shell")
RegValueExists = True ' init value
On Error Resume Next
RegReadReturn = oShell.RegRead(sRegValue)
If Err.Number <> 0 Then
RegValueExists = False
End if
On Error Goto 0
End Function
Function RegKeyExists(ByVal sRegKey)
' Returns True or False based on the existence of a registry key.
Dim sDescription, oShell
Set oShell = CreateObject("WScript.Shell")
RegKeyExists = True
sRegKey = Trim (sRegKey)
If Not Right(sRegKey, 1) = "\" Then
sRegKey = sRegKey & "\"
End If
On Error Resume Next
oShell.RegRead "HKEYNotAKey\"
sDescription = Replace(Err.Description, "HKEYNotAKey\", "")
Err.Clear
oShell.RegRead sRegKey
RegKeyExists = sDescription <> Replace(Err.Description, sRegKey, "")
On Error Goto 0
End Function
See also Adobe_Reader