本帖最后由 bbaa 于 2017-1-31 21:49 编辑
- @Rem Made By:Bbaa
- @Echo off
- @Setlocal enabledelayedexpansion
- @Rem Demo
- :BegIn
- Rem 获取必备参数
- Set File=xx.txt &&Rem 输入文件名
- Set 下载文件列表_计数=1
- For %%i In (
- "http://www.baidu.com/"
- ""
- ""
- ) do (Set "___下载文件列表___!下载文件列表_计数!=%%~i"&&Set /a 下载文件列表_计数+=1)
- :Begin_2
- For /f "Tokens=1,2" %%i In (%File%) Do (
- rasdial 拨号连接 %%i %%j
- Call :Begin_Cx
- )
- :End
- echo 处理完成
- Pause>nul&Exit
-
-
- :Begin_Cx
- Call :Tools
- For /f "Tokens=2 delims==" %%a In ('Set ___下载文件列表___') do (
- Wget -q -c "%%a">nul 2>nul||Echo;%%a 下载失败
- )
- Goto :Eof
-
- :Tools
- wget --version>nul 2>nul&&Goto :Eof
- Echo;未找到第三方:Wget
- Pause>nul&Exit
复制代码 注意:该板块不是“帮你做事”而是“教你怎么做”,如果你不是在学习过程中遇到困难需要帮助解惑,只是临时需要(不打算学习只想要现成的代码)或急需解决问题,请移步『有偿求助区』发帖
然而我还是帮你做了........... |