如何在这里面的content为必填，不能输入乱七八糟的回复和不能有违法字符

<!--#include file="giftinclode/function.asp" -->
<!--#include file="giftinclode/goftconn.asp" -->
<% 
dim  name,易做图,mail,qq,content,body,addtim,ip,qpass
set rc=server.createobject("adodb.recordset")
if  Trim(Request.Form("submit"))<>"" then
username=server.HTMLEncode(Trim(Request.Form("username")))
tel=server.HTMLEncode(Trim(Request.Form("tel")))
qq=server.HTMLEncode(Trim(Request.Form("qq")))
content=server.HTMLEncode((Trim(Request.Form("content"))))
ip=server.HTMLEncode(request.ServerVariables("REMOTE_ADDR"))
addtim=now
rc.open "ly",conn,3,2
randomize

rc.addnew     
rc("username")=username
rc("tel")=tel
rc("qq")=qq
rc("content")=content
rc("ip")=ip
rc.update
rc.close

end if
   response.write"<SCRIPT language=JavaScript>alert('感谢您的支持！');"
   response.write"location.href='zxly.asp';</SCRIPT>" 
 %> --------------------编程问答-------------------- 不明白你意思 增加一个函数套上去就行了 

补充：VB ,  数据库(包含打印，安装，报表)