华为移动光猫一键换IP工具源码

url ＝ 参_登录地址 ＋ “/asp/GetRandCount.asp”
token ＝ 取文本右边 (到文本 (网页_访问 (url, 1)), 32)
提交信息 ＝ “UserName=” ＋ 参_路由器账号 ＋ “&PassWord=” ＋ 编码_BASE64编码 (到字节集 (参_路由器密码)) ＋ “&x.X_HW_Token=” ＋ token
返回数据 ＝ 到文本 (网页_访问 (参_登录地址 ＋ “/login.cgi”, 1, 提交信息, “Cookie=body:Language:chinese:id=-1”, 程_Cookie, “Origin: ” ＋ 参_登录地址))
程_Cookie ＝ 网页_Cookie合并更新 (“Cookie=body:Language:chinese:id=-1”, 程_Cookie)
.如果 (寻找文本 (返回数据, “index.asp”, , 假) ≠ -1)
url ＝ 参_登录地址 ＋ “/html/bbsp/wan/wane8c.asp”
token ＝ 文本_取出中间文本 (到文本 (网页_访问 (url, 0, , 程_Cookie)), “hwonttoken” ＋ #引号 ＋ “ value=” ＋ #引号, #引号)
返回数据 ＝ 编码_URL解码 (到文本 (网页_访问 (参_登录地址 ＋ “/html/bbsp/wan/complex.cgi?y=InternetGatewayDevice.WANDevice.1.WANConnectionDevice.2.WANPPPConnection.1&j=InternetGatewayDevice.WANDevice.1.WANConnectionDevice.2.WANPPPConnection.1&RequestFile=html/bbsp/wan/confirmwane8ccfginfo.html”, 1, “y.Username=” ＋ 参_宽带账号 ＋ “&y.Password=” ＋ 文本_取随机数字 (12) ＋ “&y.ConnectionTrigger=AlwaysOn&x.X_HW_Token=” ＋ token, 程_Cookie, 局_Cookie, “Origin: ” ＋ 参_登录地址)), 真)
延迟 (1000 × 5)
返回数据 ＝ 编码_URL解码 (到文本 (网页_访问 (参_登录地址 ＋ “/html/bbsp/wan/complex.cgi?y=InternetGatewayDevice.WANDevice.1.WANConnectionDevice.2.WANPPPConnection.1&j=InternetGatewayDevice.WANDevice.1.WANConnectionDevice.2.WANPPPConnection.1&RequestFile=html/bbsp/wan/confirmwane8ccfginfo.html”, 1, “y.Username=” ＋ 参_宽带账号 ＋ “&y.Password=” ＋ 参_宽带密码 ＋ “&y.ConnectionTrigger=AlwaysOn&x.X_HW_Token=” ＋ token, 程_Cookie, 局_Cookie, “Origin: ” ＋ 参_登录地址)), 真)
程_Cookie ＝ 网页_Cookie合并更新 (程_Cookie, 局_Cookie)
.如果 (寻找文本 (返回数据, “WAN设备正在处理，请等待”, , 假) ≠ -1)
.如果 (网页_取外网IP () ≠ “”)
参_返回信息 ＝ “IP地址更换成功！当前IP：” ＋ 网页_取外网IP ()
.否则
参_返回信息 ＝ “正在更换中...可能是宽带账号或密码不正确！”
.如果结束
返回 (真)
.否则
参_返回信息 ＝ “宽带账号或者宽带密码不正确！”
返回 (假)