Question

我找到了下面的vbscript代码，它将鼠标光标移动到一个特定的位置，但我还需要它在屏幕上光标所在的位置单击一下。

我需要只使用vbscript来完成，因为系统限制意味着这样。我目前的代码：

Option Explicit
Dim Excel, x, y

Set Excel = WScript.CreateObject("Excel.Application")

x = "111"
y = "222"
Excel.ExecuteExcel4Macro ( _
"CALL(""user32"",""SetCursorPos"",""JJJ""," & x & "," & y & ")")

WScript.Sleep (100)

Answer 1

您的限制非常有限，请参阅Import WinAPI Function in *.VBS File。

如果您可以使用CALL来调用WinAPI函数，那对我来说就是新闻。 CALL仅调用VBScript函数。

VBS中有一个很好的COM集成（CreateObject ...）。但是如果你找不到你想要的COM对象（并且仍然无法自己编写），那么在没有其他软件的情况下，你可能很难实现目标。 Excel本身就是最糟糕的选择之一，而且它的VBA在本机操作系统调用方面同样受限于VBS。

你可以使用rundll通过调用windows DLL中的入口点来调用某些WinAPI函数。其中一些可能会提供您所需要的。但请参阅How to use Rundll32 to execute DLL Function?了解您将面临的混乱:-) 我认为您应该获得AutoIt授权，请参阅autoitscript.com/site/autoit。

然后，像你想要的东西很快。

使用VBscript自动单击

1 个答案: