- @echo off
- REM 几十个供销商网站地址全部放到URL.txt里面,每行一个网址
- for /f "delims=" %%i in ('type "URL.txt"') do (
- call :OpenURL "%%i"
- )
- goto :eof
-
- :OpenURL
- start "" "C:\Program Files\Internet Explorer\iexplore.exe" %1
-
- :CheckProc
- tasklist /nh | find /i "iexplore.exe"
- if errorlevel 1 (
- goto :eof
- ) else (
- goto :CheckProc
- )
复制代码
|