Filehandling error

[Hans]

Hello,

'---
Open "c:\test.txt" For Output As #1 ' Open file for output.
Write #1, "blabla"
Close #1
'---

Why doesn't this work, it worked before?

Error message: (in Dutch)
Fout 54 tijdens uitvoering:
Ongeldige bestandsmodus

Please help.
Thanks,
Hans

 

[Allen Browne]

Try:
Print #1
instead of:
Write #1

 

[Douglas J. Steele]

You should never hard-code the file number alias.

Dim intFile As Integer

intFile = FreeFile()
Open "c:\test.txt" For Output As #intFile ' Open file for output.
Write #intFile, "blabla"
Close #intFile

As Allen pointed out, though, you might also want to use Print #intFile
instead.

 

[Hans]

Thanks Allen and Douglas for your responses but it also doesn't work.
It gives the same errortext in Dutch: "Ongeldige bestandmodus" something
like "not valid file mode"

Hans

 

[Douglas J. Steele]

Might you not have write permission to the root of your C: drive?

 

[Hans]

I have permission to write that's not the problem, I think I miss a
addon-file or something to access this type of commands.
Thanks anyway!

Hans

 

[Hans]

I found it!
My virusprotectionsoftware blocked de VBA-code.

Hans