Invalid use of Null: 'Replace' strano

[maxolino]

Ciao a tutti,
ho passato un sito da un sito hosting su aruba ad un server dedicato, e ottengo un errore senza (a mio avviso) senso.

Questa è la funzione che avevo sul vecchio server:

Function descri(t)
If t <> "" Then
descri = Replace(t,vbcrlf,"
")
End If
End Function

Sul nuovo server invece ottengo l'errore "Invalid use of Null: 'Replace'"


Per controllare ho stampato a video la variabile t:

Function descri(t)
response.Write("var: "&t)
If t <> "" Then
response.Write("vr: "&t)
descri = Replace(t,vbcrlf,"
")
End If
End Function

Alla prima lettura la variabile ha il valore, e lo perde dopo averlo "letto" la prima volta.

Appoggiando il tutto su una variabile di comodo funziona correttamente:

Function descri(t)
testo = t
If testo <> "" Then
descri = Replace(testo,vbcrlf,"
")
End If
End Function


Ora, siccome non ho voglia di cambiare il tutto in oltre 50 pagine, e non voglio neanche usare una variabile in più che non serve... Come posso risolvere?

Devo dare qualche impostazione particolare al server?
Non ho proprio idea di cosa possa essere!!!

Grazie mille!

[Mems]

Prima di fare una replace su una variabile assicurati che la variabile non sia vuota o nulla.

[maxolino]

Già fatto...
Però dopo averla letta la prima volta diventa nulla....

Non capisco il motivo.

[optime]

Function descri(t)
If trim(t & "[]") <> "[]" Then
descri = Replace(t,vbcrlf,"
")
End If
End Function

[ResianTaxidrive]

la funzione di optime ha funzionato anche per me che ho incontrato lo stesso errore.