如何使用 VBScript 移动鼠标

Question

我正在尝试使用 VBScript 移动鼠标。我尝试使用 Sendkeys"{CLICK LEFT , x , y}"和 Sendkeys"{MOVETO, 10 , 20}"但它不起作用我也尝试使用 MouseKeys，所以我可以用键盘移动它，因此用于Sendkeys激活它，但它也不起作用（鼠标键数字键盘不移动鼠标） 。我已经尝试了我所知道的一切以及我可以在其他地方研究的一切，所以现在我希望你们中的一个人能为我回答这个问题。谢谢

Answer 1

移动鼠标的一种可能方法是：

Dim Excel: Set Excel = WScript.CreateObject("Excel.Application") 
Excel.ExecuteExcel4Macro "CALL(""user32"",""SetCursorPos"",""JJJ"",""xxx"",""yyy"")"

-->xxx = X 位置 | yyy = y 位置

唯一的缺点是您需要 Microsoft Excel 才能运行此脚本...

希望我能帮助你