Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Startup Script for Ofc 2007 - Service Pack 1 Deployment ONLY

Posted on 2008-10-16
4
Medium Priority
?
385 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 2000 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

Office 365 Training for Admins - 7 Day Trial

Learn how to provision tenants, synchronize on-premise Active Directory, implement Single Sign-On, customize Office deployment, and protect your organization with eDiscovery and DLP policies.  Only from Platform Scholar.

Question has a verified solution.

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

Access developers frequently have requirements to interact with Excel (import from or output to) in their applications.  You might be able to accomplish this with the TransferSpreadsheet and OutputTo methods, but in this series of articles I will di…
This article helps those who get the 0xc004d307 error when trying to rearm (reset the license) Office 2013 in a Virtual Desktop Infrastructure (VDI) and/or those trying to prep the master image for Microsoft Key Management (KMS) activation. (i.e.- C…
This video shows where to find the word count, how to display it, and what it breaks down to in Microsoft Word.
Learn how to create and modify your own paragraph styles in Microsoft Word. This can be helpful when wanting to make consistently referenced styles throughout a document or template.

688 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