ｉｅ操作 ローカルパスだとエラーになる

質問

ヤフーなら問題なくコードが動くのに、ＵＲＬがローカルのパスだと、エラーになってしまいます。

具体的には、
***********************************************************
Sub Sample1()

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate "http://www.yahoo.co.jp/"
objIE.Visible = True

Do Until objIE.ReadyState = 4
Loop

Do While objIE.Busy = True
DoEvents
Loop

End Sub

***********************************************************
だと、問題なく実行されるのに、
***********************************************************
Sub Sample2()

strFName = MyDesktop & "\index.html"

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate strFName
objIE.Visible = True

Do Until objIE.ReadyState = 4
Loop

Do While objIE.Busy = True
DoEvents
Loop

End Sub
-------------------------
Function MyDesktop()
Dim WSH As Variant

Set WSH = CreateObject("Wscript.Shell")
MyDesktop = WSH.SpecialFolders("Desktop")

Set WSH = Nothing
End Function
***********************************************************
だと、

Do Until objIE.ReadyState = 4

で
オートメーションエラー
起動されたオブジェクトはクライアントから切断されました。

となります。

なぜローカルだと、エラーになるのでしょうか？
何が違うのでしょうか？

回答No.2

kumatti1

大分前のWin8.1リリース時にそんな不具合があったみたいですね。
#今、確認すると何のエラーも無く読み込めます。

回答No.1

Eureka_

ウイルス対策の一環でIEからローカルファイルへのアクセスは標準で禁止されています。
オプション設定で変更できたはずなので確認を。