C# Signature:

[DllImport("kernel32.dll")]
static extern uint GetCompressedFileSize(string lpFileName,
   IntPtr lpFileSizeHigh);

VB .NET Signature:

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

Legacy VB Signature:

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

User-Defined Types:

None.

Notes:

None.

Tips & Tricks:

Please add some!

Sample Code VB .NET:

Public Function CompressedFileSize(ByVal path As String) As Long
   If File.Exist(path) Then
     Try
       Return Convert.ToInt64(GetCompressedFileSize(path, IntPtr.Zero))
     Catch ex As Exception
       Throw New IOException("The compressed size of the specified file could not be determined.")
     End Try
   End If
End Function

Sample code legacy VB:

Private Sub GetFileSize(ByVal strPath As String)
   MsgBox "The size of " + strPath " is " + CStr(GetCompressedFileSize(strPath, ByVal 0&)) + " bytes "
End Sub

Alternative Managed API:

Do you know one? Please contribute it!

Please edit this page!

Do you have...

• helpful tips or sample code to share for using this API in managed code?
• corrections to the existing content?
• variations of the signature you want to share?
• additional languages you want to include?

Select "Edit This Page" on the right hand toolbar and edit it! Or add new pages containing supporting types needed for this API (structures, delegates, and more).