- 帖子
- 8
- 积分
- 13
- 技术
- 0
- 捐助
- 0
- 注册时间
- 2010-9-27
|
代码如下
::天气预报--------------------------------
::得到天气城市名
for /f "tokens=1 delims=," %%i in ('cscript //NoLogo /e:vbscript "%temp%\webget.vbs" "http://api.liqwei.com/weather/"') do (set "tqcs=%%i")
::得到天气预报并合并成一行赋值给变量
for /f "delims=" %%i in ('cscript //NoLogo /e:vbscript "%temp%\webget.vbs" "http://api.liqwei.com/weather/"') do call set "tq=%%tq%%%%i"
::除去变量中的空格
set tq=%tq: =%
::检查天气变量是否为空,防止获取失败时显示变量名
if "%tq%"=="" set tq=
::变量格式处理
set tq=%tq:%tqcs%=\n%
::上面这一行,用%tqcs%调用城市名,把城市名全部换成换行符号。但是嵌套的变量名不起作用。
set tq=%tq:风,=风%
set tq=%tq:,10-=%
set tq=%tq:,11-=%
set tq=%tq:,12-=%
set tq=%tq:,1-=%
set tq=%tq:,2-=%
set tq=%tq:,3-=%
set tq=%tq:,4-=%
set tq=%tq:,5-=%
set tq=%tq:,6-=%
set tq=%tq:,7-=%
set tq=%tq:,8-=%
set tq=%tq:,9-=%
set tq=%tq:10,=10日%
set tq=%tq:11,=11日%
set tq=%tq:12,=12日%
set tq=%tq:13,=13日%
set tq=%tq:14,=14日%
set tq=%tq:15,=15日%
set tq=%tq:16,=16日%
set tq=%tq:17,=17日%
set tq=%tq:18,=18日%
set tq=%tq:19,=19日%
set tq=%tq:20,=20日%
set tq=%tq:21,=21日%
set tq=%tq:22,=22日%
set tq=%tq:23,=23日%
set tq=%tq:24,=24日%
set tq=%tq:25,=25日%
set tq=%tq:26,=26日%
set tq=%tq:27,=27日%
set tq=%tq:28,=28日%
set tq=%tq:29,=29日%
set tq=%tq:30,=30日%
set tq=%tq:31,=31日%
set tq=%tq:1,=1日%
set tq=%tq:2,=2日%
set tq=%tq:3,=3日%
set tq=%tq:4,=4日%
set tq=%tq:5,=5日%
set tq=%tq:6,=6日%
set tq=%tq:7,=7日%
set tq=%tq:8,=8日%
set tq=%tq:9,=9日%
set tq=%tq:℃~=~%
set tq=%tq:,=%
set tq=%tqcs%天气%tq%
请大家帮忙处理一下。谢谢!! |
|