作者qwerty754892 (Q仔)
看板EzHotKey
標題[請問] 按鍵精靈在網頁搜尋特定字
時間Fri Feb 22 11:34:29 2019
我想在Firefox上開啟某網頁
然後搜尋特定字串
條件符合就執行指令
網路找到最接近的程式碼是這樣
VBS Dim objIE,x,s
// 啟動IE
VBS Set objIE = CreateObject("InternetExplorer.Application")
VBS objIE.Visible=true
// 打開預設網頁
VBS objIE.Navigate "
http://tw.yahoo.com/"
// 判斷頁面是否讀取完畢
While objIE.Busy Or objIE.ReadyState <> 4
EndWhile
// 讀取完成，開始其它腳本動作
VBS strIE = objIE.Document.Body.InnerHTML
Delay 100
// 輸入文字
x=InputBox("請輸入要搜尋的文字")
// 檢查文字
VBS s=InStr(strIE,x)
If s>0
// 文字相符
MessageBox 相符
Else
// 沒有文字
MessageBox 無相符文字
EndIf
但這樣是重新開一個網頁IE
我是已經開好的網頁，直接搜尋文字即可
所以問題在
CreateObject("InternetExplorer.Application")
這串
查詢語法，應該可以用GetObject達成
但我直接放完整路徑D:\FirefoxPortable.exe
或是直接放FirefoxPortable.Application
都沒辦法成功抓到
甚至我把這段寫好的程式碼
直接改成GetObject("InternetExplorer.Application")
也不行
想說試試看新開一個
CreateObject("D:\FirefoxPortable.exe")
顯示ActiveX元件無法產生物件
請教各位資深鄉民，謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.62.146.185
※ 文章網址: https://webptt.com/m.aspx?n=bbs/EzHotKey/M.1550806471.A.CC5.html