📄 hyselfeditcheck.asp
字号:
<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checkhy.asp" -->
<%
HyNumber = trim(request("HyNumber"))
HyPassword=chkstr(trim(request("HyPassword")))
eduPassword=chkstr(trim(request("eduPassword")))
hyname = trim(request("hyname"))
HySex=trim(request("HySex"))
HyAge=trim(request("HyAge"))
HyCardNo = trim(request("HyCardNo"))
HyTel=trim(request("HyTel"))
HyMobile = trim(request("HyMobile"))
HyMail= trim(request("HyMail"))
HyQQMSN=trim(request("HyQQMSN"))
HyAddress = trim(request("HyAddress"))
HyZipCode=trim(request("HyZipCode"))
HyOpenBank = trim(request("HyOpenBank"))
HyOpenBankNo = trim(request("HyOpenBankNo"))
HyOpenBankName=trim(request("HyOpenBankName"))
HyProduct=trim(request("HyProduct"))
HyMemo = trim(request("HyMemo"))
id=Request("id")
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<BODY>
-------------------------修改会员中...............<br>
<%
set rs=server.CreateObject("adodb.recordset")
'修改基本资料
sql = "update hy set HyPassword1 = '" & HyPassword & "',edupassword='"&edupassword&"',HyName = '" & HyName & "',HySex = '" & HySex & "',HyAge = '" & HyAge & "',HyCardNo = '"
sql = sql & HyCardNo & "',HyTel='"& HyTel & "',HyMobile='"& HyMobile & "',HyMail='"& HyMail & "',HyQQMSN='"
sql = sql & HyQQMSN & "',HyAddress='" & HyAddress & "',HyZipCode='" & HyZipCode & "',HyProduct='" & HyProduct
sql = sql & "',HyMemo='" & HyMemo &"' where id =" & id
rs.Open sql,conn
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update hyclub set HyPassword = '" & HyPassword& "',edupassword='"&edupassword&"' where Hyid =" & id
rs.Open sql,conn
href="hyCustview.asp?id=" & id
%>
<br>------------------------<font color=red>会员修改成功!</font><br>
<script language="javascript">
window.location.href="<% =href%>"
window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -