inc_user.asp

来自「在线发布系统 本系统有两大功能模块：用户模块和后台管理模块。用户模块模块主要实」· ASP 代码 · 共 22 行

<!--#include file="conn.asp"-->
<%
user_name=request.Form("user_name")
user_pwd=request.Form("user_pwd")
sex=request.Form("sex")
user_email=request.Form("user_email")
if user_email="" or instr(user_email,"@")=false or instr(user_email,".")=false then
%>
<script language="javascript">
msgstr("请正确输入您的EMAIL地址!","zhuce.asp");
</script>
<%
else
sql="update user_data set user_pwd='"&user_pwd&"', user_sex='"&sex&"', user_email='"&user_email&"' where user_name='"&request.Cookies("user_name")&"'"
objconn.execute(sql)
%>
<script language="javascript">
msgstr("恭喜,资料修改成功!","index.asp");
</script>
<%
end if
%>