<%
    '创建RECORDSET对象方法1
    set rst=Server.CreateObject("ADODB.recordset")
    rst.open "select * from user where u_user='" & request.form("f_user") & "'",conn,1,1
  if rst.recordcount>0 then
   '如果存在这个用户名，对用户进行提示
 response.write "用户名:" & request.form("f_user") & " 已经被占用！请点击后退按钮返回上一页！"
    rst.close
    set rst=nothing
    conn.close
    set conn=nothing
    response.end
  else
 rst.close
'conn.begintrans
rst.open "user",conn,1,3
rst.addnew'插入数据到user表
rst("u_user")=request.form("f_user")
rst("u_pass")=request.form("f_code")
rst.update
rst.close
'获取刚才插入数据的自动编号字段值 ，即u_id字段的值
set rst1=conn.execute("SELECT @@IDENTITY AS uid")
uid=rst1("uid")
rst.open "info",conn,1,3
rst.addnew'插入数据到info表
rst("i_id")=uid
rst("i_name")=request.form("f_name")
rst("i_xb")=request.form("f_sex")
rst("i_nl")=request.form("f_age")
rst("i_email")=request.form("f_email")
rst.update
rst.close
   if err.number<>0 then
    response.write err.number&err.description
   'conn.rollbacktrans
%>
总是出现：3219在此环境中不允许操作。
注册失败，请大家帮忙找出原因，谢谢！急等！

怎么没人帮忙呀？版主给看一下，帮忙解决。是不是数据库打开有问题呀？

把   if err.number<>0 then
    response.write err.number&err.description
   'conn.rollbacktrans
这句删除看看具体错误是什么！

总是注册失败。只是不显示错误代码和描述了。

大家多多帮忙呀？正急用呢！

真正执行的代码不只这些吧，麻烦你把全部代码贴出来，去掉：on error next resume 这样的语句！

谢谢大家的帮忙，此问题解决。