求一个post提交的源代码实例

小星1262

http://66.xgapi.us  求一个p ost提交的源代码实例

刘文明乌猛

  

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

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

' https://66.xgapi.us/send/Index/sendCode
局_网址 = "https://66.xgapi.us/send/Index/sendCode"
局_方式 = 1
ADD_数据包.添加 ("area","852"）
ADD_数据包.添加 ("tel","61970200"）
ADD_数据包.添加 ("only_receive","0"）
局_提交数据 = ADD_数据包.获取Post数据 ()
ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/133.0.0.0 Safari/537.36"）
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 ＝ 网页_访问 (局_网址, 局_方式, 局_提交数据, , , 局_提交协议头, , , , , )
局_返回 = 到文本 (编码_编码转换对象 (局_结果))
返回 (局_返回)

.版本 2<br /> <br /> .子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量  局_网址, 文本型<br /> .局部变量  局_方式, 整数型<br /> .局部变量  ADD_数据包, 类_POST数据类<br /> .局部变量  局_提交数据, 文本型<br /> .局部变量  ADD_协议头, 类_POST数据类<br /> .局部变量  局_提交协议头, 文本型<br /> .局部变量  局_结果, 字节集<br /> .局部变量  局_返回, 文本型<br /> ' https://66.xgapi.us/send/Index/sendCode<br /> 局_网址 = "https://66.xgapi.us/send/Index/sendCode"<br /> 局_方式 = 1<br /> ADD_数据包.添加 ("area","852"）<br /> ADD_数据包.添加 ("tel","61970200"）<br /> ADD_数据包.添加 ("only_receive","0"）<br /> <br /> 局_提交数据 = ADD_数据包.获取Post数据 ()<br /> ADD_协议头.添加 ("User-Agent","Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/133.0.0.0 Safari/537.36"）<br /> <br /> 局_提交协议头 = ADD_协议头.获取协议头数据 ()<br /> <br /> 局_结果 ＝ 网页_访问 (局_网址, 局_方式, 局_提交数据, , , 局_提交协议头, , , , , )<br /> 局_返回 = 到文本(编码_编码转换对象(局_结果))<br /> 返回(局_返回)

高先生

  

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

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

' https://66.xgapi.us/send/Index/sendCode
局_网址 = "https://66.xgapi.us/send/Index/sendCode"
局_方式 = 0
ADD_数据包.添加 ("area","852"）
ADD_数据包.添加 ("tel","61970200"）
ADD_数据包.添加 ("only_receive","0"）
局_提交数据 = ADD_数据包.获取Post数据 ()
局_提交数据 = 编码_gb2312到utf8 (局_提交数据)
局_提交cookie = "PHPSESSID=ssgi58lakvmtomslv4u39u8j7t"
ADD_协议头.添加 ("sec-ch-ua-platform",""Windows""）
ADD_协议头.添加 ("x-requested-with","XMLHttpRequest"）
ADD_协议头.添加 ("user-agent","Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/133.0.0.0 Safari/537.36 Edg/133.0.0.0"）
ADD_协议头.添加 ("accept","application/json, text/javascript, */*; q=0.01"）
ADD_协议头.添加 ("sec-ch-ua",""Not (A:Brand";v="99", "Microsoft Edge";v="133", "Chromium";v="133""）
ADD_协议头.添加 ("content-type","application/x-www-form-urlencoded; charset=UTF-8"）
ADD_协议头.添加 ("sec-ch-ua-mobile","?0"）
ADD_协议头.添加 ("origin","https://66.xgapi.us"）
ADD_协议头.添加 ("sec-fetch-site","same-origin"）
ADD_协议头.添加 ("sec-fetch-mode","cors"）
ADD_协议头.添加 ("sec-fetch-dest","empty"）
ADD_协议头.添加 ("referer","https://66.xgapi.us/"）
ADD_协议头.添加 ("accept-encoding","gzip, deflate, br, zstd"）
ADD_协议头.添加 ("accept-language","zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6"）
ADD_协议头.添加 ("priority","u=1, i"）
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 = 网页_访问_对象 (局_网址, 局_方式, , 局_提交Cookie, , 局_提交协议头, , , , 到字节集 (局_提交数据), , , , , , , )
局_结果 = 网页_GZIP解压（局_结果）
局_返回 = 到文本 (编码_编码转换对象 (局_结果))
返回 (局_返回)
' 返回数据被Gzip压缩，调用命令[网页_Gzip解压]需要[Gzip.dll]文件，  将助手根目录下[\gzip.dll]放到源码的根目录才能正常返回数据

.版本 2<br /> <br /> .子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量  局_网址, 文本型<br /> .局部变量  局_方式, 整数型<br /> .局部变量  ADD_数据包, 类_POST数据类<br /> .局部变量  局_提交数据, 文本型<br /> .局部变量  局_提交cookie, 文本型<br /> .局部变量  ADD_协议头, 类_POST数据类<br /> .局部变量  局_提交协议头, 文本型<br /> .局部变量  局_结果, 字节集<br /> .局部变量  局_返回, 文本型<br /> ' https://66.xgapi.us/send/Index/sendCode<br /> 局_网址 = "https://66.xgapi.us/send/Index/sendCode"<br /> 局_方式 = 0<br /> ADD_数据包.添加 ("area","852"）<br /> ADD_数据包.添加 ("tel","61970200"）<br /> ADD_数据包.添加 ("only_receive","0"）<br /> <br /> 局_提交数据 = ADD_数据包.获取Post数据 ()<br /> 局_提交数据 = 编码_gb2312到utf8 (局_提交数据)<br /> 局_提交cookie = "PHPSESSID=ssgi58lakvmtomslv4u39u8j7t"<br /> ADD_协议头.添加 ("sec-ch-ua-platform",""Windows""）<br /> ADD_协议头.添加 ("x-requested-with","XMLHttpRequest"）<br /> ADD_协议头.添加 ("user-agent","Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/133.0.0.0 Safari/537.36 Edg/133.0.0.0"）<br /> ADD_协议头.添加 ("accept","application/json, text/javascript, */*; q=0.01"）<br /> ADD_协议头.添加 ("sec-ch-ua",""Not(A:Brand";v="99", "Microsoft Edge";v="133", "Chromium";v="133""）<br /> ADD_协议头.添加 ("content-type","application/x-www-form-urlencoded; charset=UTF-8"）<br /> ADD_协议头.添加 ("sec-ch-ua-mobile","?0"）<br /> ADD_协议头.添加 ("origin","https://66.xgapi.us"）<br /> ADD_协议头.添加 ("sec-fetch-site","same-origin"）<br /> ADD_协议头.添加 ("sec-fetch-mode","cors"）<br /> ADD_协议头.添加 ("sec-fetch-dest","empty"）<br /> ADD_协议头.添加 ("referer","https://66.xgapi.us/"）<br /> ADD_协议头.添加 ("accept-encoding","gzip, deflate, br, zstd"）<br /> ADD_协议头.添加 ("accept-language","zh-CN,zh;q=0.9,en;q=0.8,en-GB;q=0.7,en-US;q=0.6"）<br /> ADD_协议头.添加 ("priority","u=1, i"）<br /> <br /> 局_提交协议头 = ADD_协议头.获取协议头数据 ()<br /> <br /> 局_结果 = 网页_访问_对象 (局_网址, 局_方式, , 局_提交Cookie, , 局_提交协议头, , , , 到字节集(局_提交数据), , , , , , , )<br /> 局_结果 = 网页_GZIP解压（局_结果）<br /> 局_返回 = 到文本(编码_编码转换对象(局_结果))<br /> 返回(局_返回)<br /> '返回数据被Gzip压缩，调用命令[网页_Gzip解压]需要[Gzip.dll]文件，  将助手根目录下[\gzip.dll]放到源码的根目录才能正常返回数据

小星1262

高先生 发表于 2025-3-12 21:33
[e=2].版本 2

.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用 ...

正在编译现行程序
正在检查重复名称...
正在预处理现行程序
错误(14): 存在无效的字符、名称、运算符或表达式。
编译现行易程序失败或被中止!