vba - vba 在 Chrome 中打开 URL,包括登录名和密码
问题描述
我想在 chrome 中打开一个 url 并提供登录 ID 和密码。我当前的 IE 代码如下所示。从其他帖子中,我看到 Chrome 可以通过基本的 shell 命令打开。有没有办法将登录 ID 和密码作为 shell 命令的一部分传递?如果不是,完成此操作的代码应该是什么样的?提前致谢!
Public Sub WeltokLogin()
'REFERENCES: MS Internet Controls, and MS HTML Object Library (No longer working in Windows 10)
On Error Resume Next
Const URL$ = "https://.../human.aspx"
Exit Sub
Dim UserName As String, Password As String
Dim htmlEle As IHTMLElement
Dim i As Integer
i = 1
UserName = "myloginID"
Password = "mypassword"
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
Dim AllLinks As Object
Dim Hyperlink As Object
With IE
.navigate URL
ieBusy IE
.Visible = True
Dim oLogin As Object, oPassword As Object
Set oLogin = .document.getElementsByName("Username")(0)
Set oPassword = .document.getElementsByName("Password")(0)
oLogin.Value = UserName
oPassword.Value = Password
.document.forms(0).submit
'Loop Until ie.ReadyState = 4
Exit Sub
Set AllLinks = IE.document.getElementsByTagName("div")(0)
For Each Hyperlink In AllLinks
If InStr(1, Hyperlink.innerText, "Folders") > 0 Then
Hyperlink.Click
Exit For
End If
Next Hyperlink
Stop
解决方案
推荐阅读
- reactjs - 按字母顺序对状态中的项目进行排序
- javascript - 为什么在下面的代码中 useEffect 钩子使用花括号,但没有 return 语句,它仍然有效?
- flutter - Flutter:为什么我在使用斩波器的 api 调用中只得到 3 个结果?
- python - df 到 sql server 替换
- html - 如何在没有引导程序的情况下实现表格标签中文本的垂直对齐
- python - 音乐和弦名称的python正则表达式
- c - 编写参考运算符的汇编版本时出现分段错误
- rust - 如何无损地将子进程的退出代码传播为我自己程序的退出代码
- reactjs - 目前我正在研究 React(前端部分),我有书签文件夹列表,用户可以从上面的列表中选择一个或多个书签文件
- reactjs - react-redux 状态始终相同且不链接