Tag: internet explorer

屏幕抓取到数据表的C＃解决scheme？: 我有一个Excel转换为C＃的macros。目前我手动去一个已经打开的IE窗口，从它（HTML表）复制一切粘贴到Excel工作表。然后我操纵数据。这工作得很好，因为粘贴到Excel的HTML表格工作正常！我想在c＃中做同样的事情，没有excel。我需要：从IE窗口获取数据阅读到一个数据表（以类似的方式，如果我复制和粘贴到Excel表格的HTML表）你知道这是否容易做到？ IE窗口的TITLE将始终保持不变。

VBA – Excel – 自动化错误未指定错误: 所以我遇到了一个轻微的绊脚石，希望在这里有人可以帮助我。总之，我需要访问一串网页（每个网页上的名称列表已经input，该代码工作正常）。当我的代码访问每个页面时，我需要撤回信息。不幸的是，出现了一个问题 – 在我得到“自动化错误未指定的错误”之前，甚至无法通过“A”列表，并且它永远不会在同一个位置。我已经尝试了“正常”的步骤来解决这个问题。我已经安装了VB 6控件，并且我已经注销并重新注册了mscomctl.ocx，并且包括On Error Resume Next（它什么都不做）。它在死亡之前通常达到100多例（如前所述，是随机的）。之后popup错误，当我尝试重新运行它（有或没有更改），并在第一个错误。如果我重新启动计算机，它会让我再次尝试（无论什么原因），但它仍然没有完成。代码是否太复杂，我需要减less它？我可能会find一种方法，使它只能运行每个字母（运行所有的A，然后做B的等），但我仍然无法完成字母A. 我注意到在另一个线程有人build议，而不是使用IE浏览器交换到xmlhttp – 这是一个修复？这个剧本太长了吗？我在这里做错了什么？ Sub Lookup() Range("AI1").Value = "Unique ID" Range("AJ1").Value = "Name" Range("AK1").Value = "Birth Year" Range("AL1").Value = "Title" Range("AM1").Value = "State" Range("AN1").Value = "Position" Range("AO1").Value = "Country" Range("AP1").Value = "Appointed" Range("AQ1").Value = "Credentials" Range("AR1").Value = […]

Internet Explorer文件下载Excel文件的文件名: 我有一个定制的应用程序，从networking下载一个Excel文件 Excel文件在工作簿打开事件中有一个macros。我注意到，如果我把下面的代码放在事件中 MsgBox Application.ThisWorkbook.Name 我可以看到，当从Internet Explorer 8打开文件"PWABCD.XLS" ，消息框显示"PWABCD(1).XLS" 。当从Internet Explorer 10完成相同的操作时，消息框显示"PWABCD.XLS" 。文件下载名称应该有（1）插入的设置在哪里？还是有一些其他的冲突，导致（1）被插入到文件名？我inheritance了逻辑，假设（1）将在那里并将其删除 – 而不是修改代码来检查（1）是否存在，是否有用户可以修改的设置？非常感谢

在Excel VBA中处理InternetExplorer对象事件: 我想在我的Excel VBA代码中处理对象InternetExplorer的事件。在此页面上，您可以看到InternetExplorer对象的所有可用事件： http : //msdn.microsoft.com/zh-cn/ie/aa752084(v=vs.94).aspx Dim ie As InternetExplorer Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True ie.Navigate "http://www.google.com" While ie.Busy DoEvents Wend Set mybrowser = Nothing 我想捕捉一个BeforeNavigate和一个NavigateComplete事件，上面的代码应该触发。我将如何设置我的代码来做到这一点？

在现有IE上优秀VBA新的URL: 我是相当新的VBA，并试图获得一个现有的打开的IE窗口通过（IE.navigate）加载一个新的URL，但似乎并没有工作。我的代码在工作表中运行一个button，点击后将加载到网站，简单的东西 Private Sub Sendit_Click() Dim IE As Object Set IE = CreateObject("Internetexplorer.Application") IE.Visible = True IE.navigate "https://www.yahoo.com" Do Loop Until IE.ReadyState = READYSTATE_COMPLETE GetIE Err_Clear: If Err <> 0 Then Err.Clear Resume Next End If End Sub 然后这些代码在我的模块 Function GetIE() Dim shellWins As ShellWindows Dim IE As InternetExplorer Set shellWins = New ShellWindows If […]

