RSS Feeds | Rollout the Office 2007 Converter Pack Silently |
|
|
|
| Written by Cheyenne Harden | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
Lots of companies don’t want to shell out the $$$ for going to Office 2007. Luckily, Microsoft has a file converter that allows users with Office 2003 to read and edit Office 2007 files! My script will allow you to silently install the .exe on your users’ machines. Just add it to a GPO Download the converter pack here: http://www.microsoft.com/downloads/details.aspx?FamilyId=941b3470-3ae9-4aee-8f43-c6bb74cd1466&displaylang=en From Microsoft: Users of the Microsoft Office XP and 2003 programs Word, Excel, or PowerPoint—please install all High-Priority updates from Microsoft Update before downloading the Compatibility Pack.
----------COPY EVERYTHING BELOW THIS LINE---------- 'Install Office Converter tool for office 2007 'Created 4.3.08 by Chey Harden On Error Resume Next Const HKLM = &H80000002 strComputer = "." strPath = "\\SERVERNAMEHERE\NETLOGON\FileFormatConverters.exe" strKeyPath = "SOFTWARE\Administration" strValueName = "OfficeConverter" Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _ strComputer & "\root\default:StdRegProv")
CheckRegistry() CheckRegKey()
Function CheckRegistry() Function CheckRegKey() oReg.GetStringValue HKLM,strKeyPath,strValueName,strValue If strValue = 1 Then 'WScript.Echo "Key Exists: " & strValue WScript.Quit Else 'WScript.Echo "The key doesn't exist!" strValue = 1 oReg.SetStringValue HKLM,strKeyPath,strValueName,strValue ExecuteInstall() End If
End Function Function ExecuteInstall() Set WShell = CreateObject("WScript.Shell") 'WScript.Echo strValue2'used for trouble shooting WShell.Run "%COMSPEC% /c " & strPath & " /quiet",0,TRUE Set WShell = Nothing
End Function ----------COPY EVERYTHING ABOVE THIS LINE---------- MAKE SURE NO WORD WRAP IS HAPPENING IN YOUR SCRIPT 1. Change this string to reflect where you have placed the installer (I use a UNC path to the Netlogon folder). a. strPath = \\SERVERNAMEHERE\NETLOGON\FileFormatConverters.exe 2. You can add a GPO to have all computers run this script. 3. This script created a reg key so the install will not run twice on the same machine.
This information is provided "AS IS" with no warranties expressed or implied.
Powered by !JoomlaComment 3.12 Copyright (C) 2007 Alain Georgette / Copyright (C) 2006 Frantisek Hliva. All rights reserved. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
". Make sure the line before it has the underscore " _ " at the end. This tells the VBS compiler to look to the next line for the rest of the code.
| < Prev | Next > |
|---|
