HTML email e andate a capo

[longline]

Non riesco a capire...
Creo il Body dell'oggetto Email in formato HTML e nella parte centrale converto il testo preso da un campo memo del DataBase usando questa funzione:

Function TextToHtml(ByVal strStringa)

  strStringa = Replace(strStringa, vbCrLf, vbCrLf & " 
 ")
  strStringa = Replace(strStringa, vbCr, vbCr & " 
 ")
  TextToHtml = strStringa

End Function

Il testo formattato è all'interno di altro HTML fisso, che contiene altre andate a capo.
Le andate a capo "fisse" funzionano perfettamente, quelle elaborate da questa funzione no, ma perchè??

[nonsoloC]

Ma è asp? Prova a eliminare il ByVal!

[longline]

Originariamente inviato da nonsoloC
Ma è asp? Prova a eliminare il ByVal!

E perchè? Tanto il valore ritorna attraverso la funzione, e comunque il passaggio per valore è quello di defautl, non cambierebbe nulla.

Certo che è ASP

[Killer99]

sei sicuro a sto punto che la invii in formato HTML ?
perkè se non ti va a capo... :S

senò prova con:

chr(10) & chr(13)

se non sbaglio...

[longline]

Ora va... ma non ho cambiato nulla

[santino83]

Function TextToHtml(ByVal strStringa)

  strStringa = Replace(strStringa, vbCrLf," 
 ")
   TextToHtml = strStringa

End Function