如果链接被点击两次,则权限被拒绝错误

时间:2017-05-02 14:25:09

标签: vba excel-vba internet-explorer excel

我循环遍历元素列表(选择,单击链接,另存为)。由于某种原因,当单击链接时 - 保存为对话框并不总是出现(无论是以编程方式还是通过鼠标手动单击)。因此,有时必须单击链接两次。现在问题是 - 如果我循环遍历元素并单击链接一次,代码进展顺利,但并非所有文件都保存。但是,如果我运行一个单击链接两次的代码,我会得到Permission Denied(70)错误。我见过ppl在这里经常遇到这个错误。你有什么建议吗?

在下面的代码中,这是感兴趣的条件的一部分,只需单击一次(+应用程序等待),代码工作正常。如果没有注释2行,则会出错。

                Else
                    Set l = IE.Document.getElementsByTagName("a") 'getElementsByClassName("MainContent") '.getElementsByTagName("a") '.getelementbyid("ctl00_MainContent_ValidationSummary1")
                        For Each el In l
                            If el.innerText = "View Bill" Then
                            el.Click
'                            Application.Wait (Now + TimeValue("0:00:03"))
'                            el.Click
                            Application.Wait (Now + TimeValue("0:00:05"))
                            Exit For
                            'IE.Document.parentWindow.execScript "submitTransForm()", JavaScript
                            Else
                            End If
                        Next el
                End If

0 个答案:

没有答案