VBS遍历目录及文件

上一篇 / 下一篇  2011-04-07 10:46:00 / 个人分类:软件测试

H&F4|5^0ZR0遍历目录及目录下文件,修改下面的vbs脚本可以做很多事情,例如修改文件名的后缀等51Testing软件测试网}djo`&_$KX)L

X'h^ pO)T0Dim fso,dc,file,files,folder,subfolders,subfolder
"d&[Z$Z[F4? q0set fso=createobject("scripting.filesystemobject")
VW{W![{y0set dc=fso.Drives51Testing软件测试网"K+|%dA'B:Z!E

#o4^RX/b7X+d5x0for each d in dc51Testing软件测试网(WS#j#y&l5HAR7? d

Y9bU[,a#E|9dx0wscript.echo d
+B*CKZ1WP ~0if d.drivetype=3 or d.drivetype=2 then51Testing软件测试网!i6Rn7KmA(Uv{
set folder=fso.getfolder(d)'set folder=fso.getfolder("c:\")
N6_Y1?7W?+b5zY051Testing软件测试网"f6P,TJ?
 wscript.echo folder
@!v8\Bf0set files=folder.files51Testing软件测试网(uu3BMNH_ X
'搜索其目录下的文件51Testing软件测试网B3f-m One
for each file in files51Testing软件测试网?y5v6fq*@.FE;a
wscript.echo file51Testing软件测试网[`1S%z![/t
next51Testing软件测试网 `n\;_ M!AXqB
end if
](`2o;L5z"] J,I0next51Testing软件测试网fv C|y{?Fr

51Testing软件测试网R%Ey KA"VzsH


-\+cG5uI9r`JZ\0'搜索其他目录51Testing软件测试网.~(p8hzO#m1q'X
set subfolders=folder.subfolders

#ak%?-}\0

qX,KvJ1?p u0for each subfolder in subfolders
O&U{x'zA[0wscript.echo subfolder51Testing软件测试网9]U4me V})q Ow
next51Testing软件测试网2L-`:s&G2}
51Testing软件测试网s y8D8z ]3?

51Testing软件测试网(ze c:J9lv,z

 51Testing软件测试网b(])[E$xmxC

51Testing软件测试网mf I)V`3H7v9H4Zs3}

FSO包含的常见对象有:
"nH"BK*`ud/~Z0Drive对象:包含储存设备的信息,包括硬盘、光驱、ram盘、网络驱动器51Testing软件测试网\D5Ql Q/Ym6P v&y
Drives集合:提供一个物理和逻辑驱动器的列表51Testing软件测试网 Z'X2MG3c(Q&FT
File 对象:检查和处理文件
D`;x/cT f;ic0Files 集合:提供一个文件夹中的文件列表
'q FP t&G0Folder对象:检查和处理文件夹51Testing软件测试网aWL/G4TRnU*C
Folders集合:提供文件夹中子文件夹的列表51Testing软件测试网$s1TPG| Y
Textstream对象:读写文本文件
hh#cz,Z*s0r0FSO的常见方法有:51Testing软件测试网3Su(`(]J:V1y"T:V w}
BulidPath:把文件路径信息添加到现有的文件路径上51Testing软件测试网sJ:k(Y-]XL
CopyFile:复制文件51Testing软件测试网B kF'd2`Xt
CopyFolder:复制文件夹51Testing软件测试网!eif&S,`)B5p
CreateFolder:创建文件夹
nQux:h-t0CreateTextFile:创建文本并返回一个TextStream对象
on!S+gk@#A\r9zI0DeleteFile:删除文件
A*WMg(AQ |$pV0DeleteFolder:删除文件夹及其中所有内容51Testing软件测试网:uPx:[ qW y/T
DriveExits:确定驱动器是否存在51Testing软件测试网;A}_/e%b;Q[1T$e5Q'W
FileExits:确定一个文件是否存在
,F!uX4G*d(O[N0{'|0FolderExists:确定某文件夹是否存在51Testing软件测试网+\^B wR6ELG
GetAbsolutePathName:返回一个文件夹或文件的绝对路径
3KC'I\(_|_r0GetBaseName:返回一个文件或文件夹的基本路径
5z Z#Z#huV4G0GetDrive:返回一个dreve对象
0I1Q%KJc/Y'kME0GetDriveName:返回一个驱动器的名字51Testing软件测试网 l^#k:Vq;A7}

t o*[:[/]3uJ0GetExtensionName:返回扩展名
8|$E3M1Z4[X#s0GetFile:返回一个file对象51Testing软件测试网)rU!a.t*^`"y
GetFileName:返回文件夹中文件名称
REf'Ea'c{!P$_-|w0GetFolder:返回一个文件夹对象
e0C#Bw/|}!`[e0GetParentFolderName:返回一个文件夹的父文件夹51Testing软件测试网y~|Z8v9M
GetSpecialFolder:返回指向一个特殊文件夹的对象指针51Testing软件测试网:^ F;jv&k:N Ed5o
GetTempName:返回一个可以被createtextfile使用的随机产生的文件或文件夹的名称51Testing软件测试网rK ]1H0M
MoveFile:移动文件51Testing软件测试网-@3U u2[ Q
MoveFolder:移动文件夹
FU5F"ys:L0penTextFile:打开一个存在的文件并返回一个TextStream对象51Testing软件测试网|LPu4Pu ~UjuK9c


TAG:

 

评分:0

我来说两句

Open Toolbar