Excel VBA无法点击网页上的button: 我已经做了很多与Excel的Internet Explorer自动化，但这让我难住。我有一个页面，带有代码的button： – <a class="button button-bg multi-search-add">add</a> 我需要点击这个button来input一个pincode数据到表单中，但我无法做到这一点我试过了 Dim objButtonAll As Object Dim objButton As Object Set objButtonAll = ie.document.getElementsByTagName("a") For Each objButton In objButtonAll If objButton.className = "button button-bg multi-search-add" Then objButton.Click End If Next 我也试过了 Dim objButtonAll As Object Dim objButton As Object Set objButtonAll = ie.document.getElementsByTagName("a") For Each objButton In […]

IE自动化 – Excel VBA …加载网站后出现错误: 我已经将VBA编程为与IE进行了相当广泛的交互，并且已经开始这样做了，但是我遇到了一个奇怪的现象，我无法用我所做的所有研究来解决这个问题。只要我加载的网站，我失去了InternetExplorer Application所有参考，并不能再与对象工作。当我检查站点被完全加载，我得到一个Run-Time Error 424 Object Required ，或Run-time error '-2147023179 (…)': Automation Error The interface is Unknown 如果我移动过这一行（同时看到站点完全加载）并运行Set doc …行，我得到Run-Time Error 462: The remote server machine does not exist or is unavailable 。我正在使用IE 11和Excel 2010.我有Microsoft Internet控件和MicrosoftHTML对象库的VBAProject引用，但错误也发生在后期绑定以及。 Sub LoginToFXAll() Dim ieApp As InternetExplorer Set ieApp = New InternetExplorer With ieApp .Visible = True .Navigate […]

VBA-Excel：在IE窗口中填写表单: 我希望有人能帮助。我正在努力加快填充networking表格的过程，这个表格必须用excel中存储的信息完成几十或几百次。要做到这一点，我需要一个button来打开一个IE窗口，并导航到某个网站的login页面（我已经弄清楚了这一点）。用户可以login并导航到需要填写的表单。然后，我希望用户能够返回到Excel页面，点击另一个button，这将自动填充几个下拉菜单和文本框。在Excel中，我已经有了一些代码来允许用户search需要转到表单的特定信息，所以他们只需点击button即可转移。代码的第一位是这样的： Public IE As Object Public Sub OpenIE() Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True IE.Navigate "loginpage url" End Sub 然而，在我遇到麻烦的情况下，一旦用户login并导航到窗体，具有不同的function访问相同的IE窗口。现在我已经得到了这个： Sub FillMacro() Dim sh As Object, oWin As Object Set sh = CreateObject("Shell.Application") For Each oWin In sh.Windows If TypeName(oWin.document) = "HTMLDocument" Then Set IE = oWin […]

ExtJs4从IE中生成一个Excel文件让我感到：“传递给系统调用的数据区太小”: 我已经为ExtJs 4实现了这个UX（它从ExtJs 4网格或商店生成一个Excel文件） Generate an Excel File from an Ext JS 4 Grid or Store! 并在Chrome中完美工作，但我不断收到这个错误“传递给系统调用的数据区域太小”在任何版本的IE 这里是代码的片段，似乎是问题，完整的代码在上面的链接。 var el = Ext.DomHelper.append(gridEl, { tag: "a", download: title + "-" + Ext.Date.format(new Date(), 'Ymd Hi') + '.xls', //download: 'descarga.xls', href: location }); el.click(); //this line seems to be causing the error Ext.fly(el).destroy(); } 我知道有downlodify和其他选项（如服务器端生成），但他们不是在这一点上我的select。有没有可能让这个UX在IE中工作？任何人都可以指向正确的方向吗？谢谢。

处理缺乏互联网连接: 我正在创build简单的代码到网站，点击loginbutton，inputlogin信息等等，然后下载数据。我知道这不是一个推荐的方法，但使用'Microsoft.XMLHTTP'，我'GET'的URL没有帮助，因为我最终达到的页面的URL，login后，有一个唯一的身份validation令牌生成。例如昨天URL = www.abcd.com/ABCD-EFGH-IJKL，今天是= www.abcd.com/MNOP-QRST-UVWX，所以我没有一个设置的URL。因此，使用“InternetExplorer.Application”方法，我试图处理与互联网的断开连接。从互联网断开，不会产生错误，但只是一个空白页面，所以我不能使用“On Error GoTo LineX”。我如何去处理代码中的断开连接，例如： Dim IE as Object Set IE = CreateObject (InternetExplorer.Application") IE.navigate "www.abcd.com" If 'some sort of status response' = 'some value' Then Msgbox 'You are disconnected from the internet' Else End If 是否有状态响应康德（因为有“Microsoft.XMPHTTP”），我可以用它来通知msgbox用户“请连接到互联网等等”？谢谢。