CreatePath() uses API calls to create a directory tree. A simple application is included to demonstrate its use.
Inputs
sPath - A string containing the required directory structure.
Assumes
Module modCreatePath contains all of the code and API declarations required to use the function in your project.
Returns
Boolean - True if the directory structure has been created or already exists, False on error.
Side Effects
None.
API DeclarationsPublic Type SECURITY_ATTRIBUTES
nLength As Long
lpSecurityDescriptor As Long
bInheritHandle As Long
End Type
Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long
Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" (ByVal lpPathName As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long