易语言如何获取当前浏览器的网址并判断网址跳转

程序集变量 IHTMLDocument2, 对象

IHTMLDocument2 ＝ 超文本浏览框1取文档对象 ()

url ＝ IHTMLDocument2读文本属性 (“url”, )'这样可以获取到地址

第一个是获取内网MAC地址，第二个获取内网IP地址

代码:

@echo off&setlocal enabledelayedexpansion

for /f "delims=" %%a in ('ipconfig/all') do call:a "%%a"

for /f "tokens=2 delims=:" %%a in ('ipconfig /all^|find "Physical Address"') do set MAC=%%a

ipconfig /all>"%temp%\ipListtxt"

for /f "tokens=1 delims=:" %%a in ('findstr /n "Ethernet adapter" "%temp%\ipListtxt"') do (

set SkipRow=%%a

goto :DoSkip

)

:DoSkip

for /f "usebackq skip=%SkipRow% tokens=1,15" %%a in ("%temp%\ipListtxt") do (

if "%%a" equ "IP" (

set IP=%%b

goto :ShowResult

)

)

:ShowResult

echo;%ip%：%e%

pause

:a

set "a=%~1"

if defined a if not "!a:~0,1!"==" " set "b=!a:~0,1!"

for /f "tokens=1,2 delims=: " %%b in ("%~1") do if /i "%%b %%c"=="Physical Address" set %b%=%%d

在窗口程序中点击“按钮1”，会生成子程序名为“_按钮1_被单击”，在下面开始编写代码，其实“取IP地址 ()”是易中的核心支持库提供的程序：

标签1标题 ＝ 取IP地址 ()

然后运行程序上方工具栏中的右三角形按钮，如果没有在调试运行程序，那么应该是黑色的，但是此时已经开始了调试。调试运行了一下看是否能取到，如图中，一切正常，能取到本机IP。

以上就是关于易语言如何获取当前浏览器的网址并判断网址跳转全部的内容，包括:易语言如何获取当前浏览器的网址并判断网址跳转、易语言怎样通过内网IP获取其MAC地址。、易语言怎么获取IP和IP端口号等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！