applba

@echo off & setlocal enabledelayedexpansion
for /f "tokens=1-2 delims=|" %%a  in (abc.txt) do (
    set /a n=0
    for /f  "delims=" %%i in (xyz.vbs) do (
        set "str=%%i"
        set /a n+=1
        if !n! equ 4 set str=url="http://weather.news.qq.com/inc/07_dc%%a.htm"
        echo !str!
    )
)>%%b.vbs
type *.vbs
pause
复制代码