php 点击鼠标获取坐标,用VBS控制鼠标(获取鼠标坐标、鼠标移动、鼠标单击、鼠标双击、鼠标右击)...

该博客介绍了如何通过VBS(Visual Basic Script)来控制鼠标,包括获取鼠标当前的X和Y坐标,设置鼠标位置,以及模拟鼠标左键、右键和中键的单击及双击操作。示例代码使用了Excel对象来运行VBA代码,实现了这些功能。
摘要由CSDN通过智能技术生成

Option Explicit

DimWshShell

DimoExcel, oBook, oModule

DimstrRegKey, strCode, x, y

SetoExcel =CreateObject("Excel.Application")'创建 Excel 对象

setWshShell =CreateObject("wscript.Shell")

strRegKey ="HKEY_CURRENT_USER\Software\Microsoft\Office\$\Excel\Security\AccessVBOM"

strRegKey =Replace(strRegKey,"$", oExcel.Version)

WshShell.RegWrite strRegKey,1,"REG_DWORD"

SetoBook = oExcel.Workbooks.Add'添加工作簿

SetoModule = obook.VBProject.VBComponents.Add(1)'添加模块

strCode = _

"'Author: Demon"& vbCrLf & _

"'Website: http://demon.tw"& vbCrLf & _

"'Date: 2011/5/10"& vbCrLf & _

"Private Type POINTAPI : X As Long : Y As Long : End Type"& vbCrLf & _

"Private Declare Function S

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值