Usando replace, mandandole cambiar un caracter por otro.
<%Response.Write Replace(vartexto,chr(33),"<br>")%>
¿Por que
CHR(33)?, porque es el codigo ASCII de la admiracion
!
Aqui hay una tabla completa ASCII.
http://www.expansionweb.net/asp_pruebas/ascii.asp