请教vba 控制ie多个页面的问题

lihongju

sub text()  
Dim url As String
    With CreateObject("InternetExplorer.Application")

        .Visible = True
        .Navigate "http://21.123.93.107/RLMS/loginInfo.do?targetMethod=preLogin#"

        Do Until .ReadyState = 4
            DoEvents
        Loop
......
’此时ie只有一个页面，页面标题为“aaa”
For Each l In .Document.GetElementsByTagName("input")
If l.classname = "view-btn i-btn" Then
l.Click    '此处可单击成功
Exit For
End If
Next
Do Until .ReadyState = 4
            DoEvents
        Loop
        Do While .Busy <> False
            DoEvents
        Loop
‘此时会弹出一个新的页面，标题为“bbb”，即ie有两个页面(页面标题为“aaa”和“bbb”两个不同的页面，下面要单击“bbb”中按钮。
Application.Wait Now + TimeValue("00:00:02")

Dim nn
For Each nn In .Document.GetElementsByTagName("input")
If nn.classname = "view-btn i-btn" Then
'Cells(8, 1).Value = 111111
Application.Wait Now + TimeValue("00:00:02")
nn.Click   ‘此时执行click事件不作用，不知为什么？怎样让此句起作用？谢谢！
Exit For
End If
Next

Do Until .ReadyState = 4
            DoEvents
        Loop
        Do While .Busy <> False
            DoEvents
        Loop
.....
end sub
因是内网无法发连接，抱歉，请高手指教，谢谢！

lihongju

急，还请各位老师指教，谢谢！

lihongju

“bbb”页面的源代码：
。。。。。
<input type="button" class="view-btn i-btn" title="查看" onclick="javascript:toview(this,200015087238,'D1')"/>
就是要对进行单击，执行click事件。