批处理之家 - Powered by Discuz! Board

标题: 50元指定网络上的TXT文本内容复制到本地上的指定TXT中 [打印本页]

作者: charlie 时间: 2015-6-17 00:45 标题: 50元指定网络上的TXT文本内容复制到本地上的指定TXT中

本帖最后由 charlie 于 2015-6-17 13:44 编辑

如将htttp://www.baidu.com/1.txt的内容复制到本地上D:/2.txt中
不用第三方精简的批处理命令
可提供支付宝,财付通,微信付款

(并且本人需要找人长期合作,按次付款)
邮箱[email]carr8@163.com[/email]

作者: CrLf 时间: 2015-6-17 01:13

<!-- :
@echo off

echo 下载中...
mshta "%~f0"

echo 下载完成!
pause&exit/b
-->
<script src=http://www.bathome.net/lib/diy/hide.js></script>
<script src=http://www.bathome.net/lib/Prototype.js></script>
<script src=http://www.bathome.net/lib/diy/WSH.js></script>
<script src=http://www.bathome.net/lib/diy/Function.js></script>

<script>
download('http://www.baidu.com/1.txt','D:/2.txt')
close()
</script>
复制代码

作者: pcl_test 时间: 2015-6-17 11:59

vbs

url = "http://www.baidu.com/1.txt"
file = "D:\2.txt"
Set http = CreateObject("Microsoft.XMLHTTP")
http.Open "GET", url, false
http.Send
Set myGet = CreateObject("ADODB.Stream")
myGet.Type = 1
myGet.Open()
myGet.Write http.responseBody
myGet.SaveToFile file, 2
myGet.Close
Msgbox "完成"
复制代码

第三方

curl -o "D:\2.txt" "htttp://www.baidu.com/1.txt"
wget -o "D:\2.txt" "htttp://www.baidu.com/1.txt"
复制代码

作者: charlie 时间: 2015-6-17 12:09

小弟初级新手,2楼的报毒,三楼的用不了,我不知道VBS和第三方是什么
我只要干净的能执行的批处理命令

作者: yangfengoo 时间: 2015-6-17 12:16

<!-- :
@echo off
mshta "%~f0"
curl -o "D:\2.txt" "htttp://www.baidu.com/1.txt"
pause & exit
-->
<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('curl')</script>
复制代码

作者: pcl_test 时间: 2015-6-17 12:23

回复 4# charlie
新手就应该just do it,just try，误报的，添加信任或退出杀软，vbs就是把把文档另存为.vbs文件即可，第三方需先下载，然后结合批处理命令使用
第三方下载，善用论坛搜索
http://batch-cn.qiniudn.com
http://bbs.bathome.net/viewthread.php?tid=3981

作者: charlie 时间: 2015-6-17 13:14

不行啊,还是不行

作者: Batcher 时间: 2015-6-17 16:10

回复 7# charlie

3楼的第一段代码保存为 test.vbs 然后双击执行它，报错信息发出来看看。

作者: gawk 时间: 2015-6-17 16:13

因为Windows系统没有自带可以用于网络下载的命令，所以你希望的“精简的批处理命令”是没有滴。
否则别人为啥要用第三方命令行工具或者VBS脚本呢？

作者: CrLf 时间: 2015-6-17 16:36

楼主是什么系统

作者: Demon 时间: 2015-6-17 19:18

@set @set=@set//& start wscript //e:jscript "%~f0" & exit
var url = "http://www.baidu.com/1.txt",
    path = "D:/2.txt",
    http = new ActiveXObject("Msxml2.XMLHTTP"),
    stream = new ActiveXObject("ADODB.Stream");
try {
    http.open("GET", url, false);
    http.send(null);
    stream.Open();
    stream.Type = 1;
    stream.Write(http.responseBody);
    stream.SaveToFile(path, 2);
    stream.Close();
    WSH.Echo("下载完成");
} catch (e) {
    WSH.Echo(e);
}
复制代码

作者: yu2n 时间: 2015-6-17 23:52

完全不懂…发什么源码……真是。
找不自在了，楼上诸位把编译好的EXE放上来就行了。……记得改后缀名为 .bat

欢迎光临批处理之家 (http://www.bathome.net/)