open "output.txt" for output as #f
close #f

dirOk = mkdir( "f:\doc")
if not(dirOk) then print "Directory not created!": end

open "f:\doc\output.txt" for output as #f
close #f