想问发送验证码的问题

你是我的眼哦 · 发表于 2021-9-26 13:08:19

想问下如何将易语言的“获取验证码”功能搞成网页的呢？
就是同样是获取验证码，不从软件获取，想搞成网页的，比较方便，但是不知道怎么改成网页的，有服务器但是不会写。

变量名	类型	静态	数组	备注
局_网址	文本型
局_方式	整数型
局_提交数据	文本型
局_提交cookie	文本型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_结果	字节集
局_返回	文本型
json	类_json
文本	文本型
retMsg	文本型

局_网址＝ “http://d.gd.189.cn/portalapp/age ... GetCheckCode.action”
局_方式＝ 1
' accNbr=19124386844
局_提交数据＝ “accNbr=” ＋编辑框2.内容
局_提交cookie ＝编辑框1.内容
ADD_协议头.添加 (“Host”, “d.gd.189.cn”)
ADD_协议头.添加 (“Connection”, “keep-alive”)
ADD_协议头.添加 (“Content-Length”, “18”)
ADD_协议头.添加 (“Accept”, “application/json”)
ADD_协议头.添加 (“Origin”, “http://d.gd.189.cn”)
ADD_协议头.添加 (“X-Requested-With”, “XMLHttpRequest”)
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/81.0.4044.138 Safari/537.36 NetType/WIFI MicroMessenger/7.0.20.1781(0x6700143B) WindowsWechat(0x63030532)”)
ADD_协议头.添加 (“Content-Type”, “application/x-www-form-urlencoded”)
ADD_协议头.添加 (“Referer”, “http://d.gd.189.cn/portalapp/mgr ... prodId=3205&accNbr=” ＋编辑框2.内容＋ “&relaUserName=**%25E7%2591%259C&relaCertTypeName=%25E5%25B1%2585%25E6%25B0%2591%25E8%25BA%25AB%25E4%25BB%25BD%25E8%25AF%2581&relaCertNbr=4401121998****0326&relaCertAddr=%25E5%25B9%25BF%25E5%25B7%259E%25E5%25B8%2582%25E5%25A4%25A9%25E6%25B2%25B3%25E5%258C%25BA%25E6%2597%25AD%25E6%2599%25AF%25E8%25A5%25BF%25E8%25A1%2597206%25E5%258F%25B7****&custId=210000001620926&custName=%25E6%25B1%2587%25E6%2599%25BA%25E4%25B8%25BA%25E7%25BE%258E%25EF%25BC%2588%25E5%25B9%25BF%25E5%25B7%259E%25EF%25BC%2589%25E5%2595%2586%25E8%25B4%25B8%25E6%259C%2589%25E9%2599%2590%25E5%2585%25AC%25E5%258F%25B8&locadType=M”)
ADD_协议头.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en-US;q=0.8,en;q=0.7”)
局_提交协议头＝ ADD_协议头.获取协议头数据 ()
局_结果＝网页_访问 (局_网址, 局_方式, 局_提交数据, 局_提交cookie, , 局_提交协议头, , , , , )
局_返回＝到文本 (编码_编码转换对象 (局_结果))
json.解析 (局_返回)
文本＝ json.取通用属性 (“retMsg”)
编辑框3.加入文本 (文本＋ #换行符 )

.版本 2<br />
<br />
.局部变量 局_网址, 文本型<br />
.局部变量 局_方式, 整数型<br />
.局部变量 局_提交数据, 文本型<br />
.局部变量 局_提交cookie, 文本型<br />
.局部变量 ADD_协议头, 类_POST数据类<br />
.局部变量 局_提交协议头, 文本型<br />
.局部变量 局_结果, 字节集<br />
.局部变量 局_返回, 文本型<br />
.局部变量 json, 类_json<br />
.局部变量 文本, 文本型<br />
.局部变量 retMsg, 文本型<br />
<br />
<br />
局_网址 ＝ “http://d.gd.189.cn/portalapp/age ... GetCheckCode.action”<br />
局_方式 ＝ 1<br />
' accNbr=19124386844<br />
局_提交数据 ＝ “accNbr=” ＋ 编辑框2.内容<br />
局_提交cookie ＝ 编辑框1.内容<br />
ADD_协议头.添加 (“Host”, “d.gd.189.cn”)<br />
ADD_协议头.添加 (“Connection”, “keep-alive”)<br />
ADD_协议头.添加 (“Content-Length”, “18”)<br />
ADD_协议头.添加 (“Accept”, “application/json”)<br />
ADD_协议头.添加 (“Origin”, “http://d.gd.189.cn”)<br />
ADD_协议头.添加 (“X-Requested-With”, “XMLHttpRequest”)<br />
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/81.0.4044.138 Safari/537.36 NetType/WIFI MicroMessenger/7.0.20.1781(0x6700143B) WindowsWechat(0x63030532)”)<br />
ADD_协议头.添加 (“Content-Type”, “application/x-www-form-urlencoded”)<br />
ADD_协议头.添加 (“Referer”, “http://d.gd.189.cn/portalapp/mgr ... prodId=3205&accNbr=” ＋ 编辑框2.内容 ＋ “&relaUserName=**%25E7%2591%259C&relaCertTypeName=%25E5%25B1%2585%25E6%25B0%2591%25E8%25BA%25AB%25E4%25BB%25BD%25E8%25AF%2581&relaCertNbr=4401121998****0326&relaCertAddr=%25E5%25B9%25BF%25E5%25B7%259E%25E5%25B8%2582%25E5%25A4%25A9%25E6%25B2%25B3%25E5%258C%25BA%25E6%2597%25AD%25E6%2599%25AF%25E8%25A5%25BF%25E8%25A1%2597206%25E5%258F%25B7****&custId=210000001620926&custName=%25E6%25B1%2587%25E6%2599%25BA%25E4%25B8%25BA%25E7%25BE%258E%25EF%25BC%2588%25E5%25B9%25BF%25E5%25B7%259E%25EF%25BC%2589%25E5%2595%2586%25E8%25B4%25B8%25E6%259C%2589%25E9%2599%2590%25E5%2585%25AC%25E5%258F%25B8&locadType=M”)<br />
ADD_协议头.添加 (“Accept-Language”, “zh-CN,zh;q=0.9,en-US;q=0.8,en;q=0.7”)<br />
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br />
局_结果 ＝ 网页_访问 (局_网址, 局_方式, 局_提交数据, 局_提交cookie, , 局_提交协议头, , , , , )<br />
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))<br />
json.解析 (局_返回)<br />
文本 ＝ json.取通用属性 (“retMsg”)<br />
编辑框3.加入文本 (文本 ＋ #换行符)

补充内容 (2021-9-26 13:26):
局_网址＝ “http://d.gd.189.cn/portalapp/agent/customer/orgRealGetCheckCode.action”