Creating a file

[Adamba]

Hiya all

im using the vb function,

open "c:\Example.txt" for input as #1
write #1, "Example"
close #1

but if c:\example does not exsist it just crashes . how do i get it to create the file if it isnt there, this way i can write to variable filenames.

Thanks in advance
Adam

 

[cdukes]

This is because you are opening the file for input (ie. for reading). You need to open the file for writing

try:

open "c:\Example.txt" for OUPUT as #1
write #1, "Example"
close #1

you should also use freefile to create the file handle as #1 might already be open:

dim FileHandle as long

FileHandle = freefile
open "c:\Example.txt" for OUPUT as FileHandle
write FileHandle, "Example"
close FileHandle

Hope this helps,

Chris Dukes