colocar esto en un módulo REGULAR
Opción explícita
El público declara la liberación “imagehlp.dll” de MakeSureDirectoryPathExists de la función (lpPath de ByVal como secuencia) como de largo
---------------------
para utilizar
Llamada MakeSureDirectoryPathExists (“C:\MainFolder\” y SubFolder de Me.txt y” \ ")
esto creará automáticamente las carpetas si no hacen existen.
usar esto
Llamada MakeSureDirectoryPathExists (“c:\a\b\c\d\e\ ")
creará todas las carpetas especificadas en la línea.
NOTE* el carácter pasado de la línea debe ser una barra \