本帖最后由 450556810 于 2018-8-30 11:10 编辑
地址:http://weather1.sina.cn/?ttp=n13&pos=108&vt=4
效果图:
变量名 | 类 型 | 静态 | 数组 | 备 注 | 天气信息 | 天气信息 | | | 局_源代码 | 文本型 | | | 临时_时间 | 文本型 | | | 临时_图片 | 文本型 | | | 临时_温度 | 文本型 | | | 临时文本 | 文本型 | | | 临时文本组 | 文本型 | | 0 | i | 整数型 | | |
局_源代码 = 编码_Utf8到Ansi (网页_访问 (“http://weather1.sina.cn/?ttp=n13&pos=108&vt=4”, , , , , , , , , )) 天气信息.所在城市 = 文本_取出中间文本 (局_源代码, “”, “ ”)天气信息.空气质量 = 文本_取出中间文本 (局_源代码, “”, “”)天气信息.空气质量 = 文本_替换 (天气信息.空气质量, , , , “”, “”, “”, “”, “”, “”)天气信息.实时天气 = 文本_取出中间文本 (局_源代码, “”, “ ”)天气信息.实时天气 = 文本_替换 (天气信息.实时天气, , , , “ ”, “”, #换行符, “”, “ ”, “ ”) 天气信息.实时时间 = 文本_取出中间文本 (局_源代码, “”, “ ”)天气信息.实时时间 = 文本_替换 (天气信息.实时时间, , , , “ ”, “”, #换行符, “”)临时文本 = 文本_取出中间文本 (局_源代码, “”, “) 计次循环首 (24, i )临时_时间 = 文本_自动补零 (到文本 (i ), 2 ) + “:00”如果真 (寻找文本 (临时文本, 临时_时间, , 假) > -1 )加入成员 (天气信息.全天_时间组, 临时_时间 ) 临时_图片 = 文本_取出中间文本 (临时文本, #引号, #引号, 寻找文本 (临时文本, 临时_时间, , 假)) 加入成员 (天气信息.全天_图片组, 临时_图片 ) 临时_温度 = 文本_取出中间文本 (临时文本, “/> ”, “ ”, 寻找文本 (临时文本, 临时_时间, , 假)) 临时_温度 = 文本_替换 (临时_温度, , , , “ ”, “”, #换行符, “”, “”, “”) 加入成员 (天气信息.全天_温度组, 临时_温度 )计次循环尾 ()临时文本 = 文本_取出中间文本 (局_源代码, “ [list] ”, “[/list]”) 临时文本组 = 分割文本 (临时文本, “”, 7 )计次循环首 (取数组成员数 (临时文本组 ), i )天气信息.七天预报 [i ].日期 = 文本_取出中间文本 (临时文本组 [i ], “”, “/span>”, )天气信息.七天预报 [i ].日期 = 文本_替换 (天气信息.七天预报 [i ].日期, , , , “ ”, “”, #换行符, “”, “”, “(”, “<”, “)”)天气信息.七天预报 [i ].天气 = 文本_取出中间文本 (临时文本组 [i ], “”, “ ”, )天气信息.七天预报 [i ].天气 = 文本_替换 (天气信息.七天预报 [i ].天气, , , , “ ”, “”, #换行符, “”, “”, “(”, “”, “)”, “)(”, “|”)天气信息.七天预报 [i ].风向 = 文本_取出中间文本 (临时文本组 [i ], “”, “ ”, )天气信息.七天预报 [i ].风向 = 文本_替换 (天气信息.七天预报 [i ].风向, , , , “ ”, “”, #换行符, “”, “”, “(”, “”, “)”, “)(”, “|”)天气信息.七天预报 [i ].温度 = 文本_取出中间文本 (临时文本组 [i ], “”, “ ”, )天气信息.七天预报 [i ].温度 = 文本_替换 (天气信息.七天预报 [i ].温度, , , , “ ”, “”, #换行符, “”, “”, “(”, “”, “)”, “)(”, “|”)计次循环尾 ()天气信息.感冒指数 = 文本_取出中间文本 (局_源代码, “”, “ ”) 天气信息.感冒指数 = 文本_替换 (天气信息.感冒指数, , , , “ ”, “”, #换行符, “”, “”, “(”, “ ”, “)”, “) (”, “:”) 天气信息.穿衣指数 = 文本_取出中间文本 (局_源代码, “”, “ ”) 天气信息.穿衣指数 = 文本_替换 (天气信息.穿衣指数, , , , “ ”, “”, #换行符, “”, “”, “(”, “ ”, “)”, “) (”, “:”) 天气信息.洗车指数 = 文本_取出中间文本 (局_源代码, “”, “ ”) 天气信息.洗车指数 = 文本_替换 (天气信息.洗车指数, , , , “ ”, “”, #换行符, “”, “”, “(”, “ ”, “)”, “) (”, “:”) 天气信息.晨练指数 = 文本_取出中间文本 (局_源代码, “”, “ ”) 天气信息.晨练指数 = 文本_替换 (天气信息.晨练指数, , , , “ ”, “”, #换行符, “”, “”, “(”, “ ”, “)”, “) (”, “:”) 天气信息.紫外线指数 = 文本_取出中间文本 (局_源代码, “”, “ ”) 天气信息.紫外线指数 = 文本_替换 (天气信息.紫外线指数, , , , “ ”, “”, #换行符, “”, “”, “(”, “ ”, “)”, “) (”, “:”) 返回 (天气信息 )
天气预报源码.zip
(790.06 KB, 下载次数: 97)
|