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