我想在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元件无法产生物件
请教各位资深乡民，谢谢