📄 webhostshopping.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
<Script language="JavaScript">
<!--
function check_form(){
if (form_user.login_name.value==""){
alert("请输入会员ID！");
form_user.login_name.focus();
return false;
}
if (form_user.password.value==""){
alert("请输入密码！");
form_user.password.focus();
return false;
}
return true;
}
-->
</script>
<body leftmargin="0" topmargin="0">
<div align="center">
<center>
<TABLE border=1 cellPadding=0 cellSpacing=0 width=760 bordercolor="#6687BA" style="border-collapse: collapse"><TBODY>
<TR>
<TD vAlign=top>
<% if session("userid")="" or session("username")="" then %>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=658>
<TBODY>
<TR>
<TD width=439><IMG height=85 src="images/reg_1.gif"
width=439><IMG height=90 src="images/reg_2.gif"
width=439><IMG height=98 src="images/reg_3.gif"
width=439></TD>
<TD align=middle valign="top">
<div align="center">
<center>
<table width="95%" height="50%" border="0" cellpadding="6" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td> </td>
</tr>
<tr>
<td> 以下操作需要会员身份进行！
<p> 请从下面的登陆框中输入您的会员账号。</td>
</tr>
</table>
</center>
</div>
</TD>
</TR>
</TBODY>
</TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=668 bordercolor="#808000" style="border-collapse: collapse">
<TBODY>
<TR>
<TD width=426>
<img src="images/login_4.gif" align="right" hspace="0"></TD>
<TD bgColor=#e1dfdf align="right" width="146">
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<form name="form_user" method="post" action="webhostshopping.asp?cmd=login" onsubmit="return check_form()">
<tr>
<td>会员ID：</td>
</tr>
<tr>
<td><div align="center">
<input name="login_name" type="text" id="login_name" size="15">
</div></td>
</tr>
<tr>
<td>会员密码：</td>
</tr>
<tr>
<td><div align="center">
<input name="password" type="password" id="password" value="" size="15">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="submit" name="Submit" value="登陆">
</div></td>
</tr>
</form>
</table></TD>
<TD><IMG src="images/login_5.gif"></TD>
<TD> </TD>
</TR>
</TABLE>
<p><% else %>
<br>
<br>
</p>
<div align="center">
<center>
<table width="80%" border="1" cellpadding="8" cellspacing="0" bordercolor="#6687BA" style="border-collapse: collapse">
<tr bordercolor="#f1f1f1" bgcolor="#f1f1f1">
<td width="20%" bgcolor="#EAF1FB"><div align="center">产品编号：</div></td>
<td bgcolor="#EAF1FB"><div align="center">产品名称：</div></td>
<td width="30%" bgcolor="#EAF1FB"><div align="center">总计价格：</div></td>
</tr>
<tr bordercolor="#FFFFFF" class="f1">
<td><div align="center"></div>
<div align="center" class="f1"><%=session("hostcount")%></div></td>
<td><div align="center" class="f1"><%=session("hostname")%></div></td>
<td><div align="center">￥<span class="f1">
<%if session("sales")="直接客户" then
response.write""&session("money")&""
end if
if session("sales")="普通代理商" then
response.write""&session("money1")&""
end if
if session("sales")="牵手代理商" then
response.write""&session("money2")&""
end if
if session("sales")="伙伴代理商" then
response.write""&session("money3")&""
end if
%></span></div></td>
</tr>
</table>
</center>
</div>
<br>
<table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#b2b2b2">
<tr>
<td> </td>
<td width="30%"><a href="shoppingcontinue.asp"><img src="images/gobuy.gif" width="100" height="41" border="0"></a></td>
<td width="20%"><a href="shoppingbalancenow.asp"><img src="images/ord.gif" width="81" height="41" border="0"></a></td>
</tr>
</table>
<br>
<p> </p>
<p> </p>
<p><br>
<% end if %>
</p></TD>
</TR>
</TABLE>
</center>
</div><!--#include file="foot.asp"-->
</body>
<%
if request.QueryString("cmd")="login" then
login_name=request.form("login_name")
password=request.form("password")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from userentreg where login_name='"&login_name&"' and password='"&password&"'"
rs.open sql,conn,3,3
if rs.eof then
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from userpersreg where login_name='"&login_name&"' and password='"&password&"'"
rs.open sql,conn,3,3
if rs.eof then
response.Redirect("member_main.asp")
else
session("username")=rs("login_name")
session("userid")=rs("id")
session("usertyp")=rs("usertyp")
session("sales")=rs("sales")
response.Redirect("webhostshopping.asp")
end if
else
session("username")=rs("login_name")
session("userid")=rs("id")
session("usertyp")=rs("usertyp")
session("sales")=rs("sales")
response.Redirect("webhostshopping.asp")
end if
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -