我一直在尝试使用
对于每个MyHTML_Element在document.getElementsByTagName(“embed”)中 如果ele.Value =“ZeroClipboard_TableToolsMovie_1”则ele.Click
代码
embed id="ZeroClipboard_TableToolsMovie_1" align="middle" width="43" height="24" wmode="transparent" flashvars="id=1&width=43&height=24" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" allowfullscreen="false" allowscriptaccess="always" name="ZeroClipboard_TableToolsMovie_1" bgcolor="#ffffff" quality="best" menu="false" loop="false" src="/javascript/fc-andon-svc/copy_csv_xls_pdf.swf"
答案 0 :(得分:0)
试试这个:
Dim element As Object
Set element = objIE.Document.getElementById("ZeroClipboard_TableToolsMovie_1")
If Not element Is Nothing Then
element.Click
End if
Set element = Nothing