adeleon
02-15-2014, 01:55 PM
Hi. As long as I've seen the vollowing code should work:
Sub iFrameInnerHTML()
Const cURL = "https://invest.ameritrade.com/grid/p/login?logout=L&promo=3"
Set IE = New InternetExplorer
IE.Visible = True
IE.Navigate cURL
Do While IE.READYSTATE <> READYSTATE_COMPLETE Or IE.Busy: DoEvents: Loop
Dim iFrm As HTMLIFrame
Set iFrm = IE.Document.frames(1).Document.getElementById("noscript-frame")
Debug.Print iFrm.Document.body.innerText
End Sub
But I obain an error in "set iFrm = ...." line.
Any help would be appreciated.
Alvaro de Leon
Sub iFrameInnerHTML()
Const cURL = "https://invest.ameritrade.com/grid/p/login?logout=L&promo=3"
Set IE = New InternetExplorer
IE.Visible = True
IE.Navigate cURL
Do While IE.READYSTATE <> READYSTATE_COMPLETE Or IE.Busy: DoEvents: Loop
Dim iFrm As HTMLIFrame
Set iFrm = IE.Document.frames(1).Document.getElementById("noscript-frame")
Debug.Print iFrm.Document.body.innerText
End Sub
But I obain an error in "set iFrm = ...." line.
Any help would be appreciated.
Alvaro de Leon