日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 前端技术 > HTML >内容正文

HTML

AutoHotkey纯命令获取Chrome等浏览器的当前网址

發布時間:2024/4/17 HTML 48 豆豆
生活随笔 收集整理的這篇文章主要介紹了 AutoHotkey纯命令获取Chrome等浏览器的当前网址 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

網上大部分都是模擬手工操作(激活地址欄并復制)的方式獲取,從論壇里找到了純命令的方式,并已轉成AutoHotkey v2版本。

是通過瀏覽器的class類來獲取的,相信用AutoHotkey的人對此不陌生

來源:https://www.autohotkey.com/boards/viewtopic.php?f=6&t=3702

hyf_getUrlFromBrowser(cls:="Chrome_WidgetWin_1") {reg := "i)^(Chrome_WidgetWin_1|ApplicationFrameWindow|Chrome_WidgetWin_0|Maxthon3Cls_MainFrm|MozillaWindowClass|Slimjet_WidgetWin_1)$"if (cls ~= reg)return hyf_getUrlByACC(cls)elsereturn hyf_getUrlByDDE(cls){ ;通過Surfingkeys獲取網址,通過剪切板傳輸clipboard := ""send("{alt down}c{alt up}")ClipWait(1)u := clipboard}return u }; https://www.autohotkey.com/boards/viewtopic.php?f=6&t=3702 hyf_getUrlByACC(cls:="Chrome_WidgetWin_1") {accAddressBar := GetAddressBar(Acc_ObjectFromWindow(WinGetID("ahk_class " . cls), 0))TrysURL := accAddressBar.accValue(0)If !strlen(sURL) ;Chrome可能用不到{arrWin := WinGetList("ahk_class " . cls) ; In case of a nested browser window as in the old CoolNovo (TO DO: check if still needed)If (arrWin.length() > 1){accAddressBar := GetAddressBar(Acc_ObjectFromWindow(arrWin[2], 0))TrysURL := accAddressBar.accValue(0)}}If ((sURL != "") && (substr(sURL,1,4) != "http")) ; Modern browsers omit "http://"sURL := "http://" . sURLReturn sURLGetAddressBar(accObj){if !IsObject(accObj)returnIf (accObj.accRole(0) = 42){if (accObj.accValue(0).isUrl() || ("http://" . accObj.accValue(0)).isUrl())Return accObj}else{Try{For _, accChild in Acc_Children(accObj){accAddressBar := func(A_ThisFunc).call(accChild)If IsObject(accAddressBar)Return accAddressBar}}}} }hyf_getUrlByDDE(cls) {sServer := WinGetProcessName("ahk_class " . cls)sSearch := substr(sSearch, 1, strlen(sSearch)-4)iCodePage := 0x04B0 ; 0x04B0 = CP_WINUNICODE, 0x03EC = CP_WINANSIdllcall("DdeInitialize", "uptrp",idInst, "uint",0, "uint",0, "uint",0)hServer := dllcall("DdeCreateStringHandle", "uptr",idInst, "str",sServer, "int",iCodePage)hTopic := dllcall("DdeCreateStringHandle", "uptr",idInst, "str","WWW_GetWindowInfo", "int",iCodePage)hItem := dllcall("DdeCreateStringHandle", "uptr",idInst, "str","0xFFFFFFFF", "int",iCodePage)hConv := dllcall("DdeConnect", "uptr",idInst, "uptr",hServer, "uptr",hTopic, "uint",0)hData := dllcall("DdeClientTransaction", "uint",0, "uint",0, "uptr",hConv, "uptr",hItem, "uint",1, "uint",0x20B0, "uint",10000, "UPtrP",nResult) ; 0x20B0 = XTYP_REQUEST, 10000 = 10s timeoutsData := dllcall("DdeAccessData", "uint",hData, "uint",0, "str")dllcall("DdeFreeStringHandle", "uptr",idInst, "uptr",hServer)dllcall("DdeFreeStringHandle", "uptr",idInst, "uptr",hTopic)dllcall("DdeFreeStringHandle", "uptr",idInst, "uptr",hItem)dllcall("DdeUnaccessData", "uptr",hData)dllcall("DdeFreeDataHandle", "uptr",hData)dllcall("DdeDisconnect", "uptr",hConv)dllcall("DdeUninitialize", "uptr",idInst)csvWindowInfo := StrGet(&sData, "CP0")return StrSplit(csvWindowInfo, '"')[2] }

  

轉載于:https://www.cnblogs.com/hyaray/p/11212846.html

與50位技術專家面對面20年技術見證,附贈技術全景圖

總結

以上是生活随笔為你收集整理的AutoHotkey纯命令获取Chrome等浏览器的当前网址的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。