如何在网页上input用户名和密码？

Q1）如何在此网页上input密码和用户名“ https：//.com/1/19/login.esp ”？

我写了代码来访问网页：

Sub login() Dim IE As Object Const navOpenInNewTab = &H800 Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True IE.Navigate "https://esp" End Sub 

Q2）我应该用什么createobject来访问谷歌浏览器？

Thnx提前

Answer 1

 Sub login() Dim IE As Object Dim HTMLDoc As Object Dim objCollection As Object Const navOpenInNewTab = &H800 Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True IE.Navigate "https://ogin.esp" Do While IE.Busy Or IE.ReadyState <> 4: Loop Set HTMLDoc = IE.document With HTMLDoc HTMLDoc.getElementById("USERNAME").Value = "yyyy" HTMLDoc.getElementById("PASSWORD").Value = "xxxxx" End With Set objCollection = IE.document.getElementById("loginbutton") objCollection.Click End Sub 

这个代码工作….

Answer 2

要查找网页上的项目以通过VBA进行select，您需要按F12键进入网页上的开发人员工具。

一旦进入，您可以通过“进入”页面上的代码并select希望VABselect的项目来find要调用的元素。

这是如何做到的：

然后select用户名框：

select此框后，开发者框中的代码将被突出显示，告诉您链接到您按下的项目的代码是什么。

这里是现在突出显示的用户名框的代码：

我们有三个选项来select页面上的项目：

• IE.document.getElementById（在代码中findID =，这里id ='USERNAME'）
• IE.document.getElementsByName（在代码中findName =，这里name ='USERNAME'）
• IE.document.getElementsByclassname（在代码中findclass =在这种情况下，class ='focus'）

*注意：尽量先使用ID，然后名称，然后上课，因为只有1个元素在页面上会有1个ID，但多个项目可以有相同的名称或类，或者保证工作，如果你有正确的ID。

 Dim IE As Object ' InternetExplorer.Application Dim UserN As Object 'username field Dim PW As Object 'password field Dim LoginButton As Object 'Login button 'enter username and password in textboxes Set UserN = IE.document.getElementByID("USERNAME") 'fill in first element named "username", assumed to be the login name field UserN(0).Value = "" Set PW = IE.document.getElementsByName("PASSWORD") 'fill in first element named "password", assumed to be the password field PW(0).Value = "" 

然后你需要在页面上find这个botton，然后点击它。 这是一些代码：

 'After entering in the user/pass, we need to click the button. Dim objCollection As Object Set objCollection = IE.document.getElementById("loginbutton") objCollection.Click 

有更多的信息在那里和更多的代码如何正确使用每个select方法，所以这只是准备开始的准系统。 search“VBA IE自动化”将为您提供一些很好的结果。