📄 hyokedit.asp
字号:
<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checksession.asp" -->
<!-- #include file="common.asp" -->
<%id=Request("id")
pageno=trim(Request("pageno"))
findcontent=trim(request("findcontent"))
Approved =Request("Approved")
set HyRs=server.CreateObject("adodb.recordset")
sql = "select hy.*,hyclub.HyNumber,hyClub.HyPassword from hy left join hyclub on hy.id=hyclub.HyID where hy.id =" & cint(id)
HyRs.Open sql,conn
if HyRs.Recordcount>0 then
set CountRs=nothing
set CountRs=server.CreateObject("adodb.recordset")
sql = "SELECT HyMoneyAccount from HyMoneyAccount where HyNumber ='" & HyRs("HyNumber") & "'"
CountRs.Open sql,conn
if CountRs.Recordcount>0 then
HyMoneyAccount=CountRs("HyMoneyAccount")
else
HyMoneyAccount=0
end if
set CountRs=nothing
end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<script language="javascript">
function check()
{
if(form1.HyName.value=="")
{
alert("至少需要输入姓名!");
document.form1.HyName.focus();
return false;
}
else if(form1.Hypassword.value=="")
{
alert("至少需要输入密码!");
document.form1.Hypassword.focus();
return false;
}
else if(form1.Hypassword1.value=="")
{
alert("至少需要输入确认密码!");
document.form1.Hypassword1.focus();
return false;
}
else if(form1.HyMobile.value=="")
{
alert("至少需要输入联络电话!");
document.form1.HyMobile.focus();
return false;
}
else
{
return true;
document.form1.submit();
}
}
</script>
<BODY leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<p> </p>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td>
<form name="form1" method="post" action="hyokeditcheck.asp?HyNumber=<% =HyRs("HyNumber")%>&id=<% =id%>&findcontent=<% =findcontent%>&pageno=<% =pageno%>&Approved=<%=Approved%>" onsubmit="return check();">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" ID="Table3" bgcolor="AAAAAA">
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="50" bgcolor="ccddee"><div align="center"><font color="#000000" size="3">修 改 会
员 资 料</font></div></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="5" ID="Table4">
<tr bgColor=#ffffff>
<td width="21%" height="30"><div align="right">姓名:</div></td>
<td width="65%"> <input name="HyName" type="text" size="30" value=<% =HyRs("HyName")%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<% if GetDisplayFunc("tksq")=true then%>
<tr bgcolor="#FFFFFF">
<%else%>
<tr bgcolor="#FFFFFF" style="display:none">
<%end if%>
<td width="21%" height="30"><div align="right">帐户余额:</div></td>
<td width="65%"> <input name="HyMoneyAccount" type="text" size="30" value=<% =HyMoneyAccount%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<tr bgColor=#ffffff>
<td height="30"><div align="right">登录帐号:</div></td>
<td>
<% =HyRs("HyNumber")%>
</td>
</tr>
<tr bgColor=#ffffff>
<td height="30"><div align="right">密码:</div></td>
<td> <input type="text" name="HyPassword" size="30" value=<% =HyRs("HyPassword")%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<tr bgColor=#ffffff>>
<td height="30"><div align="right">确认密码:</div></td>
<td>
<input type="text" name="HyPassword1" size="30" value=<% =HyRs("HyPassword")%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<tr bgColor=#ffffff>>
<td height="30"><div align="right">二级密码:</div></td>
<td>
<input type="text" name="eduPassword" size="30" value="<% =HyRs("eduPassword")%>">
(<font color=#ff0000>*</font>)</td>
</tr>
<tr bgColor=#ffffff>
<td height="30"><div align="right">确认二级密码:</div></td>
<td>
<input type="text" name="eduPassword1" size="30" value="<% =HyRs("eduPassword")%>">
(<font color=#ff0000>*</font>)</td>
</tr>
<% if GetDisplay("HySex")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HySex")%>:</div></td>
<td> <input name="HySex" type="radio" value="男" <%if HyRs("HySex")="男" then%> checked<%end if%>>
男
<input type="radio" name="HySex" value="女" <%if HyRs("HySex")="女" then%> checked<%end if%>>
女</td>
</tr>
<% if GetDisplay("HyAge")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyAge")%>:</div></td>
<td> <input type="text" name="HyAge" size="30" ID="Text6" value=<% =HyRs("HyAge")%>>
</td>
</tr>
<% if GetDisplay("HyCardNo")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyCardNo") %>:</div></td>
<td> <input type="text" name="HyCardNo" size="30" ID="Text9" value=<% =HyRs("HyCardNo")%>>
</td>
</tr>
<% if GetDisplay("HyTel")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyTel")%>:</div></td>
<td> <input type="text" name="HyTel" size="30" ID="Text6" value=<% =HyRs("HyTel")%>>
</td>
</tr>
<% if GetDisplay("HyMobile")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyMobile")%>:</div></td>
<td> <input type="text" name="HyMobile" size="30" ID="Text6" value=<% =HyRs("HyMobile")%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<% if GetDisplay("HyMail")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyMail")%>:</div></td>
<td> <input type="text" name="HyMail" size="30" ID="Text6" value=<% =HyRs("HyMail")%>>
</td>
</tr>
<% if GetDisplay("HyQQMSN")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyQQMSN")%>:</div></td>
<td> <input type="text" name="HyQQMSN" size="30" ID="Text6" value=<% =HyRs("HyQQMSN")%>>
</td>
</tr>
<% if GetDisplay("HyAddress")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyAddress")%>:</div></td>
<td> <input type="text" name="HyAddress" size="50" ID="Text7" value=<% =HyRs("HyAddress")%> >
</td>
</tr>
<% if GetDisplay("HyZipCode")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyZipCode")%>:</div></td>
<td> <input type="text" name="HyZipCode" size="20" ID="Text7" value=<% =HyRs("HyZipCode")%>>
</td>
</tr>
<% if GetDisplay("HyOpenBank")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyOpenBank")%>:</div></td>
<td> <select name="HyOpenBank">
<option value="中国建设银行" <%if HyRs("HyOpenBank")="中国建设银行" then %>selected<%end if%>>中国建设银行</option>
<option value="中国农业银行" <%if HyRs("HyOpenBank")="中国农业银行" then %>selected<%end if%>>中国农业银行</option>
<option value="中国交通银行" <%if HyRs("HyOpenBank")="中国交通银行" then %>selected<%end if%>>中国交通银行</option>
<option value="中国工商银行" <%if HyRs("HyOpenBank")="中国工商银行" then %>selected<%end if%>>中国工商银行</option>
<option value="招商银行" <%if HyRs("HyOpenBank")="招商银行" then %>selected<%end if%>>招商银行</option>
<option value="中国银行" <%if HyRs("HyOpenBank")="中国银行" then %>selected<%end if%>>中国银行</option>
</select>
(<font color=#ff0000>*</font>)</td>
</tr>
<% if GetDisplay("HyOpenBankNo")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayname("HyOpenBankNo")%>:</div></td>
<td> <input type="text" name="HyOpenBankNo" size="30" ID="Text9" value=<% =HyRs("HyOpenBankNo")%>>
(<font color=#ff0000>*</font>)</td>
</tr>
<% if GetDisplay("HyOpenBankName")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyOpenBankName")%>:</div></td>
<td> <input type="text" name="HyOpenBankName" size="30" ID="Text9" value=<% =HyRs("HyOpenBankName")%>>
</td>
</tr>
<% if GetDisplay("HyProduct")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyProduct")%>:</div></td>
<td>
<select name="HyProduct">
<%
arrList =split(GetOtherSettingValue("ProductInfo"),"-")
for i=Lbound(arrList) to Ubound(arrList)%>
<option value="<% =arrList(i)%>" <%if HyRs("HyProduct")=arrList(i) then %>selected<%end if%>><% =arrList(i)%></option>
<%next%>
</select>
</td>
</tr>
<% if GetDisplay("HyTjNumber")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyTjNumber")%>:</div></td>
<td> <input type="text" name="HyTjNumber" size="30" ID="Text11" value=<% =HyRs("HyTjNumber")%>>
</td>
</tr>
<% if GetDisplay("HyTjName")=true then%>
<tr bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td height="30"><div align="right"><% =GetDisplayName("HyTjName")%>:</div></td>
<td> <input type="text" name="HyTjName" size="30" ID="Text11" value=<% =HyRs("HyTjName")%>></td>
</tr>
<tr bgColor=#ffffff style="display:none">
<td height="30"><div align="right">购买数量:</div></td>
<td> <select name="HyBuyCount" id="HyBuyCount">
<option value="1" selected>1</option>
<option value="3">3</option>
<option value="7">7</option>
</select></td>
</tr>
<% if GetDisplay("HyMemo")=true then%>
<tr valign="top" bgColor=#ffffff>
<%else%>
<tr bgColor=#ffffff style="display:none">
<%end if%>
<td bgcolor="#ffffff" > <div align="right"><% =GetDisplayName("HyMemo")%>:<br>
</div></td>
<td ><textarea name="HyMemo" cols="80" rows="8" id="HyMemo"><% =HyRs("HyMemo")%></textarea></td>
</tr>
</table>
</td>
</tr>
</table>
<P align="center">
<input type="submit" name="Submit" value="确 定" ID="Submit2">
<input type="reset" name="Submit2" value="取 消" ID="Reset2">
</P>
</form></td>
</tr>
</table>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -