VBScript to determine Root Drive

As per best practices we should not hard code the Root Drive in our package. If your package goes to multiple machines having different Root Drives, then you can use this simple VBScript in your package as Custom Action and it will set the Root Drive automatically for that machine.
This script picks up the Root Drive from where Program Files folder is installed.

Set oshell=CreateObject("Wscript.shell")
prog=oshell.ExpandEnvironmentStrings("%ProgramFiles%")
vletter=Split(prog,":")
dletter=vletter(0) & ":\"
session.property("ROOTDRIVE")=dletter

Comments

Post a Comment

Popular posts from this blog

VBScript to change the proxy settings if disconnected from VPN

When connected to VPN, user's IE proxy settings get changed and is forced by VPN. Often the users might get disconnected from VPN while working from home and this does not revert back the proxy settings to the original one. I have written a VBScript to change the proxy settings of the users. This script can be made a shortcut and then used. 'Script Created by Piyush Nasa 'Script to change Proxy settings for user if disconnected from VPN Option Explicit Dim valUserIn Dim objShell, RegLocate, RegLocate1 Set objShell = WScript.CreateObject("WScript.Shell") On Error Resume Next valUserIn = MsgBox("If you have been disconnected from VPN and want to reset your proxy, click Yes and restart Internet Explorer",4,"Proxy Reset") If valUserIn=vbYes Then RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer" objShell.RegWrite RegLocate,"","REG_SZ" RegLocate = "HKEY_CURRENT_U...
Read more

Apple Inc

Image
Apple Inc. formerly   Apple Computer, Inc.,   is an   multinational corporation   headquartered in Cupertino ,   California , with a focus on designing, manufacturing, and selling consumer electronics and computer software products ( www.apple.com ). Apple Inc. was originally founded in 1976 as Apple Computer, Inc. but recently changed its name to Apple Inc. in January of 2007 ( www.apple.com ). Apple Inc. is consistently introducing new technology with an array of electronic products available.  Many of their most recognizable products include the Macintosh desktops and portable computers,  Mac OS X  operating systems, the  iPod  music player, as well as the iTunes store, the iPhone smartphone, and additional professional software applications ( www.apple.com ).   From the articles and information, I have done some analysis and evaluations. In my analysis, I have related the case to three concepts which are concept of demand and ...
Read more

How to make an MSI with some files compressed in Cabinet file and other uncompressed outside the MSI

This is a very interesting feature in MSI and I would like to explore and explain this for your knowledge and benefit. Word Count generally known as Word Count Summary property. This is a mandatory Summary property in MSI and can be changed from your WSI. Please note that this property is not in Property table but is in Summary table. This property has a different meaning for MSI, Transforms and Patch. This property is a bit feild. There are 4 bits which can be set or unset as in 0 or 1. eg. 01 Here is the description for these bits: --------------------------------------------------------------------------------- Bit 0 0 Long file names. 1 Short file names. --------------------------------------------------------------------------------- Bit 1 0 Source is uncompressed. 2 Source is compressed. --------------------------------------------------------------------------------- Bit 2 0 Source is original media. 4 Source is a administrative image created by an administrative installation. -...
Read more