求DW制作网页留言板的所有代码

<!--#include file="../inc/conn.asp"-->
<%
dim name,qq,email,sex,liuyan,ly_type,ip,riqi
name=request("ly_user_name")
qq=request("ly_user_qq")
email=request("ly_user_email")
sex=request("ly_sex")
liuyan=request("ly_liuyan")
ly_type=request("ly_type")
ip=request.ServerVariables("REMOTE_ADDR")

if name="" then
response.write "<script language=javascript>alert('您的名字没有填写，请填写完整信息，谢谢!');history.go(-1);</script>"
elseif qq="" then
response.write "<script language=javascript>alert('忘了QQ哦');history.go(-1);</script>"
elseif liuyan="" then
response.write "<script language=javascript>alert('留言内容不能为空!');history.go(-1);</script>"

els