Error Extracting content from Internet Explorer 8 vs Internet Explorer 9

mond007

New Member
Joined
Oct 9, 2008
Messages
34
I have some VBA code that in effect launches a web page and reads of the data content.

Code:
[COLOR=#303336][FONT=Consolas]Sub Retrieve_Info()[/FONT][/COLOR]
<code style="margin: 0px; padding: 0px; border: 0px; font-family: Consolas, Menlo, Monaco, 'Lucida Console', 'Liberation Mono', 'DejaVu Sans Mono', 'Bitstream Vera Sans Mono', 'Courier New', monospace, sans-serif; white-space: inherit;">[COLOR=#303336]        
        If First_Time = True Then
            IE_Sledgehammer
            Set IE = CreateObject("InternetExplorer.Application")
            IE.Visible = True
        End If
        
            PACN = Cells(Row, 1)
            IE.Navigate "http://www.myWebReportPage.com/Apps/AddIssues/EditIssue.asp?IssueID=" & PACN & "&ProjectID=PACN"
        If First_Time = True Then
            Sleep 10000
            First_Time = False
        Else
            Sleep 3000
        End If
        
        On Error Resume Next
        Source_Code = IE.document.DocumentElement.innerText
        Do Until InStr(1, Source_Code, "Issue Id") <> 0 Or InStr(1, Source_Code, "Unable to locate") <> 0
            Source_Code = IE.document.DocumentElement.innerText
            Sleep 100
        Loop
        
        Sleep 200
            
        Source_Code = IE.document.DocumentElement.innerText
        Source_Code2 = IE.document.DocumentElement.innerHTML
             
[/COLOR]</code>[COLOR=#303336][FONT=Consolas]End Sub
[/FONT][/COLOR]

The problem is that this code runs fine in IE 8 but hangs in IE9.
Any help would be greatly appreciated.

 

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top