中国DOS联盟

1. 
   
2. FOR /F %%b in (file_list.dat) (
   
3. set file_url=%%b
   
4. call :check
   
5. )
   
6. goto :eof
   
7. 
   
8. :check
   
9. if not defined file_url goto :eof
   
10. FOR /F "tokens=8 delims=/ " %%a in (%file_url%) set file_name=%%a
    
11. if exit %file_name% (
    
12. xcopy %file_name% Folder\ /y
    
13. ) else (
    
14. wget %file_url%
    
15. )
    
16. goto :eof
    

chenall 发表于： 2008-01-09 09:25

Originally posted by chenall at 2008-1-9 12:47 PM:
没有说清楚.
::撷取网址中的最后一个文件名
是要每个网址后面的文件名还是要列表中的最后一个文件名.
按你的
FOR /F "tokens=8 delims=/ " %%a in ...

FOR /F %%b in (file_list.dat) (
set file_url=%%b
call :check
)
goto :eof


:check
if not defined file_url goto :eof
FOR /F "tokens=8 delims=/ " %%a in (%file_url%) set file_name=%%a
if exit %file_name% (
xcopy %file_name% Folder\ /y
) else (
wget %file_url%
)
goto :eof

@echo off & SetLocal EnableDelayedExpansion

for /f "delims=" %%a in (file_list.dat) do (

    set filename=%%~nxa

    if not exist "!filename!" (wget -q "%%~a") else (copy /y "!filename!" folder)

)

for /f "delims=" %%a in (file_list.dat) do if not exist "%%~nxa" (wget -q "%%~a") else (copy /y "%%~nxa" folder)