Lucid

Well, after tinkering with deploying Firefox to my end users I thought I'd post the steps in case someone else wnated to easily deploy the web browser (I thought I'd put it up here as well as in another location - just in case). First off, I wanted a deployment that had a progress bar, so my end users could tell weather or not things were working, so if you want a totally silent deployment you'll need to do more work. Secondly, I wanted something I can easily adjust without having to go back in and repackage everything (and I dislike having to do too much work to a software package - after all, that's the sort of thing they should fix at the company). So, with that said, here are the steps I went through to configure the installation for Windows XP Professional: 1. Download the Mozilla Firefox installation, and then execute the installation, but do not proceed to install the software. 3. Navigate to "C:\Documents and Settings\YourUserName\Local Settings\Temp" and locate the folder containing the extracted Mozilla Firefox files (it's best to clear out your Temp files and folders before doing this step). 4. Copy the extracted files into a folder somewhere else on your hard drive, then exit from the unfinished Mozilla Firefox installation. 5. Edit the "Config.ini" file located in the folder containing the extracted files (use Notepad). Change "Run Mode = Silent" and all of the "Show Dialog=TRUE" to "Show Dialog=FALSE" (change all of them except the section titled "[Dialog Installing]", leave this one to TRUE). After testing the basic installation, try editing the other settings to get what you want. 6. Save the "AutoInstall.vb script: ' Automatic Mozilla Firefox installation and configuration script. Option Explicit Dim WshShell, objFSO On Error Resume Next Set WshShell = WScript.CreateObject("WScript.Shell") Set objFSO = CreateObject("Scripting.FileSystemObject") ' Executes the installation. WshShell.Run "setup.exe", 1, False ' Verifies that the installation has completed (checks every two seconds). While WshShell.AppActivate("Install Complete") = FALSE wscript.sleep 2001 Wend WScript.Sleep 502 'Brings the installer to the foreground. WshShell.AppActivate "Install Complete" WScript.Sleep 1003 'Sends keystroke to close the installation window. WshShell.SendKeys "{ENTER}" WScript.Sleep 3004 ' OPTIONAL CUSTOMIZATIONS ' Configures Firefox preferences. If objFSO.FileExists ("user.js") Then objFSO.CopyFile "user.js", (SystemDrive & "\Program Files\Mozilla Firefox\defaults\profile\user.js"), True End If If objFSO.FileExists ("bookmarks.html") Then objFSO.CopyFile "bookmarks.html", (SystemDrive & "\Program Files\Mozilla Firefox\defaults\profile\bookmarks.html"), True End If If objFSO.FileExists (SystemDrive & "\Documents and Settings\All Users\Desktop\Mozilla Firefox.lnk") Then objFSO.DeleteFile (SystemDrive & "\Documents and Settings\All Users\Desktop\Mozilla Firefox.lnk"), True End If If objFSO.FileExists (SystemDrive & "\Documents and Settings\All Users\Start Menu\Programs\Mozilla Firefox\Mozilla Firefox (Safe Mode).lnk") Then objFSO.DeleteFile (SystemDrive & "\Documents and Settings\All Users\Start Menu\Programs\Mozilla Firefox\Mozilla Firefox (Safe Mode).lnk"), True End If Wscript.Quit I think that's most of it (in a rough nutshell). Hopefully there will be an easier method to silent install the package with customizations someday (I know there are plenty of MSI packages out there that others have built, but I prefer knowing what's in my package when I'm deploying it to a few hundred workstations). - Lucid

Okay, so this thread is going in all sorts of directions, so I figured I'd toss up my VBScript to install iTunes 4.7 (for whatever it's worth). - Lucid ' Automatic iTunes installation and configuration script. Option Explicit Dim WshShell, objFSO, SystemDrive, strMessage On Error Resume Next Set WshShell = WScript.CreateObject("WScript.Shell") Set objFSO = CreateObject("Scripting.FileSystemObject") SystemDrive = WshShell.ExpandEnvironmentStrings("%Systemdrive%") ' Executes the installtion process using the "Setup.iss" answer file. WshShell.Run "iTunesSetup.exe -s", 1, False ' Displays a notice for 10 seconds for the end user's benefit. strMessage = "Please ignore the iTunes Welcome window that will be displayed on your screen during the installation process." + (Chr(13)& Chr(13)) + "(The window will remain on your screen until the iTunes installation finishes.)" WshShell.Popup strMessage, 10, "Please be patient...", 64 ' Verifies that the installer is loaded (checks every two seconds). While WshShell.AppActivate("InstallShield - iTunes") = FALSE wscript.sleep 2000 Wend WScript.Sleep 2000 'Brings the installer to the foreground (seems to need both activations to work correctly). WshShell.AppActivate "InstallShield - iTunes" WScript.Sleep 1000 WshShell.AppActivate "iTunes for Windows" WScript.Sleep 1000 'Sends keystroke to initiate the installation. WshShell.SendKeys "N" ' Waits for the installation process to complete by looking for the log file. Do until objFSO.FileExists("setup.log") WScript.Sleep 3000 Loop ' Renames the log file in the event that the software ever needs to be reinstalled. If objFSO.FileExists ("setup.log") Then If objFSO.FileExists ("LastSetup.log") Then objFSO.DeleteFile "LastSetup.log", True End if objFSO.CopyFile "setup.log", "LastSetup.log", True If objFSO.FileExists ("setup.log") Then objFSO.DeleteFile "setup.log", True End If End If ' OPTIONAL CUSTOMIZATIONS ' Configures QuickTime preferences. If objFSO.FileExists ("QuickTime.qtp") Then objFSO.CopyFile "QuickTime.qtp", (SystemDrive & "\Documents and Settings\All Users\Application Data\Quicktime\QuickTime.qtp"), True End If If objFSO.FileExists (SystemDrive & "\Documents and Settings\All Users\Desktop\QuickTime Player.lnk") Then objFSO.DeleteFile (SystemDrive & "\Documents and Settings\All Users\Desktop\QuickTime Player.lnk"), True End If WshShell.RegWrite "HKLM\SOFTWARE\Apple Computer, Inc.\QuickTime\ActiveX\QTTaskRunFlags", 2, "REG_DWORD" ' Uses TaskKill to remove the taskbar icon right away instead of waiting for a restart. WshShell.Run "%COMSPEC% /C TASKKILL /F /IM qttask.exe", 1, False Wscript.Quit