Интерфейс мыши для скриптов JScript (VBScript): Если Вы используете дочерние окна контроля (поля ввода) для создания диалоговых форм, то Вам не требуется реализовывать интерфейс мыши - его предоставляет ОС Windows.

// Интерфейс мыши низкого уровня
// Файл: mouse.w_js (JScript)


// Просто определите в своем скрипте функцию WM_MOUSE
function WM_MOUSE(id,x,y,key)
{

   var id = "Идентификатор события: " + id + "       "
   var x = "Координата X в обл. клиента: " + x + "     "
   var y = "Координтата Y в обл. клианта: " + y + "     "
   var key = "Биты комбинации модифиц. кл: " + key + "      "  

   Window.TextOut(0,50,10,id);
   Window.TextOut(0,50,30,x);
   Window.TextOut(0,50,50,y);
   Window.TextOut(0,50,70,key);

   Window.UpdateWindow()

}

' VBScript
Function WM_MOUSE(id,x,y,key)
   id = "id: " & id & "             "
   x = "X: " & x & "             "
   y = "Y: " & y & "             "
   key = "Key: " & key & "             "

   Window.Delete(0)
   Window.TextOut 0,50,10,id
   Window.TextOut 0,50,30,x
   Window.TextOut 0,50,50,y
   Window.TextOut 0,50,70,key
   Window.UpdateWindow()
End Function

Notes:

1. Идентификаторы событий:

   WM_RBUTTONDOWN: 0x0204 //Нажатие правой клавишей мыши
   WM_LBUTTONDBLCLK: 0x0203 //Двойной щелчок левой клавишей
   WM_RBUTTONDBLCLK: 0x0206 //Двойной щелчок правой клавишей
   WM_LBUTTONDOWN: 0x0201 
   

2. Модифицирующие клавиши (битовые маски):

   MK_CONTROL 0x0008 Set if the CTRL key is down.
   MK_LBUTTON 0x0001 Set if the left mouse button is down.
   MK_MBUTTON 0x0010 Set if the middle mouse button is down.
   MK_RBUTTON 0x0002 Set if the right mouse button is down.
   MK_SHIFT 0x0004 Set if the SHIFT key is down.