I thought some may find this useful as it will create a file folder tree on an ftp site with MS. It assumes there is a subfolder of the root.
Let>ftpusername=
Let>ftppassword=
Let>ftpport=21
//local path is actually the path to be created on the ftp site
Let>localpath=ftp.edocfile.info/kpassaur/sam/ted/frank
Separate>%localpath%,/,ftparray
Let>sf=ftparray_count
Let>rootftp=ftparray_1
StringReplace>%localpath%,%rootftp%,ftpfolder
GoSub>FTPSUB
SRT>FTPSUB
FTPGetDirList>%rootftp%,%ftpusername%,%ftppassword%,%ftpport%,c:\temp\readme.txt,%ftpfolder%,D
IF>FTP_RESULT=Success
Goto>Haveftpdir
Endif
Let>cs=2
Let>subd=ftparray_%cs%
Let>testfolder=/%subd%
Label>startbuildfolders
FTPGetDirList>%rootftp%,%ftpusername%,%ftppassword%,%ftpport%,c:\temp\readme.txt,%testfolder%,D
IF>FTP_RESULT=Success
If>%testfolder%=%ftpfolder%
Goto>Haveftpdir
Endif
Let>cs=cs+1
If>%cs%>%sf%
MDL>cannot create ftp direcot0ry
Endif
Let>subd=ftparray_%cs%
Let>testfolder=%testfolder%/%subd%
Goto>startbuildfolders
Else
FTPMakeDir>ftp.edocfile.info,%ftpusername%,%ftppassword%,%ftpport%,%testfolder%
IF>FTP_RESULT=Success
Goto>startbuildfolders
Else
MDL>Cannot build Subdirectory
Endif
Endif
Label>Haveftpdir
END>FTPSUB
MDL>Finished
