本帖最后由 roadgo 于 2014-3-19 21:08 编辑 //在论坛里找来的,首先要感谢那位兄弟的贡献,然后我进行了试验,并加了自己的理解 线程ID=BeginThread(检测网页)//开始一个新线程,其中线程ID可以自己取名字,“检测网页”是过程名,可以自己取名字 Sub 检测网页//过程开始了 Rem ss//定义一个目标 Hwnd = Plugin.Window.Find(0, "Microsoft Internet Explorer")//找一个名为"Microsoft Internet Explorer"窗口句柄 If Hwnd=0// 没找到 Delay 300//延时 Goto ss//重来,再找 Else HwndEx = Plugin.Window.FindEx(Hwnd, 0, "Button", "确定")//找一个名叫"确定"的按钮 Call Plugin.Window.SendKeyPress(HwndEx,13)//在"确定"的按钮上敲回车 EndIf Delay 1000 //延时一秒 Goto ss//再重来一次,看来“确定 ”很多啊。 Return Call Plugin.Web.LeftClick(1282, 16)//这个按下后,那个窗口才能弹出来,每个的情况不一样,可不加 |
|