Question

我有一个代码在Excel VBA中运行得非常好但是当我在VBscript中尝试相同时，它在IE 11上寻找帧时出错了。名称值 Microsoft VBScript运行时错误：对象不支持此属性或方法：'ieobjbtn.GetElementsByTagName'

Dim objLink, ieobjbtn1, ieobjbtn
Set objCollection = objIE.Document.frames
Set ieobjbtn = objCollection("toolbar").Document.GetElementsByTagName("a")     
'Script is giving mentioned error here
For Each objLink In ieobjbtn
    If InStr(objLink.innerHTML, "xxxxx.gif") > 0 Then
        objLink.Click
        Wait_Webpage
        Exit For
    End If
Next

Answer 1

在标准DOM中，该函数被称为Set objCollection = objIE.Document.frames Set ieobjbtn = objCollection("toolbar").document.getElementsByTagName("a") - 请注意开头的小写<template name="layout"> <div class="container"> {{> header}} <div id="main"> {{> yield}} </div> </div> </template>。

如果旧的IE版本支持不区分大小写，因为在VBScript中这是正常的，但是新版本已经撤消了该功能，我不会感到惊讶。这些天很少在IE中使用VBScript，并且完全放弃在Windows 10版本的IE中。

＆＃39;＆＃39;更新：＆＃39;＆＃39;

更正后的版本是：

<template name="header">
  <nav class="navbar navbar-default" role="navigation">
    <div class="navbar-header">
      <button type="button" class="navbar-toggle collapsed"     data-toggle="collapse" data-target="#navigation">
        <span class="sr-only">Toggle navigation</span>
        <span class="icon-bar"></span>
        <span class="icon-bar"></span>
        <span class="icon-bar"></span>
      </button>
      <a class="navbar-brand" href="{{pathFor     'postsList'}}">Microscope</a>
    </div>
    <div class="collapse navbar-collapse" id="navigation">
      <ul class="nav navbar-nav">
        {{#if currentUser}}<li><a href="{{pathFor 'postSubmit'}}">Submit     Post</a></li>{{/if}}
      </ul>
      <ul class="nav navbar-nav navbar-right">
        {{> loginButtons}}
      </ul>
    </div>
  </nav>
</template>

VBScript没有在IE11上工作，它有帧

1 个答案: