鸡的耳朵像什么呀:ASP如何验证不允许注册相同用户名?

<%
Dim name,Sql,Rs
name = Trim(Request("name"))'当然，实际设计的时候需要对非法字符进行过滤
Sql = "Select id from [sort] where [name]='"&name&"'"
Set Rs = Conn.Execute(Sql)
If Not Rs.Eof Then
Response.Write("该用户已经存在。")
Response.End
End If
Sql = "Insert into [sort]([name]) values('"&name&"')"
Conn.Execute(Sql)
If Err.Number = 0 Then
Response.Write("注册成功。")
Else
Response.Write("注册失败。")
End if
%>

dim username
给你个粗略的代码
username=request.from("username")
sql="select * from sort where name='"&username&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
.....
rs.update
else
response.write "<script>alert(""对不起，您的账号已经被使用。"");history.back()</script>"
end if
rs.close
set rs=nothing

在addnew的时候，加一句
if not(rs.eof) then
respone.write"该名称存在，请另行选择"
respone.end
end if

添加的时候，先在表里查找一下，看看有没有相同的，如果有就报错，没有就添加。

SQL="SELECT * FROM sort WHERE name='" & 姓名的输入项 & "'"
打开数据库
rs.Open SQL,cnn
如果读出的数据是最后EOF则没有相同，否则有相同项

把name设成主键