網頁插件.png

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("[email protected]","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("http://author.jdyou.com/index.aspx")

//點擊一個網頁元素連接

Call Plugin.Web.HtmlClick("id:imgBtn_log")

txt=Plugin.Web.GetDialogContent()

//出現提示,驗證碼錯誤!

msgbox txt