源代码 请高手帮忙一下,十分感谢!
<%
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
'set rst1=conn.execute( "insert into user (u_user,u_code) values ( ' " & request.Form( "f_user ") & " ', ' " & request.Form( "f_code ") & " ') ")
rst.close
rst.open "user ",conn,1,3
rst.addnew
rst( "u_user ")=request.Form( "f_user ")
rst( "u_code ")=request.Form( "f_code ")
rst.update
rst.close
set rst1=conn.execute( "select @@identity as uid ")
uid=rst1(uid)
rst.open "info ",conn,1,3
rst.addnew
rst( "i_uid ")=uid
rst( "i_name ")=request.Form( "f_name ")
rst( "i_sex ")=request.Form( "f_sex ")
rst( "i_age ")=request.Form( "f_age ")
rst( "i_vip ")=false
rst.update
rst.close
end if
%>
------解决方案--------------------
检查数据库中的字段名跟代码中是否完全一样.肯定是有不一样。你写错的。