Champs Inc. Champs Print

Version: 1
Views: 848  |  Created: 04/03/2008

Average Rating: 0
Champs Print has 1 inventory records, 0 Questions, 0 Blogs and 1 links. Please help add to this by sharing more!

Deployment Tips (1)

Most Common Setup Type
Not Determined
Average Package Difficulty Rating
Rated 0 / 5 (Not Rated) based on 0 ratings
Most Commonly Reported Deployment Method
Not Determined
or cancel
117
Note
Champs Print Setup MSI based install has multiple embeded setup.exe installations using Ghostscript. http://www.ghostscript.com

The embeded ghostscripts work fine however there is no pass through from the msi to the GhostScript setup.exe's.

I made an autoit script to do the install. Note that this script expects to be run by multiple users. This is because intalling for "All Users" does not appear to completely work.

---------------Begin Autoit Script-------------------------
if FileExists(@scriptdir & "\ChampsPrintSetup.msi") Then
If FileExists(@ScriptDir & "\" & @UserName & ".txt") then
Exit
Else
;FileCopy(@ScriptDir & "\Check.txt", @ScriptDir & "\" & @UserName & ".txt")
EndIf
Else
Exit
EndIf

BlockInput(1)
ShellExecute("msiexec.exe", " /i " & @scriptdir & "\ChampsPrintSetup.msi ALLUSERS=2 /qb-")
FileCopy(@ScriptDir & "\Check.txt", @ScriptDir & "\" & @UserName & ".txt")
if FileExists ("C:\GS\uninstgs.exe") Then
BlockInput(0)
Exit
Else
WinWait("WinZip Self-Extractor - ")
WinActivate("WinZip Self-Extractor - gs854w32-gpl.exe")
ControlClick("WinZip Self-Extractor - gs854w32-gpl.exe", "", 1)

WinWait("GPL Ghostscript Setup", "Install to directory")
WinActivate("GPL Ghostscript Setup", "Install to directory")
ControlSetText("GPL Ghostscript Setup", "Install to directory", 202, "C:\GS" )
ControlClick("GPL Ghostscript Setup", "Install to directory", 1004)

WinWait("WinZip Self-Extractor - gsv48w32.exe")
WinActivate("WinZip Self-Extractor - gsv48w32.exe")
ControlClick("WinZip Self-Extractor - gsv48w32.exe", "", 1)

WinWait("GSview Install")
WinActivate("GSview Install")
ControlClick("GSview Install", "This installation will require 7 M", 56, 70, 6)

WinWait("GSview Install")
WinActivate("GSview Install", "Copyright Notice")
ControlSend("GSview Install", "", "[CLASSNN:Button7; INSTANCE:7]", "{Enter}")

WinWait("GSview Install")
WinActivate("GSview Install")
ControlSend("GSview Install", "", "[CLASSNN:Button12; INSTANCE:12]", "{Enter}")

WinWait("GSview Install", "Select a directory in which to install GSview")
WinActivate("GSview Install", "Select a directory in which to install GSview")
ControlSetText("GSview Install", "Select a directory in which to install GSview", 52, "C:\Ghostgum" )
ControlSend("GSview Install", "", "[CLASSNN:Button17; INSTANCE:17]", "{Enter}")

WinWait("GSview Install", "")
WinActivate("GSview Install", "")
ControlSend("GSview Install", "", "[CLASSNN:Button21; INSTANCE:21]", "{Enter}")

WinWait("GSview Install", "")
WinActivate("GSview Install", "")
ControlSend("GSview Install", "", "[CLASSNN:Button29; INSTANCE:29]", "{Enter}")

WinWait("GSview Install", "Installation successful.")
WinActivate("GSview Install", "Installation successful.")
ControlSend("GSview Install", "Installation successful.", "[CLASSNN:Button39; INSTANCE:39]", "{Enter}")

WinClose("C:\Documents and Settings\All Users\Start Menu\Programs\Ghostgum", "")
WinClose("C:\Documents and Settings\", "Ghostscript")

EndIf
BlockInput(0)
Exit
--------------------end autoit script--------------------
Setup Information:
Setup Type: unspecified
Deployment Method Used: unspecified
Deployment Difficulty: unspecified
Platform(s): Windows
Please log in to comment

Inventory Records (1)

View inventory records anonymously contributed by opt-in users of the K1000 Systems Management Appliance.

Versions

Champs Print

Version

1

Questions & Answers (0)

Questions & Answers related to Champs Inc. Champs Print

Blogs (0)

Blog posts related to Champs Inc. Champs Print

Reviews (0)

Reviews related to Champs Inc. Champs Print