從excel vba寫入IE

我想輸入一些文本到IE中。我使用Chrome瀏覽器檢查元素得到id跟蹤輸入和獲取：從excel vba寫入IE

這裏是我的代碼：

Set objIE = CreateObject("InternetExplorer.application") 

objIE.Visible = True 
objIE.Navigate ("http://customerservice.ciena.com/BidRegister/Search.aspx") 

Do 
DoEvents 
Loop Until objIE.ReadyState = 4 

For Each element In objIE.Document.getElementsByTagName("input") 
    Debug.Print element.ID 
    If element.Type = "Text" And element.ID = "ctl00_P1_ucSearchFilter_txtBidNumber" Then 
    element.Value = "LA-2013-0233" 
    End If 

Next element

的問題是，我無法找到該ID不再使用debug.print。任何人都可以告訴我一個不同的方式來寫我的輸入？

來源

2015-09-15 Federico Sanchez

你可以發佈該'Input'字段的源代碼嗎？ – ManishChristian

我不熟悉這種編碼，告訴我我應該找什麼，我會發布它。這是否有幫助：

Bid #:

–

您使用的ID是'ctl00_P1_ucSearchFilter_txtBidNumber'，並且基於我從源代碼中瞭解的內容，您需要使用'ctl00_Header1_txtQuickSearch'。試着改變它。 – ManishChristian

我想這一個工作：

For Each elemento In objIE.Document.getElementsByTagName("input") 
    If elemento.Name = "ctl00$Header1$txtQuickSearch" Then 
     elemento.Value = "LA-2013-0233" 
     Exit For 
    End If 
Next elemento

的感謝！

來源

2015-09-15 15:12:16

從excel vba寫入IE

回答

相關問題