And here is some KiXtart code to accomplish either Installing or Removing MSN Messenger 6.x (default installations only)
Code:
Break On
Dim $SO
$SO=SetOption('Explicit','On')
$SO=SetOption('NoVarsInStrings','On')
Dim $MSN
$MSN=MSNMessenger('I')
Function MSNMessenger($Method)
Dim $Key,$Operation
Select
Case $Method = 'I'
Shell 'msiexec /i ' + @CurDir +'\MsnMsgs.msi IAGREE="Yes" ADDEXPLORERTOOLBAR="" SETSEARCHENGINE="" SETHOMEPAGE="" /q'
Case $Method = 'U'
$Key='HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{ABEB838C-A1A7-4C5D-B7E1-8B4314600137}'
$Operation=Join(Split(ReadValue($Key,'UninstallString'),'/i'),'/q /x')
Shell $Operation
Case 1
$Operation = MessageBox("Invalid input, please use either an I to install or a U to uninstall", "MSN Messenger Error", 4112)
EndFunction
. 
