vbs Size 属性使用介绍(获取文件大小)
程序员文章站
2024-01-02 17:06:16
为大家介绍vbs属性之size属性,供大家学习参考。
size 属性
对于文件,返回指定文件的字节数;对于文件夹,返回该文件夹中所有文件和子文件夹的字节数。方便我们判断...
为大家介绍vbs属性之size属性,供大家学习参考。
size 属性
对于文件,返回指定文件的字节数;对于文件夹,返回该文件夹中所有文件和子文件夹的字节数。方便我们判断文件的大小。
说明
object.size
object 应为 file 或 folder 对象的名称。
folder 对象的 size 属性示例:
function showfoldersize(filespec) dim fso, f, s set fso = createobject("scripting.filesystemobject") set f = fso.getfolder(filespec) s = ucase(f.name) & " 大小为 " & f.size & " 字节。" showfoldersize = s end function
有时候我们需要获取一些文件的大小,来实现是否需要复制,下面是小编写的代码
dim fso set fso = createobject("scripting.filesystemobject") f1="d:\webroot\news.html" f2="d:\webroot2\news.html" fsize=3000 set fn2=fso.getfile(f1) flsize2=fn2.size fldate2=fn2.datelastmodified set fn=fso.getfile(f2) flsize1=fn.size fldate1=fn.datelastmodified if fso.fileexists(f1) and flsize2>fsize and fldate2>fldate1 then fso.getfile(f1).copy(f2) if err.number=0 then writehistory "成功"&now()&".........","log.txt" end if sub writehistory(hischars, path) const forreading = 1, forappending = 8 dim fso, f set fso = createobject("scripting.filesystemobject") set f = fso.opentextfile(path, forappending, true) f.writeline hischars f.close end sub
主要功能是判断f1的文件生成时间与大小,来确认是否需要覆盖第二个文档f2,大家可以根据需要自己获取。