?? hyokeditcheck.asp
字號(hào):
<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checksession.asp" -->
<%
HyNumber = trim(request("HyNumber"))
HyPassword=trim(request("HyPassword"))
edupassword=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"))
HyTjNumber = trim(request("HyTjNumber"))
HyTjName=trim(request("HyTjName"))
HyMemo = trim(request("HyMemo"))
HyBuyCount=trim(request("HyBuyCount"))
HyMoneyAccount =trim(request("HyMoneyAccount"))
if len(HyMoneyAccount)=0 then
HyMoneyAccount=0
end if
id=Request("id")
pageno=trim(Request("pageno"))
findcontent=trim(request("findcontent"))
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<BODY>
-------------------------修改會(huì)員中...............<br>
<%
'insert into hyClub(Hyid,HyNumber,HyPassword,HyParentNumber,HyTjNumber,HyBuyCount,addTime)
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 & "',HyOpenBank='" & HyOpenBank
sql = sql & "',HyOpenBankNo='" & HyOpenBankNo & "',HyOpenBankName='" & HyOpenBankName & "',HyProduct='" & HyProduct
sql = sql & "',HyTjNumber='" & HyTjNumber & "',HyTjName='" & HyTjName & "',HyMemo='" & HyMemo &"' where id =" & id
rs.Open sql,conn
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update hyclub set HyTjNumber='" & HyTjNumber & "',edupassword='"&edupassword&"' ,HyPassword = '" & HyPassword &"' where Hyid =" & id
rs.Open sql,conn
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
sql = "update HyMoneyAccount set HyMoneyAccount = " & HyMoneyAccount & " where HyNumber ='" & HyNumber & "'"
rs.Open sql,conn
href="hyManok.asp?pageno=" & pageno & "&findcontent=" & findcontent
%>
<br>------------------------<font color=red>會(huì)員修改成功!</font><br>
<script language="javascript">
window.location.href="<% =href%>"
window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -