VBA / Automate IE - 如何单击链接（使用var点击事件）

Question

我在编码方面很开心......

我正在尝试在VBA中自动化我的IE并点击网页上的下载链接，但它无法正常工作。

页码：

 < a onclick="var dl_var = find_control('download'); dl_var.value = '1'; 
 submitFormByPost(dl_var.form); dl_var.value = ''; return false;"
 href="#"></a>

我试过用： VBA：

Dim CurrentWindow As HTMLWindowProxy 
Set CurrentWindow = ie.Document.parentWindow 
Call CurrentWindow.execScript("var dl_var = find_control('download')")
Application.SendKeys "{ENTER}", True

但是，它仍然没有用。

这很奇怪，因为它在以下情况下完美运行：

页码：

< a href="#" onclick="spr_command('plot_graph'); return false;">Graph</a>

VBA：

Dim CurrentWindow As HTMLWindowProxy 
Set CurrentWindow = ie.Document.parentWindow
Call CurrentWindow.execScript("spr_command('plot_graph')")

点击后我想使用sendkeys Enter，但它不能正常工作。

提前致谢！

拜托，帮助我！