“Shrink” the Size of a File

“Shrink” the Size of a File

Visual Basic lacks the ability to make a file smaller without having to recreate it. But it is possible to use the SetEndOfFile API. Here is a function for it:

 Private Const FILE_BEGIN = 0 Private Const OPEN_EXISTING = 3 Private Const INVALID_HANDLE_VALUE = -1 Private Const GENERIC_WRITE = &H40000000 Private Declare Function CreateFile Lib


Share the Post: