Save data and report in subfolder

Hi,

I spend one day  trying to solve this "stupid" thing  but now I raise my white flag.

Hope someone could show me the way.

In my script I want to organize the output result in such a way to have:

tdm files in "testdata" folder

pdf + xls in "testdata"\"document" folder

I'm able to create the testdata folder, but no idea how to create the subfolder.

The testdata folder should be a variable because it change test by test.

I've highlighted the error in my script.

dim myfold
myfold = inputbox("Inserire nome della prova", "diadem", DataSetName)
call foldercreate(DataReadPath & myfold)
call foldercreate(DataReadPath & myfold\"documents")

rem 'Save elaborated data
rem If (FileNameGet ("NAVIGATOR", "FileWrite", DataReadPath & DataSetName & myfold & "." & DataExtension) = "IDOk") Then
rem Else 'Dialog was canceled
  rem Call MsgBoxDisp ("Data saving was canceled")
rem End If

Bye