vbs Size 屬性使用介紹(獲取文件大小)
更新時間：2014年05月02日 00:37:19 投稿：mdxy-dxy
為大家介紹vbs屬性之size屬性，供大家學(xué)習(xí)參考。Size 屬性 對于文件，返回指定文件的字節(jié)數(shù)；對于文件夾，返回該文件夾中所有文件和子文件夾的字節(jié)數(shù)
為大家介紹vbs屬性之size屬性，供大家學(xué)習(xí)參考。
Size 屬性
對于文件，返回指定文件的字節(jié)數(shù)；對于文件夾，返回該文件夾中所有文件和子文件夾的字節(jié)數(shù)。方便我們判斷文件的大小。
說明
object.Size
object 應(yīng)為 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 & " 字節(jié)。"
ShowFolderSize = s
End Function
有時候我們需要獲取一些文件的大小，來實現(xiàn)是否需要復(fù)制，下面是腳本之家小編寫的代碼
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的文件生成時間與大小，來確認(rèn)是否需要覆蓋第二個文檔f2，大家可以根據(jù)需要自己獲取。
相關(guān)文章
VBS教程：運算符-邏輯運算符...2006-11-11
VBS ArrayList Class vbs中的數(shù)組類
VBS ArrayList Class vbs中的數(shù)組類...2007-03-03
讓VBS腳本也有GUI圖形界面,主要是利用了vbs中的internetexplorer.application組件，實現(xiàn)打開一個ie頁面。2011-01-01
電腦瀏覽器記住密碼功能好蛋疼~有時候不好用~~登錄CMCC-EDU的時候老是要輸入帳號。。看了看登錄頁面的網(wǎng)頁源碼~~擼起個Vbs腳本~讀取配置文件，簡單實現(xiàn)了自己登錄CMCC-EDU,把帳號存在同級目錄下就好,需要的朋友可以參考下2018-04-04
用vbs實現(xiàn)的強(qiáng)制殺進(jìn)程的腳本
用vbscript實現(xiàn)的強(qiáng)制殺系統(tǒng)進(jìn)程的腳本代碼，主要用于一些殺毒軟件，占系統(tǒng)內(nèi)存或cpu，我們可以用下面的方法殺掉，黑人也必須殺掉殺毒軟件，才能進(jìn)行下一步操作，不建議搞破壞。2008-05-05
vbs中通過intpu傳值進(jìn)行運算的方法，需要的朋友可以參考下。2011-03-03
sql 復(fù)制記錄2008-08-08
VBS教程：方法-GetDriveName 方法...2006-11-11
VBS教程：函數(shù)-IsDate 函數(shù)...2006-11-11
用vbs寫的一個QWERTY解密與QWERTY加密的代碼，需要的朋友可以參考下2013-01-01