麻烦用vbs写一段获取某个ie句柄或者是当前网页的URL

<script Language="vbscript">
dim url
function geturl()
url=windowlocationhref
documentgetElementById("ur")innerText=url
end function
</script>
<input type="button" value="获取" onclick="geturl()"> 当前网页地址为：<span id="ur"></span>
下面一段是转帖过来的，应用在VB上，通过取得ie句柄获得ie的url，希望对你有帮助：
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Dim dWinFolder As SHDocVwShellWindows
Set dWinFolder = New SHDocVwShellWindows
Dim objIE1 As SHDocVwInternetExplorer
Dim ActID As Long
Dim myUrl as String
ActID = FindWindow("IEFrame", vbNullString)
For Each objIE1 In dWinFolder
'过滤掉windows资源管理器的窗口
If InStr(1, objIE1FullName, "IEXPLOREEXE", vbTextCompare) <> 0 Then
'是否是当前正在浏览的IE窗口
If objIE1hWnd = ActID Then
'执行程序
myUrl = objIE1LocationURL '取得地址
End If
End If
Next

以上就是关于麻烦用vbs写一段获取某个ie句柄或者是当前网页的URL全部的内容，包括:麻烦用vbs写一段获取某个ie句柄或者是当前网页的URL、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！