|
- 按键工程师
- 742060
- 2281
- 5
- 881 朵
- 10799 个
- 580 个
- 48300
- 2011-08-18
|
1#
t
T
发表于 2021-11-26 18:49
|
|只看楼主
现在官方自带的http的命令少了个提交文件的功能,美中不足kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0无可奈何我就被迫营业封装了一个http的插件,可以支持upload功能kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0目前插件还是内测版本,功能不完善且概率存在一定BUG,后续会进行迭代更新kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
功能特色kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 自定义header消息头kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 智能判定Content-Type类型kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 支持Android&IOS双端使用kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 统一的payload格式传入(table类型)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0命令功能kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0SHTTP.Get(url, opts)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 功能:发送Get请求kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 参数:kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- url: 必选,请求的urlkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- opts: 可选参数,包含以下参数的键值表headers: 自定义http消息头,可以是键值表或者字符串timeout: 请求超时时间,默认为10秒files: 上传文件路径kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 返回:返回请求结果kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0SHTTP.Post(url, data, opts)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 功能:发送Get请求kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 参数:kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- url: 必选,请求的urlkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- data: 必选,需要提交的请求数据,用键值表或者key-value存放提交数据kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- opts: 可选参数,包含以下参数的键值表headers: 自定义http消息头,可以是键值表或者字符串timeout: 请求超时时间,默认为10秒files: 上传文件路径kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- 返回:返回请求结果kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0使用范例kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0简单的Get网页- Import "SHTTP.lua"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- TracePrint SHTTP.Get("http://bbs.anjian.com/")kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码 附带请求头Get- Import "SHTTP.lua"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim tHeaders = {null}kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码 发送post请求- Import "SHTTP.lua"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim sUrl= "https://api.toolnb.com/Tools/Qrcode/qrcodeLogo.html"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码- Import "SHTTP.lua"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim tHeaders = {null}kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tHeaders["user-agent"] = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/96.0.4664.45 Safari/537.36"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码 通过post来提交文件- Import "SHTTP.lua"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim sUrl= "https://api.toolnb.com/Tools/Qrcode/qrcodeLogo.html"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0对接百度OCR识别API- Dim sUrl = "https://aip.baidubce.com/oauth/2.0/token"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim tData = {null}kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tData["grant_type"] = "client_credentials"kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tData["client_id"] = "" // 填自己的client_idkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tData["client_secret"] = "" // 填自己的client_secretkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim sJson, tJsonkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- // 获取api的access_token值kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- sJson = SHTTP.Post(sUrl, tData)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tJson = Cjson.Decode(sJson)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim Access_Token = tJson["access_token"]kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- sUrl = "https://aip.baidubce.com/rest/2.0/ocr/v1/general_basic" & "?access_token=" & Access_Tokenkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- // 需要先将图片转成base64编码kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Dim ImgBase64 = ShanHai.ReadFileBase(GetSdcardDir() & "/Pictures/test.png")kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- // 对内容进行url编码kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- ImgBase64 = ShanHai.CharToUrl(ImgBase64)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- sJson = SHTTP.Post(sUrl, {"image":ImgBase64},{"headers":{"Content-Type":"application/x-www-form-urlencoded"}})kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- tJson = Cjson.Decode(sJson)kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- For i = 1 To Len(tJson["words_result"])kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- TracePrint tJson["words_result"][i]["words"]kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
- Nextkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ãkùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
复制代码 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0插件开源下载(回复可见):kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 [attach]251160[/attach] kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0 kùó7ý |Ûbbs.anjian.comÞÚÕÓ8:ã
0
|