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

sicuro? nella guida non c'è scritto.

oggetto.CreateTextFile(nomefile[, sovrascrittura[, unicode]])