我们正在尝试创建自动登录https://netbanking.hdfcbank.com/netbanking/ 但未能将值传递到文本框
我们尝试使用下面的代码但无法登录,如果有任何正文请建议我做错了会对我有很大的帮助。
Dim HTMLdoc As HTMLDocument
Dim oBrowser As InternetExplorer
Dim oHTML_Element As IHTMLElement
Dim sURL As String
sURL = "https://netbanking.hdfcbank.com/netbanking/"
Set oBrowser = New InternetExplorer
oBrowser.Silent = True
oBrowser.navigate sURL
oBrowser.Visible = True
Do 'Wait till the Browser is loaded...........................
Loop Until oBrowser.readyState = READYSTATE_COMPLETE
Set HTMLdoc = oBrowser.document
Sleep 2000
HTMLdoc.all("fldLoginUserId") = "45095398"
HTMLdoc.all("arcotsubmit").Click
Do 'Wait till the Browser is loaded...........................
Loop Until oBrowser.readyState = READYSTATE_COMPLETE
答案 0 :(得分:0)
页面https://netbanking.hdfcbank.com/netbanking/
是框架集的混合体。甚至登录页面都包含在框架集中。
<FRAME marginwidth="0" marginheight="0" NAME="login_page" SRC="RSLogin.html" NORESIZE="true" scrolling="yes"/>
即使您可以获得登录页面的document
,请注意登录页面是用javascript编写的。客户ID,IPIN和按钮使用javascript填充
document.write('<input type="text" name="fldLoginUserId" maxlength="10" size="10" onkeypress = "return fSubmit(event);" value="" class="input_password"/>');
document.write('<input type="password" name="fldPassword" size="10" onfocus = "javascript:setKeyboardFocus(\'frmLogin\',\'fldPassword\');" value="" />');
现在我不确定您将如何在这些文本框中输入您的信息然后登录。