帮忙查看下这段程序错误在哪里?
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!--#include file="conn.asp"-->
<%
dim id , name, pwd, phone
id=trim(Request.Form("id"))
name =trim(Request.Form("name"))
pwd=trim(Request.Form("pwd"))
phone=trim(Request.Form("phone"))
set rs=server.createobject("adodb.recordset")
sql="select * from users where name='"& name (Request("name"))&"' "
rs.open sql,conn,1,1
If not rs.eof Then
alert ("用户名已存在!")
Response.end
Else
rs.addnew
rs("id")=trim(request("id"))
rs("naem")=trim(request("name"))
rs("pwd")=trim(request("pwd"))
rs("phone")=trim(request("phone"))
rs.update
alert("注册成功!")
rs.close
set rs=nothing
%>
不管输入不输入,总是显示: