excel vba自动登录hdfc银行并下载银行对帐单

时间:2013-09-06 05:40:14

标签: vba excel-vba excel

我们正在尝试创建自动登录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

1 个答案:

答案 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="" />');

现在我不确定您将如何在这些文本框中输入您的信息然后登录。

相关问题