【已解决】批处理+JS组合下载wget程序无效

CrLf · 发表于 2015-10-25 23:12:31

和代码无关，只是在七牛云的空间里关了防盗链而已

447219071 · 发表于 2015-10-25 23:54:14

本帖最后由 447219071 于 2015-10-25 23:57 编辑

回复 16# CrLf
这样不是办法
防盗链是为了原创而进行的保护,必不可少的
能否在官方tool.js上做下完善解决这种情况?

447219071 · 发表于 2015-10-25 23:56:14

我现在在百度上搜索我想要的关键词,
官方网站是排在第一的,排名极棒

CrLf · 发表于 2015-10-26 00:55:00

本帖最后由 CrLf 于 2015-10-26 01:05 编辑

回复 17# 447219071

不知道是什么原因造成的，先排查下，你试试在三台电脑上分别运行这个 bat 是什么结果，并告诉我之前是哪两台不能用：

<!-- :
@echo off
mshta "%~f0" | more
pause & exit
-->
<script src='http://www.bathome.net/lib/diy/hide.js'></script>
<script src='http://www.bathome.net/lib/diy/WSH.js'></script>
<script>
WSH.Echo(getText('http://121.40.138.166/REFERER.php').replace(/\<br \/\>/g,'\r\n'))
close()
function getText(strUrl){
try{var http = new ActiveXObject("Msxml2.ServerXMLHTTP")}
catch(Err){
try{var http = new ActiveXObject("Msxml2.XMLHTTP")}
catch(Err){
var http = new ActiveXObject("Microsoft.XMLHTTP")
}
}
http.open("GET",strUrl+'?'+Math.random(),false)
http.send()
if(http.status>=400)return
var stream = new ActiveXObject("ADODB.Stream")
stream.Type = 1
stream.Mode = 3
stream.open()
stream.write(http.responseBody)
stream.Position = 0
stream.Type = 2
stream.CharSet = 'gb2312'
return stream.ReadText
}
</script>

复制代码

447219071 · 发表于 2015-10-26 10:36:35

本帖最后由 447219071 于 2015-10-26 10:42 编辑

回复 19# CrLf
两边的电脑i不能运行之前的代码
执行这批处理结果如下：

request_method=get
http_user_agent=mozilla/4.0(compatible;win32;winhttp.winhttprequest.5)
http_dnt=unknow
http_referer=file://c:\documents and setting\administrator\桌面\1.bat
http_accept_encoding=unknow
http_accept_language=zh-cn
http_cookie=unknow

复制代码

而中间可以运行之前的代码
执行这批处理结果如下：

request_method=get
http_user_agent=mozilla/4.0(compatible;win32;winhttp.winhttprequest.5)
http_dnt=unknow
http_referer=unknow
http_accept_encoding=unknow
http_accept_language=zh-cn
http_cookie=unknow

复制代码

建议将执行结果输出到文本文件吧，也好复制

CrLf · 发表于 2015-10-26 17:46:15

本帖最后由 CrLf 于 2015-10-26 19:57 编辑

回复 20# 447219071

我又把防盗链开了，你再试试这个：

<!-- :
@echo off
mshta "%~f0" | more
pause & exit
-->
<script src='http://www.bathome.net/lib/diy/hide.js'></script>
<script src='http://www.bathome.net/lib/diy/WSH.js'></script>
<script>
WSH.Echo(getText('http://121.40.138.166/REFERER.php').replace(/\<br \/\>/g,'\r\n'))
WSH.Echo(getText('http://batch-cn.qiniudn.com/list/tool.@version.txt')?'获取成功 ':'获取失败 ')
WSH.Echo(getText('http://batch-cn.qiniudn.com/tool/gawk.exe')?'获取成功 ':'获取失败 ')
close()
function getText(strUrl){
var http = newcom("WinHttp.WinHttpRequest.5.1")
if(!http)http = newcom("Msxml2.ServerXMLHTTP")
if(!http)http = newcom("Msxml2.XMLHTTP")
if(!http)http = newcom("Microsoft.XMLHTTP")
http.open("GET",strUrl+'?'+Math.random(),false)
http.setRequestHeader('Referer', 'http://bathome.tools.js/')
http.send()
if(http.status>=400)return
var stream = new ActiveXObject("ADODB.Stream")
stream.Type = 1
stream.Mode = 3
stream.open()
stream.write(http.responseBody)
stream.Position = 0
stream.Type = 2
stream.CharSet = 'gb2312'
return stream.ReadText
}
function newcom(comName){
try{return new ActiveXObject(comName)}
catch(Err){}
}
</script>

复制代码

这个要是运行起来没问题的话，等站长更新 Tools.js 后就可以正常下载了

447219071 · 发表于 2015-10-26 20:05:36

回复 21# CrLf

request_method=get
http_user_agent=mozilla/4.0(compatible;win32;winhttp.winhttprequest.5)
http_dnt=unknow
http_referer=http://bathome.tools.js/
http_accept_encoding=unknow
http_accept_language=unknow
http_cookie=unknow
获取成功
获取成功

复制代码

CrLf · 发表于 2015-10-26 21:42:48

回复 22# 447219071

这说明新方案可行，你现在试试顶楼代码还有问题吗

447219071 · 发表于 2015-10-27 13:39:25

回复 23# CrLf

果然行了，这说明我反映的这确实是官方的BUG

，这下完善了，以后有问题我会反馈的

CrLf · 发表于 2015-10-27 17:28:37

本帖最后由 CrLf 于 2015-10-27 17:31 编辑

回复 24# 447219071

不算bug，只是你那里不知道为什么会设置 referer 为 hta 路径，导致被防盗链
目前是改用 winhttp 组件来发送请求，不过这个组件不支持异步onreadystatechange事件，异步功能可能有点麻烦，所以异步的情况仍使用 serverxmlhttp 旧方案，就没有同步那么通用了

447219071 · 发表于 2015-12-1 13:06:02

回复 2# CrLf

<^!-- :
@echo off
mshta "%~f0"
goto ok
-->
<script src=http://bbs.bathome.net/lib/diy/hide.js></script>
<script src=http://bbs.bathome.net/lib/diy/Tools.js></script>
<script>
Tools.get('wget','c:/windows/system32')
</script>

复制代码

今天用上面的代码，却没有反应了
难道官方改了接口或文件地址

我的系统环境XP SP3
运行这个会在任务栏一直增加无数个mshta进程

CrLf · 发表于 2015-12-1 13:23:55

等一天，昨天更新 Tools.js 时有个笔误，导致不会执行下载，等站长更新后即可修复

CrLf · 发表于 2015-12-1 20:58:12

已修复

447219071 · 发表于 2016-2-15 22:57:11

回复 2# CrLf

今天在WIN7 32位系统中运行时出现如下图

而在XP 32位下出现如下图

前几个月还没有问题，今天试了居然出错了

行：11
Cher:1
错误：“Tools”未定义
代码：0

CrLf · 发表于 2016-2-16 02:01:53

回复 29# 447219071

春节改动 Tools.js 时遗漏了一个 {，所以出错了，已提交修改，等站长更新即可

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 【已解决】批处理+JS组合下载wget程序无效

评分