Slette alt indhold i en fil med FilesystemObject?

Kan du ikke bare slette filen og oprette en tom fil? Det er vel næsten lettere end at åbne filen, slette alt indhold og gemme den igen.

Det er et spørgsmål om rettigheder....

Fair nok...

Prøv det her, det skulle virke:

  Const ForReading = 1, ForWriting = 2, ForAppending = 8
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("testfil.txt", ForWriting, True)
  f.Write ""
  f.Close