Question

我正在为Excel编写VBA宏来从网站中提取和打印一些数据，这项工作几乎已经完成。然而，javascript函数有一个可扩展的“链接”，我需要在很多页面中进行扩展，但到目前为止我所做的一切都失败了。

该功能的代码是：

<script type="text/javascript" id="show"><!--/*--><![CDATA[/*><!--*/
function show(link, idTable, prefIdRows) {
  var image = link.getElementsByTagName('img')[0];
  image.src = (image.src.indexOf('/plus-p.gif') >= 0) ? 'images/minus-p.gif' : 'images/plus-p.gif';
  var table = document.getElementById(idTable);
  var elements = table.getElementsByTagName('tr');
  for (var i = 0; i < elements.length; i++) {
    var element = elements[i];
    if (element.id.indexOf(prefIdRows, 0) == 0) {
      if (element.style.display == 'none') {
         element.style.display = '';
      } else {
        element.style.display = 'none';
      }
    }
  }
}

链接代码为：

<a href="#" onClick="show(this, 'result','m0-'); return false;">
<img align="left" src="images/plus-p.gif" alt="Show" style="cursor:pointer;">
</a>

我已经通过标签，类名，调用execscript尝试了getelements，似乎没有任何工作（我刮掉了所有不起作用的东西，所以我没有任何代码来揭示我做错了什么，我的坏）。

有一种简单的方法吗？我几乎不知道任何JavaScript，所以我可能会尝试错误的元素。

VBA与网站互动

0 个答案: