macrosIE控制
不幸的是,我的父母根本不熟悉使用电脑,而我已经搬到另一个城市,所以我不能直接帮助他们。 他们需要每个月login到他们的电话服务提供商,并打印出到期的发票。 我试图通过“只需点击一个button”来执行所有这些操作。
所以我的代码到目前为止:
Private Sub CommandButton1_Click() Set objIE = CreateObject("InternetExplorer.Application") objIE.Top = 0 objIE.Left = 0 objIE.Width = 1027 objIE.Height = 768 objIE.AddressBar = 0 objIE.StatusBar = 0 objIE.Toolbar = 0 objIE.Visible = True objIE.Navigate ("https://login.example.com") Do DoEvents Loop Until objIE.ReadyState = 4 SendKeys "{ENTER}" 'security pop up, press enter Do DoEvents Loop Until objIE.ReadyState = 4 'write in login name and password objIE.document.GetElementByID("f_name_1").Value = "abababa" objIE.document.GetElementByID("password").Value = "cdc999" 'press enter, log in SendKeys "{ENTER}" Do DoEvents Loop Until objIE.ReadyState = 4 'and here I stuck End Sub
但是有一次我被卡住了。 不幸的是,在login网站时,导航button的代码如下所示:
<a class="cufon_w" id="tempID" href="fakt.do">
我试着用:
objIE.document.GetElementByID("tempID").Click
和:
objIE.document.GetElementByClassName("cufon_w").Click
但它并不适用于其中任何一个(我假设tempID,但无论如何尝试)。
有没有人试过类似的东西,或知道任何解决scheme?