Create Directory If It Doesn't Exist

If File.ExternalWritable Then
      			If File.IsDirectory(File.DirRootExternal,"new/") = False Then
	  				File.MakeDir(File.DirRootExternal, "new")
      				sDBLocation = File.DirRootExternal & "/new"
	  			End If
   			Else
				If File.IsDirectory(File.DirInternal,"new/") = False Then
      				File.MakeDir(File.DirInternal, "new")
      				sDBLocation = File.DirInternal & "/new"
   				End If
			End If

Originally Posted on September 27, 2013
Last Updated on October 26, 2015

All information on this site is shared with the intention to help. Before any source code or program is ran on a production (non-development) system it is suggested you test it and fully understand what it is doing not just what it appears it is doing. I accept no responsibility for any damage you may do with this code.

Related