On the line where the </textarea> area is:
replace:
<% =Trim(CleanCode(TxtMsg))%>
with this:
<% if strRqMethod = "Topic" then %>Text to Display<% else %><% =Trim(CleanCode(TxtMsg))%><% end if %>
Then just replace Text to Display above with the text you want.