I have opened a web site on Internet explorer (requires the user to login this site), and because I only need I open this web page data, so don't need another request,

I wrote a simple access code, such as the following code,

But I this code ie. The document. The body. The innerHTML access to only the outermost code (below), I want to get the ultimate goal of code is
CustomsCargo_gotoPageExit. Do

I ask you a great god how can I modify the code to access to customsCargo_gotoPageExit. Do the code inside? Thank you

Sub test ()
Dim ie As Object
For Each In ie CreateObject (" shell. Application "). Windows
The Do While ie. Readystate & lt;> 4 the Or ie. Busy
DoEvents
Loop
If LCase (TypeName (ie. Document))="htmldocument" Then
If ie. LocationURL="http://www.singlewindow.gz.cn/cargodecl21/admin/sys_index.do#" Then
Sheet2. Range (" A1 ")=ie. The document. The body. The innerHTML
The Exit For
End the If
End the If
Next
End Sub