VBA:如何在HREF和CLASS HTML标签的帮助下点击网页中的下拉菜单
我试图自动化一个我的网站工作在一个安全的服务器,这是帮助我login到网页的代码,但之后,我不得不单击菜单栏的HTML标签可用的类是只有CLASS和HREF的下拉菜单。
HTML
<li> <a Class = "childmenu" href="./1713363899/ViewLogsPage"> <span>Logs</Span> </a> </li>
我的VBA代码的一部分是
Dim MyHTML_Element as IHTMLElement Set HTMLDoc = MyBrowser.document For Each MyHTML_Element In HTMLDoc.getElementsByClassName ("childmenu") If MyHTML_Element.href = "./1713363899/ViewLogsPage" Then MyHTML_Element.Click: Exit For Next
但是这个代码不工作,并跳过执行这一行后….. ….. ClassName(“childmenu”)“并跳转到END子,当我在debugging模式下运行我的代码。
尝试
If Instr(MyHTML_Element.href, "1713363899/ViewLogsPage") Then MyHTML_Element.Click
如果不行的话,在添加If之前添加debug.print MyHTML_Element.href。 正在下载页面时可能会生成链接。