按键精灵_插件命令:Web网页插件
Bind 绑定WQM进程:启动网页按键精灵
Call Plugin.Web.Bind("WQM.exe")
SetSize 设置WQM窗口大小
Call Plugin.Web.SetSize(1000,600)
Tips 显示提示信息
//在系统托盘区显示一个气泡提示信息;可用来在脚本执行过程中的提示
Call Plugin.Web.Tips("脚本开始运行")
Save 保存网页或图片
// 将百度的Logo保存到C:\a.gif
//参数1:字符串型,需要保存的目标Url
//参数2:字符串型,本地文件名
Call Plugin.Web.Save("http://www.baidu.com/img/baidu_logo.gif","C:\a.gif")
Go 浏览网页
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.ajjl.cn")
Back 网页后退 / Forward 当前网页前进一步
Call Plugin.Web.Bind("wQM.exe")
Call Plugin.Web.Go("www.ajjl.cn")
Call Plugin.Web.Go("www.baidu.com")
Call Plugin.Web.Back()
Call Plugin.Web.Forward()
Refresh 刷新当前标签网页
//参数1:整数型,指定是否强制刷新当前标签页;0表示正常刷新,1表示强制刷新
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.ajjl.cn")
Call Plugin.Web.Refresh(0)
Refresh 刷新当前标签网页
//在WQM浏览器中新建一个标签页,并跳转到该标签页
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.baidu.com")
Call Plugin.Web.TabNew()
Call Plugin.Web.Go("www.google.cn")
TabNew 新建一个标签页
TabGoto 跳转到指定标签页
TabClose 关闭当前标签页
ScrollTo 当前网页滚动到指定位置
//参数1:整数型,水平滚条位置,像素为单位
//参数2:整数型,垂直滚条位置,像素为单位
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.ajjl.cn")
Call Plugin.Web.ScrollTo(0,100)
Call Plugin.Web.TabGoto(1)
Call Plugin.Web.TabClose()
ClearHistory 清除历史记录
//下面这句是清除IE历史记录
Call Plugin.Web.ClearHistory()
ClearTemp 删除临时文件
//下面这句是删除IE临时文件
Call Plugin.Web.ClearTemp()
ClearCookie 删除Cookie
//下面这句是删除IE的Cookie
Call Plugin.Web.ClearCookie()
GetUrl 得到当前网页的网址
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.ajjl.cn")
url=Plugin.Web.GetUrl()
MessageBox url
GetTitle 获取当前标签页的标题
//获取当前标签页的标题
Txt=Plugin.Web.GetTitle()
Msgbox Txt
HtmlClick 点击网页元素
HtmlInput 往文本框中输入文字
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.baidu.com")
Call Plugin.Web.HtmlInput("按键精灵","id:kw")
Call Plugin.Web.HtmlClick("id:su")
//详细的网页元素特征字符串组合方式:http://zy.anjian.com/index.php?action-viewnews-itemid-175
HtmlCheck 选择/清除网页中的单选框或复选框
HtmlSelect 选择网页中的下拉框
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("http://www.vrbrothers.com/cn/wqm/demo/pages/Demo-ComplexForm.aspx")
//Delay 3000
Call Plugin.Web.HtmlInput("按键精灵","id:ctl00_mainContent_tbUsername")
Call Plugin.Web.HtmlInput("password","id:ctl00_mainContent_tbPassword")
Call Plugin.Web.HtmlInput("hi@vrbrothers.com","id:ctl00_mainContent_tbEMail")
Call Plugin.Web.HtmlCheck(true,"id:ctl00_mainContent_rblGender_0")
Call Plugin.Web.HtmlSelect("湖北","id:ctl00_mainContent_ddlProvince")
//Delay 500
Call Plugin.Web.HtmlSelect("宜昌","id:ctl00_mainContent_ddlCity")
//Delay 500
Call Plugin.Web.HtmlSelect("4010200%4083000","id:ctl00_mainContent_lbObjectives")
Call Plugin.Web.HtmlCheck(true, "id:ctl00_mainContent_cblHobies_0")
Call Plugin.Web.HtmlCheck(true, "id:ctl00_mainContent_cblHobies_1")
//Delay 2000
Call Plugin.Web.HtmlCheck(true, "id:ctl00_mainContent_cblHobies_2")
Call Plugin.Web.HtmlInput("Test!","id:ctl00_mainContent_tbSelfAssement")
Call Plugin.Web.HtmlCheck(true,"id:ctl00_mainContent_cbAcceptTerms")
Delay 1000
Call Plugin.Web.HtmlClick("tag:input&value:提交")
Sub OnScriptExit()
Call Plugin.Web.Tips("脚本运行完毕")
End Sub
HtmlGet 获取网页元素的信息
参数1:字符串型,网页元素属性类型:
text,网页元素的内部文本
html,网页元素的内部HTML
outerHtml,网页元素的外部HTML
value,表单元素的value值
src,图片元素的图片地址
href,链接元素的链接地址
class,网页元素的CSS类名称
offset,网页元素的左上角位置
参数2:字符串型,网页元素特征字符串
例子1:
// 获取淘宝页面上的货物价格
price=Plugin.Web.HtmlGet("text","id:id_Price")
Call Plugin.Web.Tips(price)
例子2:
//<>--------------------------------------绑定WQM(必须的)
PID=Plugin.Web.Bind("wqm.exe")
//<>--------------------------------------打开百度网站
Call Plugin.Web.Go("http://www.baidu.com")
//<>--------------------------------------获取元素位置
XY=Plugin.Web.HtmlGet("offset","id:su")
//下面这句用于分割字符串
ZB = InStr(XY, "|")
//下面这句将字符串转换成数值
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
//<>--------------------------------------得到结果
MessageBox "“百度一下”左上角坐标位置为:" & X&","&Y
HtmlExists 判断网页元素是否存在
Call Plugin.Web.Bind("WQM.exe")
Call Plugin.Web.Go("www.baidu.com")
linkNum=Plugin.Web.HtmlExists("tag:a")
Call Plugin.Web.Tips("百度首页共有" & linkNum & "个链接")
RunJS 在当前网页中执行一段JS脚本
Call Plugin.Web.RunJS(0,"alert('hello!');")
title=Plugin.Web.RunJS(1,"var t=document.title;return t;")
MessageBox title
MoveTo 鼠标移动
//下面这句用于向后台窗口句柄(变量:Hwnd)发送一个鼠标移动到客户区域(坐标:10, 10)处
Call Plugin.Web.MoveTo(10, 10)
LeftDown 左键按下
//下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:10, 10)处发送一个鼠标左键按下
Call Plugin.Web.LeftDown(10, 10)
LeftUp 左键弹起
//下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:10, 10)处发送一个鼠标左键弹起
Call Plugin.Web.LeftUp(10, 10)
LeftClick 左键单击
//下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:5, 5)处发送一个鼠标左键单击
Call Plugin.Web.LeftClick(5, 5)
LeftDoubleClick 左键双击
//下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:10, 10)处发送一个鼠标左键双击
Call Plugin.Web.LeftDoubleClick(10, 10)
KeyDown 键盘按下
// 在网页中按下B键
Call Plugin.Web.KeyDown(66)
KeyUp 键盘弹起
//下面这句用于向WQM当前网页中发送一个键盘(扫描码:65)弹起
Call Plugin.Web.KeyUp(Hwnd, 65)
KeyPress 键盘点击
//下面这句用于向后台窗口句柄(变量:Hwnd)发送一个键盘(扫描码:65)按键A
Call Plugin.Web.KeyPress(65)
GetHwnd 获得当前网页句柄
iehwnd=Plugin.Web.GetHwnd()
// 该句柄可以支持后台找色
SendString 发送文本消息
PID=Plugin.Web.Bind("wqm.exe")
Call Plugin.Web.Go("www.baidu.com")
//模拟鼠标移动
Call Plugin.Web.MoveTo(380,185)
//模拟鼠标左键单击
Call Plugin.Web.LeftClick(380,185)
Call Plugin.Web.SendString("测试一下看看行不行")
GetDialogContent 获取对话框静态文本
//注意:首先选择WQM【浏览器-》模式设置-》运行模式】才可以使用如下脚本
//得到WQM进程句柄
PID=Plugin.Web.Bind("wqm.exe")
//打开一个网页地址连接
Call Plugin.Web.Go("网页链接")
//点击一个网页元素连接
Call Plugin.Web.HtmlClick("id:imgBtn_log")
txt=Plugin.Web.GetDialogContent()
//出现提示,验证码错误!
msgbox txt