ProgrammingWall

Remove MSN Messenger…

Are you tired of seeing MSN Messenger pop up on your Windows XP system? As usual, in an effort to continue its course towards domination of everything, Microsoft has made it difficult to remove. But it is possible! The following method works in Windows XP Professional, but has not been tested on a system with SP1 installed. FYI, I’ve seen scripts that are similar to this, but fail miserably, automatically deleting other much-needed components! Better to do this slow and manually! As always, I am not responsible for the use or the misuse of this information; use at your own risk.

1. Exit MSN Messenger by right-clicking the MSN icon in the notification area, and selecting Exit.
2. Add the following registry entries, both with a DWORD value of 1:
   1. HKEY_LOCAL_MACHINESoftwarePoliciesMicrosoftMessengerClientPreventRun
   2. HKEY_LOCAL_MACHINESoftwarePoliciesMicrosoftMessengerClientPreventAutoRun
3. Open a command prompt by clicking Start/Run, then typing “command” and clicking OK.
4. Uninstall MSN Messenger by typing “rundll32 advpack.dll,LaunchINFSection %systemRoot%INFmsmsgs.inf,BLC.Remove”
5. Uninstall the leftover installation information file by typing “rundll32 setupapi,InstallHinfSection BLC.Remove 128 %systemRoot%INFmsmsgs.inf”
6. Allow MSN Messenger to be displayed in the Add/Remove Windows Components dialog in the future (if it pops up again!) by typing “notepad.exe %systemRoot%INFsysoc.inf” and deleting the word “hide” from the line that starts with “msmsgs=”. It MAY be possible to skip to this step directly and perform the uninstallation directly from the Add/Remove Windows Components dialog, but that method MAY leave unwanted components and has not been thoroughly tested.
7. Cross your fingers and reboot! You will probably get a message asking you to confirm the removal of some leftover files. Click OK.

OR the same thing can be done as following
Open notepad and paste following content and save the file as _remove.vbs. After creation, double click the file and say yes on option alert box.

Option Explicit
On Error Resume Next

‘Dimension variables
Dim WSHShell, MyBox, p1, q1, rcmd
Dim jobfunc

‘Set the Windows Script Host Shell and assign values to variables
Set WSHShell = WScript.CreateObject(“WScript.Shell”)
p1 = “HKEY_LOCAL_MACHINESoftwareMicrosoftOutlook ExpressHide Messenger”
q1 = 2
rcmd = “RunDll32 advpack.dll,LaunchINFSection %windir%infmsmsgs.inf,BLC.Remove”

‘Create or change the Hide Messenger value
WSHShell.RegWrite p1, q1

‘Run the uninstall command
WshShell.Run(rcmd)