使用VBscript自动单击

使用VBscript自动单击,vbscript,mouseevent,Vbscript,Mouseevent,我找到了下面的vbscript代码,它可以将鼠标光标移动到特定位置,但我还需要它在光标位于屏幕上的任何位置进行单击 我只需要用vbscript完成这项工作,因为系统约束意味着这一点。我当前的代码: Option Explicit Dim Excel, x, y Set Excel = WScript.CreateObject("Excel.Application") x = "111" y = "222" Excel.ExecuteExcel4Macro ( _ "CALL(""user32

我找到了下面的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)

您的限制非常有限,请参阅

如果您可以使用
CALL
调用WinAPI函数,这对我来说将是个新闻<代码>调用仅调用VBScript函数

VBS中有一个很好的COM集成(
CreateObject
…)。但是,如果你找不到一个做你想做的事情的COM对象(并且仍然不能编写我们自己的),如果没有额外的软件,你可能很难实现你的目标。因为Excel很大,它的VBA和VBS在本机操作系统调用方面一样有限,所以它将是一个更糟糕的选择

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


然后,你想要的东西就是一个快照

你为什么要用Excel来做这个?这就像用核装置点燃香烟。因为我不知道其他的方法。任何帮助都会被感激的。我从我的评论中做出了回答。如果答案有帮助,请接受。这将从开放式问题列表中删除此问题。否则,请评论为什么它没有帮助。我仍然没有得到你的答案。我不会使用excel,但一定有其他东西可以让它工作。我唯一需要的是一个VBscript代码,以便在屏幕上的任何位置(可能在中间)单击一次。请帮忙。我非常需要它,并尝试了很多谷歌的东西,但没有帮助。