DynamicWrapper.dll 间接调用windows api工具 打包下载 附一些例子 下载-
和vbscript等语言搭配实现一些比较不错的功能。
下面是一些简单的例子。
vbs操作窗口
例1:
Set Wrap = CreateObject("DynamicWrapper")
Wrap.Register "user32.dll","FindWindow","i=ss","f=s", "r=l"
WindowHandle = Wrap.FindWindow("", "无标题 - 记事本")
If WindowHandle=0 then
MsgBox "发现窗口"
Else
MsgBox "没发现"
End If
例2: 这个是用来检测是否有相应的已运行程序的标题,有则提示关闭。
strWindowTitle="QQ2009;计算器;a.txt - 记事本" '要关闭的窗口标题多个用;分隔开
Set objWord = CreateObject("Word.Application")
Set colTasks = objWord.Tasks
strWindowTitles=Split(strWindowTitle,";")
For Each strTitle In strWindowTitles
If colTasks.Exists(strTitle) Then
strAnswer=MsgBox("发现指定窗口【"&strTitle&"】是否关闭?",vbYesNo+vbQuestion,"")
If strAnswer=vbYes Then colTasks(strTitle).Close
End If
Next
objWord.Quit
【声明】:本博客不参与任何交易,也非中介,仅记录个人感兴趣的主机测评结果和优惠活动,内容均不作直接、间接、法定、约定的保证。访问本博客请务必遵守有关互联网的相关法律、规定与规则。一旦您访问本博客,即表示您已经知晓并接受了此声明通告。
相关推荐
- eUIDE下载 eUIDE(单片机c语言编译器) v1.07.32.23 官方安装版 下载-
- MsSqlToExcel工具下载 MsSqlToExcel(数据库导出Excel软件) v3.1 免费安装版 下载-
- 易语言文件关联修复软件下载 易语言文件关联修复工具(修复图标显示、双击打开、右键新建) V1.3 下载-
- layuiAdmin下载 layuiAdmin pro(layui后台管理模板系统) v2.4.2 单页版 下载-
- robohelp 2019官方版下载 帮助文件制作工具Adobe RoboHelp 2019.0.7 64位 中文正式版 附安装步骤 下载-
- jetbrains2018 jetbrains 2018激活服务器(jetbrains license server) 2017/2018全系列通用版 下载-
- UABE免费下载 Unity Assets Bundle Extractor(Unity3d资源提取编辑工具) v2.2 官方绿色版 64位 下载-
- docker容器下载 Docker精灵(DockerGenius) v1.0 官方中文免费安装版 下载-
- 黑马代码生成下载 黑马程序员代码生成器HeimaCodeUtil V2.4 中文免费绿色版 下载-
- pip 18.0下载 pip(Python包安装和管理工具) v18.0 官方最新免费版 下载-