Left Hand Mouse Tweak

[King-Of-Hearts]

Hi, this is my first attempt !

To use Left Hand Mouse:

Open Notepad and type this:

Option Explicit

Set WSHShell = WScript.CreateObject("WScript.Shell")

Dim WSHShell, n, p, itemtype, mybox

p = "HKCU\Control Panel\Mouse\SwapMouseButtons"

itemtype = "REG_SZ"

n = "1"

WSHShell.RegWrite p, n, itemtype

MyBox = MsgBox("You must Log Off/Log On for the changes to take effect.", 64,"Done")

Save as.. Filename.vbs

To Use Right Hand Mouse:

Open notepad and type this:

Option Explicit

Set WSHShell = WScript.CreateObject("WScript.Shell")

Dim WSHShell, n, p, itemtype, mybox

p = "HKCU\Control Panel\Mouse\SwapMouseButtons"

itemtype = "REG_SZ"

n = "0"

WSHShell.RegWrite p, n, itemtype

MyBox = MsgBox("You must Log Off/Log On for the changes to take effect.", 64,"Done")

Save as.. Filename.vbs

Download this file:

SwapMouse.rar

Edited March 22, 2008 by King-Of-Hearts

[neo]

Thats nice start.

You r really King-Of-Hearts

Keep it up