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。 正在下载页面时可能会生成链接。