GetCompressedFileSize

GetCompressedFileSize

VB聲明

Declare Function GetCompressedFileSize Lib "kernel32" Alias "GetCompressedFileSizeA" (ByVal lpFileName As String, lpFileSizeHigh As Long) As Long

說(shuō)明

判斷一個(gè)壓縮文件在磁盤(pán)上實(shí)際占據(jù)的字節(jié)數(shù)

返回值

Long，返回文件長(zhǎng)度。&HFFFFFFFF表示出錯(cuò)。注意如lpFileSizeHigh不為NULL，且結(jié)果為&HFFFFFFFF，那么必須調(diào)用GetLastError，判斷是否實(shí)際發(fā)生了一個(gè)錯(cuò)誤，因?yàn)檫@是一個(gè)有效的結(jié)果

參數(shù)表

參數(shù)

類(lèi)型及說(shuō)明

lpFileName

String，欲測(cè)試的文件名

lpFileSizeHigh

Long，指定一個(gè)Long值，用于裝載一個(gè)64位文件尺寸的高32位。如長(zhǎng)度沒(méi)有超過(guò)2＾32字節(jié)，則可設(shè)為NULL（變成ByVal）

注解

如磁盤(pán)卷已被壓縮，可檢查這個(gè)函數(shù)的結(jié)果是否與GetFileSize函數(shù)的結(jié)果有異，從而判斷文件是否也被壓縮（如有異，表明文件已被壓縮）

Top