This can be done using the FoxTools.FLL.
I've included the help entry from the FoxTools.hlp file.
MkDir( )
Creates a directory or folder.
Syntax
MkDir(cPath)
cPath
Specifies the path to create.
Return Type
Numeric
Remarks
This function will not check for the valid length and format of a directory string. The return values are:
0 success
1 no success
6 directory already exists
This function is only available in FoxTools version 1.01 or later.
Normally you'd have code something like this near the beginning of your program.
IF !("FOXTOOLS.FLL" $ set("LIBRARY"

)
&& assume it's where it should have been installed !
lcfptfll = sys(2004)+"foxtools.fll"
lcfptfll = locfile(lcfptfll, "FLL", "Where is FOXTOOLS.FLL?"

IF EMPTY(lcfptfll))
WAIT WINDOW "Can't run without FOXTOOLS.FLL" TIMEOUT 30
*DO shutdown ?
RETURN
ENDIF
SET library to (lcfptfll) ADDITIVE
RELEASE lcfptfll
ENDIF
***
Rick