Formatting a editbox input to html

use the

 replace(string, vbcrlf,"<br>")

you might also want to stop people using HTML and use Formatting like this forum uses (look at the Forum Codes for examples)

just change the above to...

 replace(string, "[i]", "<i>")

so when ever sum one types "[i]" it will make there text Italic

*edit*

sorry forgot to say...

the code above would be used like this

<%
        dim sting
string = request.form("TextArea") 'this is your Form Field

string = replace(string, vbcrlf, "<br>")

......rest of your code for adding to the database here....

%>

actually I'm making it so i don't allow certain things, for instance javascript, tables, body, etc.

I do want people to allow the use of font and stuff on there so.
Also just added 64 smileys. hehehe