codice:
Function HTMLDecode(sText)
    Dim I
    sText = Replace(sText, """, Chr(34))
    sText = Replace(sText, "<"  , Chr(60))
    sText = Replace(sText, ">"  , Chr(62))
    sText = Replace(sText, "&" , Chr(38))
    sText = Replace(sText, "", Chr(32))
    
    For I = 1 to 255
        sText = Replace(sText, "&#" & I & ";", Chr(I))
    Next
    HTMLDecode = sText
End Function

response.write HTMLDecode("<Scrivi qualcosa qui&agrave&")
in questo modo ila funzione non ritorna nessun valore a video,
cambiando la stringa invece:

response.write HTMLDecode("Scrivi qualcosa qui&agrave&")
cosi funzia...

perchè mi chiedo ?

:master: