user_add_save.asp

电影ASP文件

<!--#include file="../film_conn.asp"-->
<!--#include file="session.asp"-->
<!--#include file="../set_url.asp"-->
<%
if trim(request.form("useridd"))="" then errmsg=errmsg & "请填写用户名！\n"
if trim(request.form("password"))="" then errmsg=errmsg & "请填写密码！\n"
if trim(request.form("moneyg"))="" then errmsg=errmsg & "请正确填写到期时间！\n"

if errmsg<>"" then
    Conn.Close
    Set conn = nothing
    Set rsc = nothing
    response.write("<script>alert('" & errmsg & "');history.go(-1)</script>")
    response.end
end if
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select userid from users where userid='"&request("useridd")&"'"
rs.open sql,conn,1,2
if not rs.eof then
   response.write "<script>alert('很遗憾，您选择的用户名已被注册，请重新选择！');history.back();</Script>"
   response.end
end if

set rs=server.createobject("adodb.recordset")
sql="select * from users"
rs.open sql,conn,1,3
rs.addnew
rs("userid")=trim(request("useridd"))
rs("password")=trim(request("password"))
rs("name")=trim(request("name"))
rs("email")=trim(request("email"))
rs("oklook")=trim(request("oklookx"))
rs("sex")=trim(request("sex"))
rs("starlook")=trim(request("starlook"))
rs("money")=trim(request("moneyg"))
rs("nlook")=trim(request("nlook"))
rs("nos")=trim(request("nos"))
rs("birthday")=trim(request("birthday"))
rs("qq")=trim(request("qq"))
rs("question")=trim(request("question"))
rs("ask")=trim(request("ask"))
rs("phone")=trim(request("phone"))
rs("homeaddress")=trim(request("homeaddress"))
rs("idcard")=trim(request("idcard"))
rs.update

rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "user_add.asp?n=新增成功，继续添加！"
%>