常量數(shù)據(jù)表

.版本 2

.常量 協(xié)議頭, "", , Accept: text/html, application/xhtml+xml, */* Referer: http://地址/userRpm/MenuRpm.htm Accept-Language: zh-CN User-Agent: Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; WOW64; Trident/6.0) Accept-Encoding: gzip, deflate Connection: Keep-Alive DNT: 1 Host: 192.168.1.1 Authorization: Basic 帳號密碼

.常量 獲取ip, "", , var wanPara = new Array\([\s\S]*?"(.*?)", "(\d+\.\d+\.\d+\.\d+)"

TP路由器登錄撥號重啟功能

此功能需要加載精易模塊5.6

.版本 2

.程序集 窗口程序集1

.程序集變量 協(xié)議頭, 文本型

.程序集變量 返回文本, 文本型

.程序集變量 正則, 正則表達(dá)式類

.子程序 _按鈕_登錄_被單擊

協(xié)議頭 ＝ 文本_替換 (#協(xié)議頭, 1, , , “地址”, 編輯框_地址.內(nèi)容, “帳號密碼”, 編碼_BASE64編碼 (到字節(jié)集 (編輯框_帳號.內(nèi)容 ＋ “:” ＋ 編輯框_密碼.內(nèi)容)), , , , , , )

返回文本 ＝ 網(wǎng)頁_訪問S (“http://” ＋ 編輯框_地址.內(nèi)容 ＋ “/userRpm/StatusRpm.htm”, 0, , , , 協(xié)議頭, , , , , )

.判斷開始 (尋找文本 (返回文本, “登錄失敗”, , 假) ≠ -1)

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “登錄失敗。”

返回 ()

.默認(rèn)

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “登錄成功。”

.判斷結(jié)束

正則.創(chuàng)建 (#獲取ip, 返回文本, , )

標(biāo)簽_狀態(tài).標(biāo)題 ＝ 標(biāo)簽_狀態(tài).標(biāo)題 ＋ #換行符 ＋ #換行符 ＋ “MAC 地址：” ＋ 正則.取子匹配文本 (1, 1) ＋ #換行符 ＋ #換行符 ＋ “IP地址：” ＋ 正則.取子匹配文本 (1, 2) ＋ #換行符 ＋ #換行符 ＋ “其他信息可以自己寫正則獲取。”

.子程序 _按鈕_斷開_被單擊

.如果真 (協(xié)議頭 ＝ “”)

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “未登錄”

返回 ()

.如果真結(jié)束

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “”

.判斷開始 (按鈕_斷開.標(biāo)題 ＝ “斷開”)

按鈕_斷開.標(biāo)題 ＝ “連接”

返回文本 ＝ 網(wǎng)頁_訪問S (“http://” ＋ 編輯框_地址.內(nèi)容 ＋ “/userRpm/StatusRpm.htm?Disconnect=斷 線&wan=1”, 0, , , , 協(xié)議頭, , , , , )

正則.創(chuàng)建 (#獲取ip, 返回文本, , )

.默認(rèn)

按鈕_斷開.標(biāo)題 ＝ “斷開”

返回文本 ＝ 網(wǎng)頁_訪問S (“http://” ＋ 編輯框_地址.內(nèi)容 ＋ “/userRpm/StatusRpm.htm?Connect=連 接&wan=1”, 0, , , , 協(xié)議頭, , , , , )

.如果真 (正則.取子匹配文本 (1, 2) ＝ “0.0.0.0”)

.判斷循環(huán)首 (正則.取子匹配文本 (1, 2) ＝ “0.0.0.0”)

返回文本 ＝ 網(wǎng)頁_訪問S (“http://” ＋ 編輯框_地址.內(nèi)容 ＋ “/userRpm/StatusRpm.htm”, 0, , , , 協(xié)議頭, , , , , )

正則.創(chuàng)建 (#獲取ip, 返回文本, , )

.判斷循環(huán)尾 ()

.如果真結(jié)束

.判斷結(jié)束

標(biāo)簽_狀態(tài).標(biāo)題 ＝ 標(biāo)簽_狀態(tài).標(biāo)題 ＋ #換行符 ＋ #換行符 ＋ “MAC 地址：” ＋ 正則.取子匹配文本 (1, 1) ＋ #換行符 ＋ #換行符 ＋ “IP地址：” ＋ 正則.取子匹配文本 (1, 2) ＋ #換行符 ＋ #換行符 ＋ “其他信息可以自己寫正則獲取。”

.子程序 _按鈕_重啟_被單擊

.如果真 (協(xié)議頭 ＝ “”)

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “未登錄”

返回 ()

.如果真結(jié)束

標(biāo)簽_狀態(tài).標(biāo)題 ＝ “正在重新啟動”

返回文本 ＝ 網(wǎng)頁_訪問S (“http://” ＋ 編輯框_地址.內(nèi)容 ＋ “/userRpm/SysRebootRpm.htm?Reboot=%D6%D8%C6%F4%C2%B7%D3%C9%C6%F7”, 0, , , , 協(xié)議頭, , , , , )

運行結(jié)果：

總結(jié)

以上就是這篇文章的全部內(nèi)容了，希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值，謝謝大家對的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接

總結(jié)

以上是生活随笔為你收集整理的易语言 服务器抓包,易语言抓包获得地址实现TP路由器登陆的代码的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。