html内容
<TABLE cellSpacing=0 cellPadding=0 width="100%" bgColor=#405978 border=0>
<TBODY>
<TR>
<TD width=3><IMG height=36 src="http://xxx/111.gif" width=3></TD>
<TD width=36 bgColor=#fff95b height=36><IMG height=36 src="http://xxx/222.gif" width=36></TD>
<TD width=21><IMG height=36 src="333.gif" width=21></TD>
<TD>这个是框架中的内容
那么我使用
Dim vDoc, vTag
Dim I As Integer
Set vDoc = Form1.Web1.Document.frames(2).Document
For I = 0 To (vDoc.All.Length - 1)
If UCase(vDoc.All(I).tagName) = "IMG" Then
Set vTag = vDoc.All(I)
If vTag.src = "http://xxx/111.gif" Then
vTag.Click
End If
End If
Next这样不可以点击。。调试过。到了If vTag.src = "http://xxx/111.gif" Then 这个判断就不会正确。郁闷
其他的A href DIV的都可以。框架中的其他内容都可以。或者是有ID或者其他的。
请高手看看。改怎么做。因为他也没INput 所以没发点。

解决方案 »

  1.   

    不好意思。html也页代码给错了
    是这个
    <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                  <TR>
                    <TD align=right width=94><IMG 
                      style="PADDING-RIGHT: 5px; CURSOR: hand" onclick=Go(); 
                      height=28 src="tupian/06.gif" width=64></TD>
                    <TD><IMG height=28 src="tupian/01.gif" width=64></TD>
                    <TD><IMG style="CURSOR: hand" onclick=goOut(); height=28 
                      src="tupian/03.gif" width=64></TD>
                    <TD width=12> </TD></TR></TBODY></TABLE>
      

  2.   

    先把vTag.src显示出来,看看是否跟你要对比的地方一样。
    如果还是不行。使用instr来查找特征串。
      

  3.   

    我使用tagname(xx)(x).click 这样来点。没办法。找到是第7个。点击就ok了。。其他没办法搞了。