history.asp

电子商务购物系统

 
<table width="100%" class="table-shangxia" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="23" bgcolor="f1f1f1">　会员注册</td>
  </tr>
</table>
<table width=100% border=0 align=center cellpadding=0 cellspacing=0>
  <tr> 
    <td height=41 > 
      <div align=center>
        <%if request.cookies("snsn")("username")="" then%>
        <%'禁止网页缓存
Response.Buffer = True 
Response.ExpiresAbsolute = Now() - 1 
Response.Expires = 0 
Response.CacheControl = "no-cache"
'验证码生成
dim yz
randomize timer
yz=Int((8999)*Rnd +1009)
session("ok")=yz
%>
        <script language="javascript">
	<!--//
	function checksignup() {

		if ( document.userlogin.username.value == '' ) {
			window.alert('请输入名称!!');
			document.userlogin.name.focus();
			
		}
		else if ( document.userlogin.userpassword.value == '' ) {
			window.alert('请输入密码!!');
			document.userlogin.pass.focus();
		}
		else if ( document.userlogin.yz.value == '' ) {
			window.alert('请输入网页上显示的4位数的验证码!!');
			document.userlogin.yz.focus();
		}
else {
			return true;
			}
		return false;
	}

	//-->
	</script>
        <table width="90%" border="0" cellspacing="0" cellpadding="1" align="center">
          <form name="userlogin" method="post" action="checkuserlogin.asp">
            <tr> 
              <td align="center" height="22"><font color="#999999">顾客您好，购买商品请先登录</font></td>
            </tr>
            <tr> 
              <td align="center">
                <table align="center" cellpadding="0" cellspacing="2" border="0">
                  <tr valign="middle"> 
                    <td height="20" align="center">名&nbsp; 称&nbsp; </td>
                    <td> 
                      <div align="left"> 
                        <input name="username" type="text" class="wenbenkuang" id="username" size="12" maxlength="12">
                      </div>
                    </td>
                  </tr>
                  <tr valign="middle"> 
                    <td align="center">密&nbsp; 码&nbsp; </td>
                    <td> 
                      <div align="left"> 
                        <input name="userpassword" type="password" class="wenbenkuang" id="userpassword" size="12" maxlength="12">
                      </div>
                    </td>
                  </tr>
                  <tr valign="middle"> 
                    <td align="center">验证码&nbsp; </td>
                    <td> 
                      <input name="yz" type="password" class="wenbenkuang" id="yz" size="7" maxlength="5">
                      <span style="background-color: #FFFFFF"><font color="#ff3333"><%=yz%></font></span> 
                    </td>
                  </tr>
                  <tr valign="middle"> 
                    <td colspan="2" align="center"> 
                      <input name="Submit" type="submit" class="go-wenbenkuang" value="登录" onClick="javascript:return checksignup()">
                      <input name="Submit2" type="reset" class="go-wenbenkuang" value="注册" onClick="window.location='reg.asp'">
                      <input name="Submit3" type="button" class="go-wenbenkuang" value="忘密" onClick="window.location='getpwd.asp'">
                    </td>
                  </tr>
                </table>
              </td>
            </tr>
          </form>
        </table>
        <%else%>
        <table width="90%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td height="22" colspan="2" class="table-xia"> <b><font color="#FF9900">最近的浏览历史</font></b> 
            </td>
          </tr>
          <%set rs=server.createobject("adodb.recordset")
		    rs.open "select * from shop_his where username='"&request.cookies("snsn")("username")&"' and lx=1 order by ltime desc",conn,1,1
			while not rs.eof%>
          <tr> 
            <td height="22" align="right" width="19%">
              <div align="center"><img src="images/image002.gif" width="15" height="15"></div>
            </td>
            <td height="22" align="left" width="81%"><a href='list.asp?id=<%=rs("bookid")%>' target=_blank><%=rs("bookname")%></a></td>
          </tr>
          <%rs.movenext
		    wend
		    rs.close
		  %>
        </table>
        <table width="90%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td height="22" colspan="2" class="table-xia"> <b><font color="#FF6600">搜索关键词</font></b></td>
          </tr>
          <%set rs=server.createobject("adodb.recordset")
		    rs.open "select * from shop_his where username='"&request.cookies("snsn")("username")&"' and lx=2 order by ltime desc",conn,1,1
			while not rs.eof%>
          <tr> 
            <td height="22" align="right" width="19%">
              <div align="center"><img src="images/image002.gif" width="15" height="15"></div>
            </td>
            <td height="22" align="left" width="81%"><a href='research.asp?<%=rs("searchkey")%>' target=_blank><%=rs("bookname")%></a></td>
          </tr>
          <%rs.movenext
		    wend
		    rs.close
			set rs=nothing%>
        </table>
        <%end if%>
      </div>
    </td>
  </tr>
  <tr> 
    <td height=3>&nbsp;</td>
  </tr>
</table>