Use this API call:
Code:
Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" ( _
    ByVal lpPath As String) As Long
Make sure lpPath ends with "\"