「これはセキュリティ上の制約。異なるドメインのフレームにアクセスできなくすることで、情報漏えいを防いでいる」
'サンプル4.1.3_ドメインの異なる子フレームへのアクセス
Public Sub getFrame4()
Dim ie As
InternetExplorer
Set ie =
Day2.getIE("クロスドメインの例") 'IE取得
'フレーム1の中身へアクセス
MsgBox ie.document.frames("frame1").document.body.innerHTML
'フレームGoogleへのアクセス
MsgBox ie.document.frames("Google").document.body.innerHTML
End Sub