⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mem_modify.asp

📁 机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
字号:
<!--#include file="function/m_conn.asp"-->
<!--#include file="function.asp"-->
<%
page=request("page")
filename=request("filename")
search_type=request("search_type")
search_word=request("search_word")
mem_id = trim(request("mem_id"))
mem_ifActive = trim(request("mem_ifActive"))

set rs=server.CreateObject("adodb.recordset")
msg=""
	mem_loginname=trim(request("mem_loginname"))
	mem_loginpasd=trim(request("mem_loginpasd"))
	mem_email=trim(request("mem_email2"))
	mem_grade=trim(request("mem_grade"))
	mem_money=trim(request("mem_money"))
	if not isnumeric(mem_money) then
	mem_money=10
	else
	mem_money=clng(mem_money)
	end if
	mem_sex=trim(request("mem_sex"))
	mem_city=trim(request("mem_city"))
	mem_name=trim(request("mem_name"))
	mem_addr=trim(request("mem_addr"))
	mem_tel=trim(request("mem_tel"))
	mem_mobile=trim(request("mem_mobile"))
	mem_CardID=trim(request("mem_CardID"))
	mem_IDCARD=trim(request("mem_IDCARD"))
	mem_status=trim(request("mem_status"))
	mem_remark=trim(request("mem_remark"))
	mem_province=trim(request("mem_province"))
	mem_zip=trim(request("mem_zip"))
	mem_power=trim(request("mem_power"))
	mem_both=trim(request("mem_both"))
	mem_cid=trim(request("mem_cid"))
	mem_company=trim(request("mem_company"))
	mem_fax=trim(request("mem_fax"))
if mem_sex="" then
mem_sex="M"
end if
if mem_id ="" then
sql="select * from tmember where mem_loginname = '"&mem_loginname&"'"
rs.open sql,conn,1,1
if rs.recordcount>0 then
%>
<script language="javascript">
alert("已有"+'<%=mem_loginname%>'+"这个用户名了!\n请选过个再添加吧!");
window.history.back(-1);
window.location="index.asp";
</script>
<%
else
rs.close
 sql="select top 1 * from tmember order by MEM_ID desc"
 rs.open sql,conn,3,2
 dim ZXLMem_id
'ZXLMem_id=Cint(rs("mem_id"))
 if rs.eof or rs.bof then
     ZXLMem_id=1
 else
     ZXLMem_id=Cint(rs("mem_id"))+1
 end if
rs.close
sql="select * from tmember"
 rs.open sql,conn,3,2
 rs.addnew
    rs("mem_id")=ZXLMem_id
	rs("mem_loginname")=testdb(mem_loginname)
	rs("mem_loginpasd")=testdb(mem_loginpasd)
	rs("mem_email")=testdb(mem_email)
	rs("mem_grade")=testdb(mem_grade)
	rs("Mem_RegistDate")=NOW()
	rs("mem_money")=testdb(mem_money)
	rs("mem_sex")=testdb(mem_sex)
	rs("mem_city")=testdb(mem_city)
	rs("mem_name")=testdb(mem_name)
	rs("mem_addr")=testdb(mem_addr)
	rs("mem_tel")=testdb(mem_tel)
	rs("mem_mobile")=testdb(mem_mobile)
	rs("mem_CardID")=testdb(mem_CardID)
	rs("mem_IDCARD")=testdb(mem_IDCARD)
	rs("mem_status")=testdb(mem_status)
	rs("mem_remark")=testdb(mem_remark)
	rs("mem_province")=testdb(mem_province)
	rs("mem_zip")=testdb(mem_zip)
	rs("mem_power")=testdb(mem_power)
	rs("mem_both")=testdb(mem_both)
	rs("mem_cid")=testdb(mem_cid)
	rs("mem_company")=testdb(mem_company)
	rs("mem_fax")=testdb(mem_fax)
rs("mem_ifActive")=mem_ifActive
	
 rs.update
 rs.close
 msg="会员资料添加成功!"
 end if
 else
sql="select * from tmember where mem_id = "&mem_id
rs.open sql,conn,3,2
if not rs.eof then
	rs("mem_loginname")=testdb(mem_loginname)
	rs("mem_loginpasd")=testdb(mem_loginpasd)
	rs("mem_email")=testdb(mem_email)
	rs("mem_grade")=testdb(mem_grade)
	rs("Mem_RegistDate")=NOW()
	rs("mem_money")=testdb(mem_money)
	rs("mem_sex")=testdb(mem_sex)
	rs("mem_city")=testdb(mem_city)
	rs("mem_name")=testdb(mem_name)
	rs("mem_addr")=testdb(mem_addr)
	rs("mem_tel")=testdb(mem_tel)
	rs("mem_mobile")=testdb(mem_mobile)
	rs("mem_CardID")=testdb(mem_CardID)
	rs("mem_IDCARD")=testdb(mem_IDCARD)
	rs("mem_status")=testdb(mem_status)
	rs("mem_remark")=testdb(mem_remark)
	rs("mem_province")=testdb(mem_province)
	rs("mem_zip")=testdb(mem_zip)
	rs("mem_power")=testdb(mem_power)
	rs("mem_both")=testdb(mem_both)
	rs("mem_cid")=testdb(mem_cid)
	rs("mem_company")=testdb(mem_company)
	rs("mem_fax")=testdb(mem_fax)
	rs("mem_ifActive")=mem_ifActive
 rs.update
 rs.close
  msg="会员资料修改成功!"

 else
 msg="会员资料修改失败!"
end if 
end if
%>
<!--#include file="../../config.asp"--><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>资料处理</title>
</head>
<body>
<form method="post" name="form1" action="<%=filename%>">
<input type="hidden" name="page" value="<%=page%>">
<input type="hidden" name="search_type" value="<%=search_type%>">
<input type="hidden" name="search_word" value="<%=search_word%>">
</form>
<script language="javascript">
window.alert('<%=msg%>');
form1.submit();
</script>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -