• Home
 · 
• Miscellaneous
 · 
• Creates files,folders,and write in the file.

Creates files,folders,and write in the file.

Creates files,folders,and write in the file.

API Declarations


' A form with a create button.



Rate Creates files,folders,and write in the file.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim txt as TextStream

Private Sub Create_Click()
mkdir("d:\\My Folder")
chdir("D:\\My Folder")
Set txt = FSO.CreateTextFile("D:\\My Folder\\My File.txt",TRUE)
txt.WriteLine("This is a sample text.")
txt.Write ("this is on the same line!")
txt.WriteBlankLines (10) 'writes 10 blank lines
txt.WriteLine("Ending text!!!!") 'ending text
txt.close
End Sub