为什么我现在注册了一个会员后,
第2次注册的时候说

Microsoft JET Database Engine '80040e21' 

由于将在索引、 主关键字、或关系中创建重复的值，请求对表的改变没有成功。 改变该字段中的或包含重复数据的字段中的数据，删除索引或重新定义索引以允许重复的值并再试一次。 

\wwwroot\admin.asp, line 40

这是什么意思呢,,要怎样解决??
第40行是rs.update

下面是我代码:

<% 
Dim user,pass,ip,city,imsi
Dim aaa,bbb,ccc,ddd,eee,fff

user=Trim(Request.form("user"))
pass=Trim(Request.form("pass"))
ip=Trim(Request.Form("ip"))
city=Trim(Request.form("city"))
imsi=Trim(Request.form("imsi"))
aaa=Trim(Request.Form("aaa"))
bbb=Trim(Request.Form("bbb"))
ccc=Trim(Request.Form("ccc"))
ddd=Trim(Request.Form("ddd"))
eee=Trim(Request.Form("eee"))
fff=Trim(Request.Form("fff"))

Dim connstr,conn,data
    data = "admin.mdb"
    Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &amp; Server.MapPath(data)    
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open Connstr

Dim rs,sql
  set rs=server.createobject("adodb.recordset")
  sql="select * from [admin] where 1<>1"
  rs.open sql,conn,3,3
      
      rs.addnew
      rs("user")=user
      rs("pass")=pass
      rs("ip")=ip
      rs("city")=city
      rs("imsi")=imsi
      rs("aaa")=aaa
      rs("bbb")=bbb
      rs("ccc")=ccc
      rs("ddd")=ddd
      rs("eee")=eee
      rs("fff")=fff
   rs.update
   rs.close
set rs=nothing
   Conn.Close
Set Conn = Nothing

response.write "<tr><td align='center' height='22'>注册成功！欢迎您的加入！！</td></tr>"
response.write "<tr><td align='left' height='100'>
你注册的用户名：" &amp; user &amp; "
"
    
%>