批处理如何实现超过5秒没反映跳到下一个？

zahirll

1. @echo off
   
2. more +9 "%~f0" >GetUrlText.vbs
   
3. type nul >2.txt
   
4. for /f %%a in (1.txt) do (
   
5.     echo 正在检测：%%a
   
6.     cscript //nologo GetUrlText.vbs http://%%a/123.asp | findstr "<title>你好你好</title>" && >>2.txt echo,%%a
   
7. )
   
8. goto :eof
   
9. 
   
10. strURL=WScript.Arguments(0)
    
11. WScript.Echo strURL
    
12. Set objXmlHttp = CreateObject("Microsoft.XMLHTTP")
    
13. objXmlHttp.Open "GET",strURL,0
    
14. objXmlHttp.Send()
    
15. Set objStream = CreateObject("ADODB.Stream")
    
16. objStream.Mode = 3
    
17. objStream.Type = 1
    
18. objStream.Open()
    
19. objStream.Write(objXmlHttp.responsebody)
    
20. objStream.Position = 0
    
21. objStream.Type = 2
    
22. objStream.Charset = "utf-8"
    
23. strText = objStream.Readtext
    
24. WScript.Echo strText

复制代码

可能有些站没反映，或者被卡死的，他就会卡在那不动了，想让他5秒钟没反映跳到下一个去检测

awk

cscript命令的/t选项可以设置超时吧