asp数据库提交问题

<!--#include file=conn.asp-->
<%
dim zh , mm , zm ,shouji, qq , nr
zh=trim(request.Form("t1"))
mm=trim(request.Form("t2"))
zm=trim(request.Form("t3"))
shouji=trim(request.Form("t4"))
qq=trim(request.Form("t5"))
rn=trim(request.Form("t6"))

if zh="" or mm="" then
response.Write("账号或密码不能为空")
response.end

end if

if mm<>zm then
response.Write("重复密码不正确，请重新填写")
response.end

end if

sql="select * from zhanghao "
set rs=server.CreateObject("adodb.recordset")
rs.open sql ,conn,1,1

do while not rs.eof

if zh=rs("username") then
response.Write("账号以存在")
response.End
else
response.Write("注册成功！")

asp提交写入数据库问题 asp提交数据库的问题 asp表单提交数据库问题 ASP提交数据库无法添加问题 asp网页数据库提交问题，在线等 asp提交access数据库问题(急!~~!) ASP提交数据库失败 ASP程序：表单提交数据到数据库问题 ASP关于textarea向数据库中提交数据的问题 asp表单提交及连接数据库的问题!