vbs中如何使用Size属性

本篇文章为大家展示了vbs中如何使用Size属性，内容简明扼要并且容易理解，绝对能使你眼前一亮，通过这篇文章的详细介绍希望你能有所收获。

Size 属性

对于文件，返回指定文件的字节数；对于文件夹，返回该文件夹中所有文件和子文件夹的字节数。方便我们判断文件的大小。

说明object.Sizeobject 应为 File 或 Folder 对象的名称。

Folder 对象的 Size 属性示例：

FunctionShowFolderSize(filespec)
Dimfso,f,s
Setfso=CreateObject("Scripting.FileSystemObject")
Setf=fso.GetFolder(filespec)
s=UCase(f.Name)&"大小为"&f.size&"字节。"
ShowFolderSize=s
EndFunction

有时候我们需要获取一些文件的大小，来实现是否需要复制，下面是恰卡编程网小编写的代码

Dimfso
Setfso=CreateObject("Scripting.FileSystemObject")
f1="d:\webroot\news.html"
f2="d:\webroot2\news.html"
fsize=3000
setfn2=fso.GetFile(f1)
flsize2=fn2.size
fldate2=fn2.datelastmodified
setfn=fso.GetFile(f2)
flsize1=fn.size
fldate1=fn.datelastmodified
Iffso.FileExists(f1)andflsize2>fsizeandfldate2>fldate1Then
fso.getfile(f1).copy(f2)
iferr.number=0thenWriteHistory"成功"&now()&".........","log.txt"
endif

SubWriteHistory(hisChars,path)
ConstForReading=1,ForAppending=8
Dimfso,f
Setfso=CreateObject("Scripting.FileSystemObject")
Setf=fso.OpenTextFile(path,ForAppending,True)
f.WriteLinehisChars
f.Close
EndSub

主要功能是判断f1的文件生成时间与大小，来确认是否需要覆盖第二个文档f2，大家可以根据需要自己获取。

上述内容就是vbs中如何使用Size属性，你们学到知识或技能了吗？如果还想学到更多技能或者丰富自己的知识储备，欢迎关注恰卡编程网行业资讯频道。