[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
网页能读取这个列表吗: http://batch-cn.qiniudn.com/list/tool.txt

可以的话试一下运行下面这个返回的数字是多少:
  1. <!-- :
  2. @mshta "%~f0"
  3. -->
  4. <script>
  5. var host = 'http://batch-cn.qiniudn.com/'
  6. var ar = getText(host+'list/tool.txt').split(/\r?\n/)
  7. alert(ar.length)
  8. function getText(strUrl){
  9. var http = new ActiveXObject("Msxml2.ServerXMLHTTP")
  10. http.open("GET",strUrl+'?'+Math.random(),false)
  11. http.send()
  12. if(http.status>=400)return
  13. var stream = new ActiveXObject("ADODB.Stream")
  14. stream.Type = 1
  15. stream.Mode = 3
  16. stream.open()
  17. stream.write(http.responseBody)
  18. stream.Position = 0
  19. stream.Type = 2
  20. stream.CharSet = 'gb2312'
  21. return stream.ReadText
  22. }
  23. close()
  24. </script>
复制代码

TOP

返回列表