如何將IE瀏覽器改成火狐瀏覽器

vpower

開啟IE瀏覽器 CreateObject("InternetExplorer.Application")
如果要改成火狐瀏覽器該如何更改呢?
如果要改成其他瀏覽器又要到哪個地方查詢呢?
謝謝!

jackdream

回復 1# vpower

參考看看
http://gb.twbts.com/index.php/topic,2318.0.html

vpower

回復 2# jackdream

您好!好像沒有找到我要的!我把我的VBA PO上來好了!
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 2 And Target.Value <> "" Then '此處2表示在B欄且資料不等於空
        Cancel = True '取消雙擊事件(修改資料要按F2或直接在fx區上改)
        With CreateObject("InternetExplorer.Application")
            .Navigate "http://maps.google.com.tw/" '瀏覽google
            Do While .Busy Or .ReadyState <> 4
                DoEvents
            Loop
            .Document.all("d_d").innerText = "大溪鎮員林路三段257巷33弄45號" '這一個是出發地
            .Document.all("d_daddr").innerText = Target '這一個是目的地(即b欄上資料)
            .Document.all("d_sub").Click '送出訊息
            .Visible = True '開啟網頁視窗
        End With
    End If
End Sub
紅色的部分好像是開啟IE瀏覽器但是我想改成火狐瀏覽器
可是我更改成火狐瀏覽器以後他的下一行又會出錯!請大大幫忙!謝謝!

luhpro

回復 3# vpower

查了一下網路發現 :
因為上述的方式是採用呼叫 IE 的 ActiveX 技術所提供的方法而來的,
但原版的 火狐 並不提供此類方法,
因為我沒有裝火狐所以不能測試,
但在確保無毒的前提下你可以考慮安裝ActiveX模擬器後再測試看看.

所以你的情形簡單的說就是適用於 IE 的方式並不保證也能適用於 火狐.

你可以參考以下的搜尋結果網頁 :
http://tw.search.yahoo.com/search;_ylt=A3TWBYnUKY5MM3EBJntr1gt.;_ylc=X1MDMjE0MjQ3ODk0OARfcgMyBGZyA3lmcARmcjIDc2J0bgRuX2dwcwMwBHF1ZXJ5AyVFNyU4MSVBQiVFNyU4QiU5MCUyMEFjdGl2ZVg-?p=%E7%81%AB%E7%8B%90+ActiveX&fr2=sb-top&fr=yfp&rd=r1