使用 ie 锁主页

mp624183768

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
IE窗口句柄	整数型		0
地址栏句柄数组	整数型		0
i	整数型
j	整数型
k	整数型
准确句柄	整数型
被更改主页	文本型		0
当前地址	文本型
是否找到	整数型

被更改主页 ＝ { “www.baidu.com”, “www.135059.com” }
判断循环首 (真)
调试输出 (“开始执行”)
窗口_模糊遍历窗口 (, “IEFrame”, “Internet Explorer”, IE窗口句柄)
计次循环首 (取数组成员数 (IE窗口句柄), i)
窗口_枚举所有子窗口 (IE窗口句柄 [i], 地址栏句柄数组, “Edit”)
计次循环首 (取数组成员数 (地址栏句柄数组), j)
当前地址 ＝ 窗口_取控件内容 (地址栏句柄数组 [j])
是否找到 ＝ 寻找文本 (当前地址, “http”, , 假)
如果真 (窗口_取类名 (窗口_取父句柄 (地址栏句柄数组 [j])) ＝ “Address Band Root” 且 是否找到 ≠ -1)
准确句柄 ＝ 地址栏句柄数组 [j]

计次循环尾 ()
当前地址 ＝ 窗口_取控件内容 (准确句柄)
计次循环首 (取数组成员数 (被更改主页), k)
如果真 (寻找文本 (当前地址, 被更改主页 [k], , 假) ≠ -1)
调试输出 (当前地址)
窗口_置控件内容 (准确句柄, #常量_url地址 )
键盘_消息 (准确句柄, #回车键, 5, )
跳出循环 ()
系统_处理事件 ()
计次循环尾 ()
计次循环尾 ()
程序_延时 (100)
系统_处理事件 ()
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 IE窗口句柄, 整数型, , "0"<br /> .局部变量 地址栏句柄数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 k, 整数型<br /> .局部变量 准确句柄, 整数型<br /> .局部变量 被更改主页, 文本型, , "0"<br /> .局部变量 当前地址, 文本型<br /> .局部变量 是否找到, 整数型<br /> <br /> 被更改主页 ＝ { “<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”, “www.135059.com” }<br /> <br /> <br /> <br /> <br /> <br /> .判断循环首 (真)<br /> <br />     调试输出 (“开始执行”)<br />     窗口_模糊遍历窗口 (, “IEFrame”, “Internet Explorer”, IE窗口句柄)<br />     .计次循环首 (取数组成员数 (IE窗口句柄), i)<br /> <br /> <br />         窗口_枚举所有子窗口 (IE窗口句柄 <i>, 地址栏句柄数组, “Edit”)<br /> <br />         .计次循环首 (取数组成员数 (地址栏句柄数组), j)<br /> <br /> <br />             当前地址 ＝ 窗口_取控件内容 (地址栏句柄数组 [j])<br />             是否找到 ＝ 寻找文本 (当前地址, “http”, , 假)<br />             .如果真 (窗口_取类名 (窗口_取父句柄 (地址栏句柄数组 [j])) ＝ “Address Band Root” 且 是否找到 ≠ -1)<br />                 准确句柄 ＝ 地址栏句柄数组 [j]<br /> <br />             .如果真结束<br /> <br />         .计次循环尾 ()<br /> <br />         当前地址 ＝ 窗口_取控件内容 (准确句柄)<br />         .计次循环首 (取数组成员数 (被更改主页), k)<br />             .如果真 (寻找文本 (当前地址, 被更改主页 [k], , 假) ≠ -1)<br />                 调试输出 (当前地址)<br />                 窗口_置控件内容 (准确句柄, #常量_url地址)<br />                 键盘_消息 (准确句柄, #回车键, 5, )<br /> <br />                 跳出循环 ()<br />             .如果真结束<br />             系统_处理事件 ()<br />         .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br />     .计次循环尾 ()<br /> <br /> <br />     程序_延时 (100)<br />     系统_处理事件 ()<br /> .判断循环尾 ()

  

常量名称	常量值	公 开	备 注
常量_url地址	<文本长度: 19>

.版本 2<br /> <br /> .常量 常量_url地址, "<文本长度: 19>"

https://bbs.125.la/thread-14165890-1-1.html

蛀牙

没什么用,我只看到这个东西运行时杀毒提示有木马

技术凡人

牛逼的不能再牛逼了

ypcfly

谢谢！研究研究。