Ver originalPublic Function Lineify(strInput)Dim strTemp strTemp = Server.HTMLEncode(strInput) strTemp = Replace(strTemp, vbCrLf, "<br />" & vbCrLf, 1, -1, 1) Lineify = strTempEnd Function
Ver originalResponse.Write Lineify(str)