如何获取Google Chrome浏览器最前面页面地址栏内容

aman1516 · 发表于 2023-2-7 20:58

如题如图：

aman1516 · 发表于 2023-2-7 22:06

IE.LocationUR
WebBrowser1.LocationURL
都可获取对应地址栏的内容，
关键是如何获取打开的 Google Chrome 当前页面对象
或如何获取浏览器的窗口句柄

lss001 · 发表于 2023-2-8 09:53

本帖最后由 lss001 于 2023-2-8 14:10 编辑

参考楼下附件……

ivccav · 发表于 2023-2-8 10:36

aman1516 发表于 2023-2-7 22:06
IE.LocationUR
WebBrowser1.LocationURL
都可获取对应地址栏的内容，

句柄可以用如下试试：

aman1516 · 发表于 2023-2-8 13:45

ivccav 发表于 2023-2-8 10:36
句柄可以用如下试试：

获取窗口句柄和名称是没问题，但就是不知怎样获取 Google Chrome 地址栏的URL

aman1516 · 发表于 2023-2-8 13:47

lss001 发表于 2023-2-8 09:53
Private Type UUID
Data1 As Long
Data2 As Integer

无任何提示，GetChromeUrl值为空，未能获取

aman1516 · 发表于 2023-2-8 13:54

本帖最后由 aman1516 于 2023-2-8 14:01 编辑

网上说 Chrome不再使用Chrome_OmniboxView，不知是否
所以用发送信息再回调 url 的方法也不行
   URL_hWnd = FindWindowEx(Web_hWnd, 0, "Chrome_OmniboxView", vbNullString)
   Call SendMessage(Web_hWnd, WM_GETTEXT, 256, ByVal Web_Caption)
   Call SendMessage(URL_hWnd, WM_GETTEXT, 256, ByVal url)

应该与版本无关吧
QQ截图20230208135856.jpg

lss001 · 发表于 2023-2-8 14:04

本帖最后由 lss001 于 2023-2-8 14:20 编辑

aman1516 发表于 2023-2-8 13:54
网上说 Chrome不再使用Chrome_OmniboxView，不知是否
所以用发送信息再回调 url 的方法也不行
URL_h ...

测试使用Edge浏览器
参考附件

Documents.rar (22.41 KB, 下载次数: 9)

游乐缘 · 发表于 2023-2-8 14:05

mark一下，留名学习

ivccav · 发表于 2023-2-8 14:19

aman1516 发表于 2023-2-8 13:45
获取窗口句柄和名称是没问题，但就是不知怎样获取 Google Chrome 地址栏的URL

获取Chrome地址栏.zip (27.11 KB, 下载次数: 12)

		自动登录	找回密码
密码			免费注册

[求助] 如何获取Google Chrome浏览器最前面页面地址栏内容