Se il file lo stai creando devi aggiungere un parametro nella stringa

fso.CreateTextFile("fileprova.txt", True, 0 )

E' uno zero.

Ciao