user_edit_ok.asp

电影ASP文件

<!--#include file="../film_conn.asp"-->
<!-- #include file="user_session.asp" -->
<!-- #include file="../set_url.asp" -->
<%
if trim(request.form("password"))="" then errmsg=errmsg & "请填写密码！\n"
if trim(request.form("email"))="" then errmsg=errmsg & "请正确填写电子邮件！\n"
if trim(request.form("name"))="" then errmsg=errmsg & "请正确填写姓名！\n"
if trim(request.form("question"))="" then errmsg=errmsg & "非法操作！请不要清空提示问题！\n"
if trim(request.form("ask"))="" then errmsg=errmsg & "请填写提示问题答案！\n"
email=trim(request.form("email"))
if instr(email,"@")=0 or right(email,1)="@" or left(email,1)="@" 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
%>

<%
if request("y")<>"" and request("m")<>"" and request("d")<>"" then
birthday=dateserial(request("y"),request("m"),request("d"))
else
birthday="2000-01-01"
end if

set rs=server.createobject("adodb.recordset")
sql="select * from users where userid='"&request.cookies("userid")&"' and password='"&request.cookies("password")&"'"

rs.open sql,conn,1,3

rs("password")=trim(request("password"))
rs("name")=trim(request("name"))
rs("email")=trim(request("email"))
rs("phone")=trim(request("phone"))
rs("homeaddress")=trim(request("homeaddress"))
rs("question")=trim(request("question"))
rs("ask")=trim(request("ask"))
rs("sex")=trim(request("sex"))
rs("phone")=trim(request("phone"))
rs("birthday")=birthday
rs("idcard")=trim(request("idcard"))
rs("qq")=trim(request("qq"))
rs("editip")=Request.ServerVariables("REMOTE_ADDR")
rs("edittime")=now()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "user_edit.asp"
%>