精易论坛

标题: 简单天气调用API源码,可自动获取地理位置 [打印本页]

作者: q838210720    时间: 2019-2-11 08:37
标题: 简单天气调用API源码,可自动获取地理位置
用了一个精易模块



源码很简单,成品完美,速度非常快,你们直接复制粘贴即可



觉得不错麻烦给个好评没精币了谢谢大家!



  
子程序名返回值类型公开备 注
获取天气  
变量名类 型静态数组备 注
i文本型 
i1文本型 
i2类_json 
i3文本型 
i4文本型 
i5文本型 
城市文本型 
温度文本型 
风力文本型 
空气文本型 
生活建议文本型 
湿度文本型 
时间w文本型 
i3 = 文本_取出中间文本 (到文本 (HTTP读文件 (“http://2019.ip138.com/ic.asp”)), “”, “”)
i4 = 文本_取出中间文本 (i3, “省”, “ ”)
判断 (i4 = “”)
i4 = 文本_取出中间文本 (i3, “市”, “ ”)


i = “https://api.shenjian.io/weather/city/?appid=4ef34fe9222ab75e4c8870189dbe0c0a&city_name=” + i4 + “&only_now=”
i5 = 编码_Utf8到Ansi (网页_访问_对象 (i))
i2.解析 (i5)
' 调试输出 (i5)
城市 = i2.取通用属性 (“data.city”)
温度 = i2.取通用属性 (“data.now[0]['now_temperature']”)
风力 = i2.取通用属性 (“data.now[0]['now_wind_direction']”)“ - ” + i2.取通用属性 (“data.now[0]['now_wind_power']”)
空气 = i2.取通用属性 (“data.now[0]['now_rcomfort']”)
湿度 = i2.取通用属性 (“data.now[0]['now_humidity']”)
生活建议 = i2.取通用属性 (“data.now[0]['now_icomfort']”)
时间w = i2.取通用属性 (“data.now[0]['now_publish_time']”)
透明标签7.标题 = “天气预报”“ 更新于: ” + 时间w + “ ” + 城市 + “ :” + 温度 + “  风力:” + 风力 + “  空气质量:” + 空气 + “  湿度:” + 湿度 + “  体感建议:” + 生活建议
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
启动线程 (&获取天气, , )


i支持库列表   支持库注释   
internet互联网支持库
iext扩展界面支持库一
EThread多线程支持库



作者: Foreign000    时间: 2019-2-11 09:09
不错的源码啊
作者: 外星星人    时间: 2019-2-11 12:55
支持支持。
作者: qq231931    时间: 2019-2-11 13:45
支持一下
作者: 得意须尽欢    时间: 2019-2-11 15:04
现在就不能用了?
作者: 毛超    时间: 2019-2-11 17:24
感谢分享!!!!!!
作者: q838210720    时间: 2019-2-11 17:36
得意须尽欢 发表于 2019-2-11 15:04
现在就不能用了?

可以用的 你少了什么代码 你仔细对比下

QQ截图20190211173520.png (28.32 KB, 下载次数: 0)

QQ截图20190211173520.png

作者: 深圳梦    时间: 2019-2-11 20:52
新技能已get√
作者: shuxiang    时间: 2019-2-12 10:09
更正:i3 = 文本_取出中间文本 (到文本 (HTTP读文件 (“http://2019.ip138.com/ic.asp”)), “<center>”, “</center>”)
作者: 大魔天王    时间: 2019-2-12 17:09
感谢楼主分享!!
作者: panchao126    时间: 2019-2-13 18:31
谢谢分享,下载学习一下
作者: 对白    时间: 2019-2-14 11:47
很强势欢迎常来帮助新手
作者: shaohua82    时间: 2019-2-19 14:39
感谢大神们献出源码,新手学习谢谢!
作者: Buei    时间: 2019-2-19 14:43
感谢分享   
作者: 59138617    时间: 2019-2-19 20:11
感谢分享   
作者: a3960382663    时间: 2019-2-28 04:48

更正:i3 = 文本_取出中间文本 (到文本 (HTTP读文件 (“http://2019.ip138.com/ic.asp”)), “<center>”, “</center>”)  取不了实际的地方
作者: l1233333    时间: 2019-2-28 12:35
支持开源~!感谢分享
作者: FlyMX    时间: 2019-3-9 12:51
怎么取位置的
作者: 卢本伟LBW    时间: 2020-1-31 21:38
好像不错吖吖,谢谢分享




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4