Solved

Startup Script for Ofc 2007 - Service Pack 1 Deployment ONLY

Posted on 2008-10-16
4
381 Views
Last Modified: 2012-05-05
I've settled on customizing the Office 2007 package using the OCT file and using a startup script to deploy the application.  To prepare for a future service pack deployment, during my development phase, I'm trying to see if I can push out Service Pack 1 to this package using a script like that described by Microsoft below.

The script works great, applies the service pack without issues...however, upon subsequent reboots, the script runs again, and while it doesn't appear to apply the whole service pack over again, it goes through the motions before it realizes oh wait, I already have this update, and then getting users to the Ctrl + Alt + Del screen.  This is taking a long time, and I'm trying to avoid the delay if the pack is already deployed.  Any suggestions for additions to the below script to make it only run this particular update once aside from how it's doing it now?


Dim wShell 'As WshShell
Dim fso 'As FileSystemObject
Dim f 'As File
Dim sLogName 'As String
Dim sPatchFolder 'As String
Dim sPatchCmd 'As String
 
Const kTempFolder = 2
 
On Error Resume Next
    sPatchFolder = Replace(Wscript.ScriptFullName, Wscript.ScriptName, "")
 
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set wShell = CreateObject("WScript.Shell")
    For Each f In fso.GetFolder(sPatchFolder).Files
        If UCase(Right(f.Name, 4)) = ".EXE" Then
            sLogName = fso.GetSpecialFolder(kTempFolder) & "\" & Left(f.Name, Len(f.Name) - 3) & "log"
            sPatchCmd = f.Path & " /quiet /norestart /log:" & sLogName
            wShell.Run sPatchCmd, 0, True
        End If
    Next

Open in new window

0
Comment
Question by:kaos_theory
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 3

Accepted Solution

by:
Angelized earned 500 total points
ID: 22735032
What about to test the registry to see if the SP1 is already installed ?


Verifying the installation of the SP1  updates for the 2007 Office system language packs is more difficult  because language pack products will not be displayed in the Windows  Add/Remove Programs listing if the language pack is included in  the original deployment of the 2007 Office system. The best way to verify  updates to the 2007 Office Suite language packs is through a Visual  Basic®  script that uses the Windows Installer to verify the installation.
The version returned will not be the  same for each product because every fix does not apply to every language.  A script example that demonstrates how this would be done is provided  below. This script is meant only for demonstration purposes, and it  may need to be modified for your usage.
Set oWI = CreateObject("WindowsInstaller.Installer")
For Each prod In oWI.Products
    If UCase(Right(prod,  7)) = "0FF1CE}" Then _
             sOutput = sOutput & prod & vbTab & _
                               oWI.ProductInfo(prod, "VersionString") & vbTab & _
                               oWI.ProductInfo(prod, "ProductName") & vbCrLf
Next
wscript.echo sOutput
 
If the file name of the script is  Off2007Ver.vbs, then the command line provided below can be used  in a Command Prompt window to generate a text file that contains the  results.
Cscript.ext [path]\Off2007Ver.vbs  > [path]\Off2007Ver.txt
 
This will generate a text file that summarizes  the products that have been installed and the version for each. A sample  of the text that would be contained in that text file is as follows:
 
{90120000-0014-0000-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Professional 2007
{90120000-0015-0407-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Access MUI (German) 2007
{90120000-0015-0409-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Access MUI (English) 2007
{90120000-0015-040C-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Access MUI (French) 2007
{90120000-0115-0409-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Shared Setup Metadata MUI (English) 2007
{90120000-0016-0407-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Excel MUI (German) 2007
{90120000-0016-0409-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Excel MUI (English) 2007
{90120000-0016-040C-0000-0000000FF1CE} 12.0.6215.1000 Microsoft  Office Excel MUI (French) 2007
 
In the above text, the globally unique  identifier (GUID) for each product is followed by the version of the  product and the name of the product. In this case, a product is any  application that is represented by a Windows Installer (.msi) file on  the original source. A suite such as Microsoft Office Professional 2007  will have a number of .msi files. If language packs are installed, there  will be an additional Windows Installer file for each additional language.
0
 
LVL 2

Author Comment

by:kaos_theory
ID: 23613866
will be closing soon
0
 
LVL 2

Author Closing Comment

by:kaos_theory
ID: 31506782
I"ve decided to just remove them from the group after the initial install, but thank goodness I have a small company -- I'm sure your suggestion would have worked as well!
0

Featured Post

Resolve Critical IT Incidents Fast

If your data, services or processes become compromised, your organization can suffer damage in just minutes and how fast you communicate during a major IT incident is everything. Learn how to immediately identify incidents & best practices to resolve them quickly and effectively.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Using Word 2013, I was experiencing some incredible lag when typing.  Here's what worked for me....
In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

735 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question