「この場合にはもうお手上げ。打開策を見つけることは、IEのセキュリティホールを見つけることと同じ」
'サンプル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