谁有电影 哈利波特被诅咒的孩子子 (不是哈利波特啊)的百度云资源?

2011年10月 移动平台大版内专家分月排行榜第三2010年11月 移动平台大版内专家分月排行榜第三
2011年10月 移动平台大版内专家分月排行榜第三2010年11月 移动平台大版内专家分月排行榜第三
本帖子已过去太久远了,不再提供回复功能。你的位置:
新手写脚本求大神指导,已有具体流程,但就是不能关闭弹窗和锁定句柄窗口
18:51:25 |
来源: 按键精灵资源站
本帖最后由 此名字被占用喇 于
18:58 编辑
新手参考网络上得写了这个脚本,脚本操作流程是:
已经运行某个EXE,这个EXE一段时间内会弹一个窗口提示:使用到期...然后按确认关闭
然后再次运行此EXE,并在EXE内进行几个点击后,再次运行这个EXE程序
这是一个循环,大概5小时弹一次的样子,我现在写了一个很粗很粗的脚本,
问题是:一运行就会锁定的窗口,我明明已经找出了那个EXE的句柄了....
& && && &&&运行到找窗口句柄时,会弹窗,必须手动按确定或回车才能继续运行脚本
& && && &&&一开始找到弹窗锁定到了会移动到点,但是不会按回车取消
求大神好心指导,这个纯属个人使用
代码如下,求大神帮忙看看**错误,我实在不太懂:Q[code]
hwnd = Plugin.window.foreground(0, &提示&)
Call Plugin.Window.IsWindow(&提示&)
If hwnd & 0 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, enter)
Goto myjie
RunApp &部灵.exe&
Hwndex = Plugin.Window.search(&部灵&)
MsgBox &查找符合的窗口句柄为:& & hwndex
Dim myarray
myarray = split(hwndex, &丨&)
If UBound(myarray) &= 0 Then
& & & & i = 0
& & & & For UBound(myarray)
& & & & & & & & MsgBox &第 & & i + 1 & & 个窗口句柄为:& & Clng(MyArray(i))
& & & & & & & & i=i+1
& & & & Next& & & &
hwnd = Plugin.Window.Foreground
Plugin.Window.Top hwnd, 0
Plugin.Window.Move hwnd, 720, 0
Call Plugin.Bkgnd.leftclick(hwnd, 150, 110)
Call Plugin.Bkgnd.leftclick(hwnd, 475, 140)
Call Plugin.Bkgnd.leftclick(hwnd, 45, 225)
Call Plugin.Bkgnd.leftclick(hwnd,400,30[/code]求助大神,编写一个程序,实现按钮沿着窗体的四周移动_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:101,443贴子:
求助大神,编写一个程序,实现按钮沿着窗体的四周移动收藏
编写一个程序,实现按钮沿着窗体的四周移动,可调方向速度,还可停止与开始。
AutoTDS-V1型全自动热解吸仪是一款20位常温二次全自动热解吸仪,气路采....
VB.net程序,请出门左转到.net吧提问,不谢!
登录百度帐号推荐应用
为兴趣而生,贴吧更懂你。或2013年9月 Delphi大版内专家分月排行榜第二2012年12月 Delphi大版内专家分月排行榜第二
2013年4月 Delphi大版内专家分月排行榜第三
2017年4月 Delphi大版内专家分月排行榜第二2017年1月 Delphi大版内专家分月排行榜第二2014年10月 Delphi大版内专家分月排行榜第二2014年9月 Delphi大版内专家分月排行榜第二
本帖子已过去太久远了,不再提供回复功能。

我要回帖

更多关于 哈利波特诅咒的孩子 的文章

 

随机推荐