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

📄 hyokedit.asp

📁 mlm双轨制直销系统V8.0免费版 可用于: 1、直拨、回拨电话卡公司。 2、保健品、药品公司。 3、在线销售商品等等。 4、其他类型用到双轨制模式的线上开盘公司。
💻 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%">&nbsp;&nbsp; <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%">&nbsp;&nbsp; <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>&nbsp;&nbsp; 
                <% =HyRs("HyNumber")%>
              </td>
            </tr>
           <tr bgColor=#ffffff> 
              <td height="30"><div align="right">密码:</div></td>
              <td>&nbsp;&nbsp; <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>&nbsp;&nbsp; 
				<input type="text" name="HyPassword1" size="30"  value=<% =HyRs("HyPassword")%>>
                (<font color=#ff0000>*</font>)</td>
            </tr>
            	<tr bgColor=#ffffff>&gt;
              <td height="30"><div align="right">二级密码:</div></td>
              <td>&nbsp;&nbsp; 
				<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>&nbsp;&nbsp; 
				<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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; 
		<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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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>&nbsp;&nbsp; <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">&nbsp;&nbsp;&nbsp;
  <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 + -