• 按键公众号 ：
按键精灵电脑版
立即下载

软件版本：2014.06
软件大小：22.9M
更新时间：2021-12-03

按键精灵安卓版
立即下载

软件版本：4.1.1
软件大小：45M
更新时间：2025-09-09

按键精灵iOS版
立即下载

软件版本：2.4.2
软件大小：29.2M
更新时间：2025-09-24

按键手机助手
立即下载

软件版本：4.4.1
软件大小：242M
更新时间：2025-09-09

快捷导航

请 登录 后使用快捷导航
没有帐号？ 注册

登录 注册
返回列表
发新话题 回复该主题
查看: 822|回复: 0

test [复制链接]

山海师
头像

山海狮

  • 按键工程师
  • 742060
  • 2281
  • 5
  • 881 朵
  • 10799 个
  • 580 个
  • 48300
  • 2011-08-18
双十一绝版纪念勋章抗战胜利70周年勋章单身汪勋章体验先锋勋章元旦勋章按键精灵开发者6级虎年勋章论坛GG小红帽爱心大使学有所成
1#
t T
发表于 2021-11-26 18:49 | |只看楼主
现在官方自带的http的命令少了个提交文件的功能，美中不足Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
无可奈何我就被迫营业封装了一个http的插件，可以支持upload功能Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
目前插件还是内测版本，功能不完善且概率存在一定BUG，后续会进行迭代更新Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
功能特色
    Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 自定义header消息头Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 智能判定Content-Type类型Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 支持Android&IOS双端使用Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 统一的payload格式传入（table类型）Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
命令功能Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
SHTTP.Get(url, opts)
    Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 功能：发送Get请求Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 参数：Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
      Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    • url: 必选，请求的urlÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    • opts: 可选参数，包含以下参数的键值表headers: 自定义http消息头，可以是键值表或者字符串timeout: 请求超时时间，默认为10秒files: 上传文件路径Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 返回：返回请求结果Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
SHTTP.Post(url, data, opts)
    Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 功能：发送Get请求Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 参数：Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
      Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    • url: 必选，请求的urlÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    • data: 必选，需要提交的请求数据，用键值表或者key-value存放提交数据Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    • opts: 可选参数，包含以下参数的键值表headers: 自定义http消息头，可以是键值表或者字符串timeout: 请求超时时间，默认为10秒files: 上传文件路径Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  • 返回：返回请求结果Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
使用范例Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
简单的Get网页
  1. Import "SHTTP.lua"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. TracePrint SHTTP.Get("http://bbs.anjian.com/")Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
附带请求头Get
  1. Import "SHTTP.lua"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  3. Dim tHeaders = {null}Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    4. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
发送post请求
  1. Import "SHTTP.lua"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. Dim sUrl= "https://api.toolnb.com/Tools/Qrcode/qrcodeLogo.html"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
  1. Import "SHTTP.lua"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  3. Dim tHeaders = {null}Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    4. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  4. 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"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    5. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
通过post来提交文件
  1. Import "SHTTP.lua"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. Dim sUrl= "https://api.toolnb.com/Tools/Qrcode/qrcodeLogo.html"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
对接百度OCR识别API
  1. Dim sUrl = "https://aip.baidubce.com/oauth/2.0/token"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    2. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  2. Dim tData = {null}Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    3. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  3. tData["grant_type"] = "client_credentials"Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    4. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  4. tData["client_id"] = "" // 填自己的client_idÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    5. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  5. tData["client_secret"] = "" // 填自己的client_secretÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    6. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  6. Dim sJson, tJsonÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    7. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  7. // 获取api的access_token值Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    8. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  8. sJson = SHTTP.Post(sUrl, tData)Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    9. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  9. tJson = Cjson.Decode(sJson)Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    10. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  10. Dim Access_Token = tJson["access_token"]Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    11. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  11. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    12. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  12. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    13. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  13. sUrl = "https://aip.baidubce.com/rest/2.0/ocr/v1/general_basic" & "?access_token=" & Access_TokenÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    14. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  14. // 需要先将图片转成base64编码Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    15. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  15. Dim ImgBase64 = ShanHai.ReadFileBase(GetSdcardDir() & "/Pictures/test.png")Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    16. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  16. // 对内容进行url编码Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    17. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  17. ImgBase64 = ShanHai.CharToUrl(ImgBase64)Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    18. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  18. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    19. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  19. sJson = SHTTP.Post(sUrl, {"image":ImgBase64},{"headers":{"Content-Type":"application/x-www-form-urlencoded"}})Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    20. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  20. tJson = Cjson.Decode(sJson)Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    21. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  21. For i = 1 To Len(tJson["words_result"])Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    22. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  22. TracePrint tJson["words_result"][i]["words"]Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    23. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
  23. NextÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
    24. Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ úsÙ¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
复制代码
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
插件开源下载(回复可见)：Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
[attach]251160[/attach]Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús
Ù¼l…½óeú±½bbs.anjian.com‰§C3âÜ\ ús

点赞
回顶部
上一主题| 下一主题
返回列表
发新话题 回复该主题
高级编辑器高级编辑器