易语言的一个pos请求转换成luat

1051040973

请大佬帮忙把下面的这个请求转换成lua，就是取微云笔记的一个请求。

  

子程序名	返回值类型	公开	备 注
功能_网页访问	文本型		本命令由【精易网页调试助手】生成，请配合精易模块使用。

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

' https://share.weiyun.com/webapp/json/weiyunShareNoLogin/WeiyunShareView?g_tk=0&_1713270855116
局_网址 = "https://share.weiyun.com/webapp/json/weiyunShareNoLogin/WeiyunShareView?g_tk=0&_1713270855116"
局_方式 = 1
' {"req_header":"{\"seq\":17132714202339543,\"type\":1,\"cmd\":12002,\"appid\":30113,\"version\":3,\"major_version\":3,\"minor_version\":3,\"fix_version\":3,\"wx_openid\":\"\",\"user_flag\":0}","req_body":"{\"ReqMsg_body\":{\"ext_req_head\":{\"token_info\":{\"token_type\":0,\"login_key_type\":1,\"login_key_value\":\"\"},\"language_info\":{\"language_type\":2052}},\".weiyun.WeiyunShareViewMsgReq_body\":{\"share_pwd\":null,\"share_key\":\"RMRBT6dC\"}}}"}
局_提交数据 = "{”+#引号+“req_header”+#引号+“:”+#引号+“{\”+#引号+“seq\”+#引号+“:17132714202339543,\”+#引号+“type\”+#引号+“:1,\”+#引号+“cmd\”+#引号+“:12002,\”+#引号+“appid\”+#引号+“:30113,\”+#引号+“version\”+#引号+“:3,\”+#引号+“major_version\”+#引号+“:3,\”+#引号+“minor_version\”+#引号+“:3,\”+#引号+“fix_version\”+#引号+“:3,\”+#引号+“wx_openid\”+#引号+“:\”+#引号+“\”+#引号+“,\”+#引号+“user_flag\”+#引号+“:0}”+#引号+“,”+#引号+“req_body”+#引号+“:”+#引号+“{\”+#引号+“ReqMsg_body\”+#引号+“:{\”+#引号+“ext_req_head\”+#引号+“:{\”+#引号+“token_info\”+#引号+“:{\”+#引号+“token_type\”+#引号+“:0,\”+#引号+“login_key_type\”+#引号+“:1,\”+#引号+“login_key_value\”+#引号+“:\”+#引号+“\”+#引号+“},\”+#引号+“language_info\”+#引号+“:{\”+#引号+“language_type\”+#引号+“:2052}},\”+#引号+“.weiyun.WeiyunShareViewMsgReq_body\”+#引号+“:{\”+#引号+“share_pwd\”+#引号+“:null,\”+#引号+“share_key\”+#引号+“:\”+#引号+“RMRBT6dC\”+#引号+“}}}”+#引号+“}"
局_提交cookie = "wyctoken=0"
ADD_协议头.添加 ("content-type","application/json"）
ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0"）
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 = 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, 局_提交Cookie, , 局_提交协议头, , , , , , , , , , , )
局_返回 = 到文本 (编码_编码转换对象 (局_结果))
返回 (局_返回)

.版本 2<br /> <br /> .子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量  局_网址, 文本型<br /> .局部变量  局_方式, 整数型<br /> .局部变量  局_提交数据, 文本型<br /> .局部变量  局_提交cookie, 文本型<br /> .局部变量  ADD_协议头, 类_POST数据类<br /> .局部变量  局_提交协议头, 文本型<br /> .局部变量  局_结果, 字节集<br /> .局部变量  局_返回, 文本型<br /> ' https://share.weiyun.com/webapp/json/weiyunShareNoLogin/WeiyunShareView?g_tk=0&_1713270855116<br /> 局_网址 = "https://share.weiyun.com/webapp/json/weiyunShareNoLogin/WeiyunShareView?g_tk=0&_1713270855116"<br /> 局_方式 = 1<br /> ' {"req_header":"{\"seq\":17132714202339543,\"type\":1,\"cmd\":12002,\"appid\":30113,\"version\":3,\"major_version\":3,\"minor_version\":3,\"fix_version\":3,\"wx_openid\":\"\",\"user_flag\":0}","req_body":"{\"ReqMsg_body\":{\"ext_req_head\":{\"token_info\":{\"token_type\":0,\"login_key_type\":1,\"login_key_value\":\"\"},\"language_info\":{\"language_type\":2052}},\".weiyun.WeiyunShareViewMsgReq_body\":{\"share_pwd\":null,\"share_key\":\"RMRBT6dC\"}}}"}<br /> 局_提交数据 = "{”+#引号+“req_header”+#引号+“:”+#引号+“{\”+#引号+“seq\”+#引号+“:17132714202339543,\”+#引号+“type\”+#引号+“:1,\”+#引号+“cmd\”+#引号+“:12002,\”+#引号+“appid\”+#引号+“:30113,\”+#引号+“version\”+#引号+“:3,\”+#引号+“major_version\”+#引号+“:3,\”+#引号+“minor_version\”+#引号+“:3,\”+#引号+“fix_version\”+#引号+“:3,\”+#引号+“wx_openid\”+#引号+“:\”+#引号+“\”+#引号+“,\”+#引号+“user_flag\”+#引号+“:0}”+#引号+“,”+#引号+“req_body”+#引号+“:”+#引号+“{\”+#引号+“ReqMsg_body\”+#引号+“:{\”+#引号+“ext_req_head\”+#引号+“:{\”+#引号+“token_info\”+#引号+“:{\”+#引号+“token_type\”+#引号+“:0,\”+#引号+“login_key_type\”+#引号+“:1,\”+#引号+“login_key_value\”+#引号+“:\”+#引号+“\”+#引号+“},\”+#引号+“language_info\”+#引号+“:{\”+#引号+“language_type\”+#引号+“:2052}},\”+#引号+“.weiyun.WeiyunShareViewMsgReq_body\”+#引号+“:{\”+#引号+“share_pwd\”+#引号+“:null,\”+#引号+“share_key\”+#引号+“:\”+#引号+“RMRBT6dC\”+#引号+“}}}”+#引号+“}"<br /> 局_提交cookie = "wyctoken=0"<br /> ADD_协议头.添加 ("content-type","application/json"）<br /> ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0"）<br /> <br /> 局_提交协议头 = ADD_协议头.获取协议头数据 ()<br /> <br /> 局_结果 = 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, 局_提交Cookie, , 局_提交协议头, , , , , , , , , , , )<br /> 局_返回 = 到文本(编码_编码转换对象(局_结果))<br /> 返回(局_返回)

black0216

转成curl，再用一些工具转成lua，比如这样

post.txt (931 Bytes, 下载次数: 5)

2024-4-16 21:29 上传

点击文件名下载附件