Togliere "carattere Invio" con FSO

[webhunter]

Ciao. Ho un problema
Utilizzando l'FSO per scrivere N record su un file di testo pippo.txt, trovo alla fine nel file un numero di record uguale a N+1 (dove l'ultimo record è semplicemente vuoto). Il problema quindi è dovuto al carattere di "accapo" che mi viene messo in coda alla scrittura dei record. Questo mi genera una serie di errori...come posso evitare che il mios cript scriva questo record vuoto addizionale?
allego lo script:

nomefileUpload = "pippo.txt"
Set fso2 = CreateObject("Scripting.FileSystemObject")
Set f2 = FSO2.CreateTextFile(server.mappath(percorso & nomefileUpload), True, False)

f2.WriteLine(stringa)---> dove stringa è il mio record

Ho fatto una ricerca sul sito ma nn ho trova nulla di utile a riguardo.
Ciao e grazie

[asdfgasdfg]

nomefileUpload = "pippo.txt"
Set fso2 = CreateObject("Scripting.FileSystemObject")
Set f2 = FSO2.CreateTextFile(server.mappath(percorso & nomefileUpload), True, False)

stringa = replace(stringa,chr(13),"")
if stringa <>"" then
f2.WriteLine(stringa)---> dove stringa è il mio record
end if

[webhunter]

Grazie per la risposta, ma il problema è un altro:
Il carattere di invio chr(13) non è contenuto nella mia variabile "stringa" ma è inserito nel processo di scrittura della suddetta nel file "pippo.txt".
Ovviamente la replace in un simile contesto nn ha alcuna efficacia dato che il chr(13) viene inserito dopo....
Penso che si tratti di una proprietà da settare nel FSO...
Ciao e grazie

[Baol74]

Quando arrivi all'ultimo record usa la funzione Write

If UltimoRecord then
 f2.Write(stringa)
else
 f2.WriteLine(stringa)
End If