Tag: internet explorer 9
使用vba从网上下载excel文件
我有以下代码从网上下载一个特定的文件。 该网页有文件的名称，如果你点击它，你会得到“你想打开或保存…….从……？打开/保存/取消。这是我迄今为止： Dim ie As InternetExplorer Dim html As HTMLDocument Set ie = New InternetExplorer ie.Navigate "http://customerservice.ciena.com/BidRegister/Queue.aspx?REGIONID=3" Set fe1 = html.getElementById("ctl00_P1_rdgFileList_ctl00_ctl00_btnGetFile") fe1.click 在这一点上，我收到popup信息，我正在告诉你以上。 我怎样才能继续我的代码，以避免这popup，并直接将文件保存在给定的位置？ 有没有直接保存文件的代码行？
运行VBA脚本时，在IE中禁用Windows安全证书validationpopup窗口
我有一个VBA代码，访问指定的链接，并获取HTML文本的计算目的使用IE9。 每次访问链接时，都会popup窗口中的“确定”，提示确认安全证书。 我必须多次访问该链接，因此每次单击确定都很麻烦。 有没有办法自动做到这一点，而不是搞乱IE设置？ 这里是一些代码： Set obj = CreateObject("InternetExplorer.Application") obj.Visible = False tempURL = "https://……." obj.Navigate tempURL Application.Wait Now() + TimeValue("0:00:00") ' wait a few seconds Do While obj.Busy = True Application.Wait Now() + TimeValue("0:00:01") DoEvents Loop ' set the document Set item = obj.Document Application.Wait Now() + TimeValue("0:00:01") ' get the document text bodyHTML […]
VBA从Internet Explorer的下拉菜单中select
编辑：我清理了源代码格式并更新了我的VBA代码。 我不再有一个错误，但没有任何事情发生在我的浏览器窗口（没有select，没有任何点击）。 我有一些VBA代码，允许用户在Excel中input信息。 代码将获取这些信息，并生成一个地址到我们内部网上的一个页面。 在该页面上有一个下拉列表来select导出格式，select格式后，用户可以点击导出文件。 我试过的VBA代码（和几个变体）如下： Public Sub window_Open(strLocation As String, Menubar As Boolean, height As Long, width As Long, resizable As Boolean) With CreateObject("InternetExplorer.Application") .Visible = False .height = height .width = width .Menubar = Menubar .Visible = True .resizable = True .Navigate strLocation End With End Sub Private Sub OKButton_Click() Dim ProductionAddress As […]
如何使用VBA excel等待IE9框架加载？
有许多在线资源，说明使用VBA Excel中的Microsoft Internet Explorer控件执行基本的IE自动化任务。 当所讨论的网页有一个基本的结构时，这些工作很好。 但是，当网页包含多个框架时，他们可能很难合作。 目前我有问题确定如果一个网页内的个别框架已完全加载。 例如…这个VBA Excel代码打开IE浏览器，加载一个网页，循环一个Excel表单放置数据到网页字段，执行search，然后返回IE结果数据为Excel（我的道歉为省略站点地址）。 这里蹭的是，目标网页包含两个框架： 1）用于search值input并执行search的searchbar.asp框架 2）显示search结果的searchresults.asp框架 在这个结构中，search栏是静态的，而search结果根据input条件而改变。 由于网页是以这种方式构build的，IEApp.ReadyState和IEApp.Busy不能用于确定IEfr1帧加载完成，因为这些属性在初始search.asp加载后不会更改。 因此，我使用了大量的静态等待时间来避免运行时错误，因为互联网stream量很浪费。 这段代码确实有效，但是速度很慢…记下cmdGO语句后的第10秒钟。 我真的想通过添加坚实的逻辑来确定帧加载进度来提高此过程的性能。 我的问题是这样的 – 有谁知道一个聪明的方式来确定是否一个自主的框架已经完成加载？ 谢谢， 〜Z ' NOTE: you must add a VBA project reference to "Internet Explorer Controls" ' in order for this code to work Dim IEapp As Object Dim IEfr0 As Object Dim IEfr1 As Object […]
