返回列表 发帖
thatnight

Rank: 2

帖子
5 
积分
115 
技术
0  
捐助
0  
注册时间
2009-8-19 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2009-8-19 11:27 | 只看该作者

[问题求助] vbs如何实现将指定文件复制到一个txt文本列出的多个目录/路径/文件夹里

本帖最后由 pcl_test 于 2016-8-12 21:52 编辑

VBS按行读取整个文件然后写入
文本中每行都是一个路径  我想读取出每个路径  向这个路径中copy个文件   
感谢 高手指点下

我百度了下vbs脚本 没查到什么实用的 也许小弟水平有限  感谢
收藏 分享

slore

Rank: 5Rank: 5

帖子
281 
积分
1063 
技术
22  
捐助
0  
注册时间
2008-9-12 
2楼
发表于 2009-8-19 11:29 | 只看该作者
bat 的 for 更方便

TOP

基拉freedom

Rank: 5Rank: 5

帖子
245 
积分
1024 
技术
5  
捐助
0  
注册时间
2008-7-31 
3楼
发表于 2009-8-19 11:32 | 只看该作者 
@echo off
for /f  "delims=“ %%i in (文件名.文件后缀) do copy 文件名 "%%i/文件名"COPY
o(∩_∩)o...~~~
空间：http://hi.baidu.com/fair_jm
喜欢批处理的没事的话去逛逛哦~~

TOP

thatnight

Rank: 2

帖子
5 
积分
115 
技术
0  
捐助
0  
注册时间
2009-8-19 
4楼
发表于 2009-8-19 17:43 | 只看该作者
感谢 vbs 脚本怎么写的

TOP

rat

Rank: 8Rank: 8

帖子
332 
积分
1983 
技术
14  
捐助
0  
注册时间
2008-9-10 
5楼
发表于 2009-8-20 17:12 | 只看该作者 
Const TXT = "a.txt"
Const FILE_SRC = "a.exe"
 
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oFile = oFSO.OpenTextFile(TXT)
Do Until oFile.AtEndOfStream
        oFSO.CopyFile FILE_SRC, oFile.ReadLine & "\", True
LoopCOPY

[ 本帖最后由 rat 于 2009-8-20 17:13 编辑 ]

TOP

thatnight

Rank: 2

帖子
5 
积分
115 
技术
0  
捐助
0  
注册时间
2009-8-19 
6楼
发表于 2009-8-25 22:27 | 只看该作者
感谢 学到了  。。。

TOP

thatnight

Rank: 2

帖子
5 
积分
115 
技术
0  
捐助
0  
注册时间
2009-8-19 
7楼
发表于 2009-8-26 14:55 | 只看该作者
Microsoft (R) Windows Script Host Version 5.6
版权所有(C) Microsoft Corporation 1996-2001。保留所有权利。
提示这个原因是怎么回事
执行其他的vbs 可以

TOP

返回列表