登录  /  注册
分享一个脚步数据互通的接口
使命
使命 2019-07-23 22:37:45
[HTML讨论组]
Dim 标签,内容,字符数,网页,获取内容,上传内容,激活码
Import "ShanHai.lua"

\\手机按键精灵案例
激活码= "001afdg6dg6fd66d6d26"
标签 = "000"
内容 = "bdfhgfhfh"
执行上传
执行获取

Delay 3000






Function 执行获取
TracePrint "正在执行获取数据。。。"
ShowMessage  "正在执行获取数据。。。"
For 100//循环次数
获取内容 = shanhai.GetHttp("http://lietianya.gotoip2.com/shuju/" &激活码& "/" & 标签 & ".html")
字符数 = UTF8.Len(获取内容)
If 1 > 字符数 then//循环次数
TracePrint "获取失败"
ShowMessage  "获取失败"
Delay 6000
Else 
TracePrint "获取成功"
ShowMessage "获取成功"
Exit For //循环退出
End If
Next//---结束循环
TracePrint "获取内容为:"&获取内容
ShowMessage "获取内容为:" & 获取内容
End Function

Function 执行上传
TracePrint "正在执行上传数据。。。"
ShowMessage  "正在执行上传数据。。。"
For 100//循环次数
shanhai.GetHttp ("http://lietianya.gotoip2.com/shuju/" &激活码& "/api.php/api.php?title=" & 标签 & "&content=" & 内容 & "")
Delay 200
网页 = shanhai.GetHttp("http://lietianya.gotoip2.com/shuju/" &激活码& "/" & 标签 & ".html")
字符数 = UTF8.Len(网页)
If 1 > 字符数 then//循环次数
TracePrint "上传失败"
ShowMessage  "上传失败"
Delay 6000
Else 
TracePrint "上传成功"
ShowMessage "上传成功"
Exit For //循环退出
End If
Next//---结束循环
TracePrint "上传内容为:"&网页
ShowMessage "上传内容为:" & 网页
上传内容=网页
End Function

需要下载一个山海插件

使命
使命

全部回复(0)
热门教程
更多>
最新下载
更多>
网站特效
网站源码
网站素材
前端模板
关于我们 免责申明 意见反馈 讲师合作 广告合作 最新更新
php中文网:公益在线php培训,帮助PHP学习者快速成长!
关注服务号 技术交流群
PHP中文网订阅号
每天精选资源文章推送
PHP中文网APP
随时随地碎片化学习
PHP中文网抖音号
发现有趣的

Copyright 2014-2024 https://www.php.cn/ All Rights Reserved | php.cn | 湘ICP备2023035733号