Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" (ByVal DirPath As String) As Long Private Sub Form_Load() MakeSureDirectoryPathExists "c:/a/b/c/d/" End Sub
