Option Explicit Dim OBJ_FSO Dim OBJ_Browser Dim STR_ProgramName Set OBJ_FSO = CreateObject("Scripting.FileSystemObject") For Each OBJ_Browser In CreateObject("Shell.Application").Windows STR_ProgramName = OBJ_FSO.GetFileName(OBJ_Browser.FullName) If LCase(STR_ProgramName) = "iexplore.exe" Then WScript.Echo OBJ_Browser.LocationURL End If Next
Scriptのダウンロードは こちら です。
joker123 slot terbaru says:
joker123 slot terbaru
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 00:20mega888 Free credit rm10 says:
mega888 Free credit rm10
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 01:03scr888 ios says:
scr888 ios
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 02:03sbobet88899 says:
sbobet88899
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 02:16wukong Game slot says:
wukong Game slot
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 04:35online casino no deposit bonus no download instant play says:
online casino no deposit bonus no download instant play
【WSH】起動中のIEを取得し、開いているURLを表示する | Dragon-Ark
2021/01/16, 08:09