MSI Technology into RealTime

Application Packaging came into existence with introduction of MSI technology with Microsoft Office 2000 Application.


Using Windows Installer service which takes of files/folders/registries during Instllation and Uninstallation of an application.


MSI technology has became more popular as it has more advantages and reduces the TCO of an Organization.

Application Virtualization

Application Virtualization is new and hi-end domain where Applications will be available to Users without being physically installed on User Desktops.


There are couple of Products from different Vendors which has Virtualization in realtime.


1. Microsoft App-V
2. Citrix XenApp
3. VMWare ThinApp
4. Cameyo

Application Packaging

This is a place where you can know about Application Packaging. Its a hot and demanding domain in the current market.


Application Packaging is basically customizing applications according to Microsoft Best Practices/Requirements and making ready for deployment in Organizations.


Deployment of applications to client desktops will take place normally using a Deployment Tool ( Eg: SCCM,  BMC Marimba, HP OVCM, ManageSoft etc.., )

Set Working Directory of Shortcut

Set objShell = WScript.CreateObject("WScript.Shell")
Set objShtCut = objShell.Createshortcut("D:\Documents and Settings\All Users\Start Menu\Programs\MKS Toolkit\Evaluation Guide\For Systems Administrators\Desktop Shortcuts.lnk")
objShtCut.WorkingDirectory = "C:\PROGRA~1\MKSTOO~1\Demonstrations\bin"
objShtCut.Save
'WScript.Echo objShtCut.WorkingDirectory

Stop and Delete Service - VBScript

Option Explicit
On Error Resume Next


Dim objWshShell
Set objWshShell = CreateObject("WScript.Shell")


objWshShell.Run "sc stop Nicelog",0,true
objWshShell.Run "sc delete Nicelog",0,true


Set objWshShell = Nothing

Add Registry of Type REG_NONE - VBScript

Dim objWshShell


Set objWshShell=CreateObject("WScript.Shell")


WINDIR =objWshShell.ExpandEnvironmentStrings("%windir%")
objWshShell.Run "reg add HKCU\Software\Google\Google /v hello /t REG_NONE",0


Set objWshShell=Nothing

Create Binary Registry - VBSCript

const HKEY_CURRENT_USER = &H80000001
strKeyPath = "Software\Google\Google Earth Plus"
strComputer = "."
iValues = Array()
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
BinaryValueName = "FailureActions"
oReg.SetBinaryValue HKEY_CURRENT_USER,strKeyPath, BinaryValueName,iValues