诺贝尔发明火药的困难:asp中检测字段值是否存在问题

我要检测的是 gq 表里 subject 字段值是否重复的问题

post的文件是 savepost.asp

内容是：内容太大贴不上来。。。。

应该怎么做？
望高手指点，俺对asp只知道皮毛……

－－－－－－－－－－－－－－－－－－－
我在网上找的方法是 ：
Dim UserName
UserName=request.form("UserName")
set rs=conn.execute("select * from user where UserName='"&UserName&"' ")
if not rs.eof then
response.write "<script>alert('用户名已注册');window.close);</script>"
end if

－－－－－－－－－－－－－－－－－－－－－－－－－－－－
我改成 ：
Dim subject
subject=request.form("subject")
set rs=conn.execute("select * from gq where subject='"&subject&"' ")
if not rs.eof then
response.write "<script>alert('用户名已注册');window.close);</script>"
end if
不知道应该怎么加，加到那？
Dim subject
subject=request.form("subject")
set rs=conn.execute("select * from gq where subject='"&subject&"' ")
if not rs.eof then
response.write "gq存在"
else
response.write "gq不存在"
end if

应该怎么加，放到那个文件里，是savepost，还是提交页面？

我加到post的页面里了，提示：
Microsoft VBScript 编译器错误 (0x800A03F8)
缺少 'Sub'
/al/savedata.asp, line 113, column 4
end if

是end if 这行