我正在处理自动Web表单填充,但是当我的代码不在我要填充数据的网页上工作时卡住了。
但是目前我的代码正在其他网站上运行。我不知道为什么它在那里不起作用。我正在执行的操作是在LF服务器上运行。
Public Sub Getdata()
Dim ie As Object
Dim doc As HTMLDocument
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate "http://eforms.company_name.com/lfserver/E2844_Proposal_Summary" '(example URL)
Do
DoEvents
Loop Until ie.ReadyState = 4
ie.document.getElementById("bid_manager_name").Value = "samplename"
ie.document.getElementById("bid_manager_id").Value = "sampleid"
End Sub
When I am changing my id - "bid_manager_name" - image2
我将无法共享我实际工作所在的内部链接。但是任何猜测都是有帮助的,以及为什么它不起作用。如果您需要任何网络方面的信息(html),请问我,我会尽力为您提供。预先感谢。
<input name="bid_manager_name" tabindex="43" title="Bid Manager name" class="transparentTxtEntry" id="bid_manager_name" style="margin: 0in; border: 1px solid rgb(177, 177, 177); left: 237%; top: 122%; width: 335%; height: 20%; text-align: left; color: rgb(0, 0, 0); line-height: 1.11; font-family: Arial; font-size: 100%; visibility: visible; position: absolute; z-index: 29; background-color: rgb(216, 216, 216);" type="text" value="">