常量數據表
|
1
2
3
|
.版本 2.常量 協議頭, "<文本長度: 310>", , 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, "<文本長度: 64>", , var wanPara = new Array\([\s\S]*?"(.*?)", "(\d+\.\d+\.\d+\.\d+)" |
TP路由器登錄撥號重啟功能
此功能需要加載精易模塊5.6
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
.版本 2.程序集 窗口程序集1.程序集變量 協議頭, 文本型.程序集變量 返回文本, 文本型.程序集變量 正則, 正則表達式類.子程序 _按鈕_登錄_被單擊協議頭 ＝ 文本_替換 (#協議頭, 1, , , “地址”, 編輯框_地址.內容, “帳號密碼”, 編碼_BASE64編碼 (到字節集 (編輯框_帳號.內容 ＋ “:” ＋ 編輯框_密碼.內容)), , , , , , )返回文本 ＝ 網頁_訪問S (“http://” ＋ 編輯框_地址.內容 ＋ “/userRpm/StatusRpm.htm”, 0, , , , 協議頭, , , , , ).判斷開始 (尋找文本 (返回文本, “登錄失敗”, , 假) ≠ -1) 標簽_狀態.標題 ＝ “登錄失敗。” 返回 ().默認 標簽_狀態.標題 ＝ “登錄成功。”.判斷結束正則.創建 (#獲取ip, 返回文本, , )標簽_狀態.標題 ＝ 標簽_狀態.標題 ＋ #換行符 ＋ #換行符 ＋ “MAC 地址：” ＋ 正則.取子匹配文本 (1, 1) ＋ #換行符 ＋ #換行符 ＋ “IP地址：” ＋ 正則.取子匹配文本 (1, 2) ＋ #換行符 ＋ #換行符 ＋ “其他信息可以自己寫正則獲取。”.子程序 _按鈕_斷開_被單擊.如果真 (協議頭 ＝ “”) 標簽_狀態.標題 ＝ “未登錄” 返回 ().如果真結束標簽_狀態.標題 ＝ “”.判斷開始 (按鈕_斷開.標題 ＝ “斷開”) 按鈕_斷開.標題 ＝ “連接” 返回文本 ＝ 網頁_訪問S (“http://” ＋ 編輯框_地址.內容 ＋ “/userRpm/StatusRpm.htm?Disconnect=斷 線&wan=1”, 0, , , , 協議頭, , , , , ) 正則.創建 (#獲取ip, 返回文本, , ).默認 按鈕_斷開.標題 ＝ “斷開” 返回文本 ＝ 網頁_訪問S (“http://” ＋ 編輯框_地址.內容 ＋ “/userRpm/StatusRpm.htm?Connect=連 接&wan=1”, 0, , , , 協議頭, , , , , ) .如果真 (正則.取子匹配文本 (1, 2) ＝ “0.0.0.0”) .判斷循環首 (正則.取子匹配文本 (1, 2) ＝ “0.0.0.0”) 返回文本 ＝ 網頁_訪問S (“http://” ＋ 編輯框_地址.內容 ＋ “/userRpm/StatusRpm.htm”, 0, , , , 協議頭, , , , , ) 正則.創建 (#獲取ip, 返回文本, , ) .判斷循環尾 () .如果真結束.判斷結束標簽_狀態.標題 ＝ 標簽_狀態.標題 ＋ #換行符 ＋ #換行符 ＋ “MAC 地址：” ＋ 正則.取子匹配文本 (1, 1) ＋ #換行符 ＋ #換行符 ＋ “IP地址：” ＋ 正則.取子匹配文本 (1, 2) ＋ #換行符 ＋ #換行符 ＋ “其他信息可以自己寫正則獲取。”.子程序 _按鈕_重啟_被單擊.如果真 (協議頭 ＝ “”) 標簽_狀態.標題 ＝ “未登錄” 返回 ().如果真結束標簽_狀態.標題 ＝ “正在重新啟動”返回文本 ＝ 網頁_訪問S (“http://” ＋ 編輯框_地址.內容 ＋ “/userRpm/SysRebootRpm.htm?Reboot=%D6%D8%C6%F4%C2%B7%D3%C9%C6%F7”, 0, , , , 協議頭, , , , , ) |
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接
