📄 default.txt
字号:
<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="conn.asp" -->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select top 4 * from Product order by regtime desc"
rs.open sqltext,conn,1,1
set rs_class_1=server.createobject("adodb.recordset")
sqltext2="select * from Class_1 "
rs_class_1.open sqltext2,conn,1,1
session("productlist")=""
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<STYLE type=text/css>.main{
FONT-SIZE: 12px
}
.main1{
FONT-SIZE: 14px
}
.main2{
FONT-SIZE: 16px
}
.main3{
FONT-SIZE: 7px
}
.main4{
FONT-SIZE: 10px
}
A:link{
COLOR: #000000; TEXT-DECORATION: none
}
A:visited{
COLOR: #000000; TEXT-DECORATION: none
}
A:active{
COLOR: #ff0000; TEXT-DECORATION: none
}
A:hover{
COLOR: #aa0000; TEXT-DECORATION: underline
}
</STYLE>
<SCRIPT language=javascript>
function openbag(id) {
/* window.open("http://127.0.0.1/商城/check.asp"); */
window.open("check.asp?cpbm="+id,"","height=200,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
<title>IT超市</title>
</head>
<body >
<div align="right">
<table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#000080" bordercolordark="#FFFFFF" height="19">
<tr>
<td width="36%" bgcolor="#6d8e4d" height="20">
<% if not session("loginsuccess")=0 then%>
<marquee><font color="#FFFF00">欢迎<%=session("loginsuccess")%>进入IT超市</marquee>
<%end if%>
</td>
<td bgcolor="#6d8e4d">
<p align="right"><font color="#FFFFFF" class="main3">●</font><span class="main1"><font color="#FFFFFF"><a href="reg_user.htm">会员注册</a>
</font></span><font color="#FFFFFF" class="main3">●</font><span class="main1"><font color="#FFFFFF">订单查询</font></span><span class="main1"><font color="#FFFFFF">
</font></span><font color="#FFFFFF" class="main3">●</font><span class="main1"><font color="#FFFFFF"><a href='javascript:openbag()'>查看购物车</a></font></span></p>
</td>
</tr>
</table>
</div>
<table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#E6E4C4" bordercolordark="#E8E4C8">
<tr>
<td width="100%" bgcolor="#e6e4c4" class="main1"></td>
</tr>
</table>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="282" background="images/back.gif">
<tr>
<td width="21%" height="264" valign="top">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" class=main1>
<tr>
<td width="200%" bgcolor="#6D8E4D" align="center" class=main1 height="22" colspan="2"><font color="#FFFFFF">新品速递</font></td>
</tr>
<% While Not rs.EOF %>
<tr>
<td width="133%" align="center">
<img border="0" src="<% =rs("p_pic")%>">
<p><a href="ProductDetail.asp?ProductNO=<%=rs("Product_No")%>"><% =rs("Product_Name")%></a></p>
<p><font color="#cc0000">会员价：</font><% =rs("P_NewPrice")%>元<br><a href='javascript:openbag(<%=rs("Product_Id")%>)'><img style="CURSOR: hand" height="22" src="images/che1.gif" width="56" align="absMiddle" border="0"></a></p>
<hr width="90%" noshade size="1" color="#6D8E4D">
</td>
<td width="6" align="right" valign="middle">
<p style="border-right: 1 solid #6D8E4D"><br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
</td>
</tr>
<%
rs.MoveNext
Wend
rs.close
%>
<tr>
<td width="200%" align="center" colspan="2"></td>
</tr>
</table>
</div>
</td>
<td width="2%" height="264" valign="top">
<p style="border-left: 1 solid #6D8E4D">
</td>
</center>
<td width="55%" height="264" valign="top">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" class=main1 height="199">
<tr>
<td width="47%" bgcolor="#6D8E4D" height="22">
<p align="left"><font color="#FFFFFF"> 商品分类</font></td>
<center>
<td width="53%" bgcolor="#6D8E4D" height="22" colspan="2"> </td>
</tr>
<tr>
<td width="100%" colspan="3" height="77">
<div align="center">
<%
While Not rs_class_1.EOF
set rs_class_2=server.createobject("adodb.recordset")
sqltext3="select * from Class_2 where Class_1_Name='" & rs_class_1("Class_1_Name") & "'"
rs_class_2.open sqltext3,conn,1,1
%>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="43" class=main1 bgcolor="#F7F7F7">
<tr >
<td width="6%" height="43" bgcolor="#E6E4C4" rowspan="3">
<p align="center"><%=rs_class_1("Class_1_Name")%></td>
<%j=1%>
<%While Not rs_class_2.EOF%>
<td height="6" > <font color="#CC0000">◇</font><a href="ProductClass.asp?ProductClass_1=<%=rs_class_1("Class_1_Name")%>&ProductClass_2=<%=rs_class_2("Class_2_Name")%>"><%=rs_class_2("Class_2_Name")%></a></td>
<%if j mod 4 = 0 then %></tr><tr ><%end if%>
<%
rs_class_2.MoveNext
j=j+1
Wend
rs_class_2.close
%>
</tr>
</table><hr width="94%" size="1" color="#6D8E4D" style="border-top: 1 solid #6D8E4D" align="right">
<%
rs_class_1.MoveNext
Wend
rs_class_1.close
%>
</div>
</td>
</tr>
<tr>
<td width="100%" colspan="3" height="22" bgcolor="#6D8E4D">
<font color="#FFFFFF"> 热卖商品</font>
<%
set rs_hot=server.createobject("adodb.recordset")
sqltext4="select top 6 * from Product order by Look_Count desc"
rs_hot.open sqltext4,conn,1,1
%>
</td>
</tr>
<%row_count=1 %>
<tr>
<% Do While Not rs_hot.EOF%>
<td height="85" align="center" valign="top"><br>
<img border="0" src="<%=rs_hot("p_pic")%>">
<p><a href="ProductDetail.asp?ProductNO=<%=rs_hot("Product_No")%>"><%=rs_hot("Product_Name")%></a></p>
<p><font color="#cc0000">市场价：</font><strike><%=rs_hot("P_OldPrice")%>元</strike><font color="#cc0000"><br>
会员价：</font><%=rs_hot("P_NewPrice")%>元<br>
<a href='javascript:openbag(<%=rs_hot("Product_Id")%>)'><img style="CURSOR: hand" height="22" src="images/che1.gif" width="56" align="absMiddle" border="0"></a></p>
</td>
<%if row_count mod 2 <>0 then%>
<td width="3%" height="85" align="center" valign="middle">
<p style="border-right: 1 solid #6D8E4D"><br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
</td><%end if%>
<% if row_count mod 2 =0 then%></tr><tr><%end if%>
<%
rs_hot.MoveNext
row_count=row_count+1
Loop
rs_hot.close
%>
</tr><tr><td align="center">
<hr noshade size="1" color="#6D8E4D" width="90%"><td></td>
</td><td align="center">
<hr noshade size="1" color="#6D8E4D" width="90%">
</td></tr>
</table>
</div>
</center>
</td>
<td width="2%" height="264" valign="top">
<p style="border-right: 1 solid #6D8E4D"><br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
</td>
<td width="20%" height="264" valign="top">
<div align="center"><center>
<table border="0" cellpadding="0" cellspacing="0" width="100%" class=main1 height="611" bgcolor="#F7F7F7">
<tr>
<td width="100%" bgcolor="#6D8E4D" height="22"><font color="#FFFFFF"> 会员登录</font></td>
</tr>
<tr>
<td width="100%" height="88">
<form method="POST" action="LoginCheck.asp">
<p align="center"><br>
用户:<input type="text" name="UserName" size="11"><br>
密码:<input type="password" name="UserPass" size="11"><br>
<br>
<input type="submit" value="登录" name="B1" tabindex="1" style="font-size: 14px"><input type="reset" value="重置" name="B2" style="font-size: 14px">
</form>
</td>
</tr>
<tr>
<td width="100%" height="22" bgcolor="#6D8E4D"> <font color="#FFFFFF">商品检索</font></td>
</tr>
<tr>
<td width="100%" height="60">
<form method='POST' action='ProductSearch.asp'>
<div align='center'><p><br>
请填入商品名称<br>
<input type='text' name='Product_Name' size='11' class='a'><br>
<select name='Product_Class' size='1' tabindex='0' class='a' style="font-size: 14px">
</form>
<%
sqltext2="select * from Class_1 "
rs_class_1.open sqltext2,conn,1,1
'if NOT rs_class_1.EOF then
while not rs_class_1.EOF
%>
<option value=<%=rs_class_1("Class_1_Name")%>><%=rs_class_1("Class_1_Name")%></option>
<%
rs_class_1.MoveNext
wend
rs_class_1.close
conn.close
%>
</select>
<br>
<br>
<input type='submit' value='查询' name='Submit' class='a' style="font-size: 14px"> <input type='reset' value='重填' name='Reset' class='a' style="font-size: 14px"></p>
</form>
</div>
</td>
</tr>
<tr>
<td width="100%" height="22" bgcolor="#6D8E4D">
<font color="#FFFFFF">
订单查询</font>
</td>
</tr>
<tr>
<td width="100%" height="15">
<form method='POST' action='OrderListFind.asp'>
<div align='center'><br>
请填入订单号码<br>
<algin='center'><input type='text' name='Form_Id' size='10'><br>
<br>
<input type='submit' value='查询' name='djB1' class='a' style="font-size: 14px"> <input type='reset' value='重填' name='djb2' class='a' style="font-size: 14px">
</div></form>
</td>
</tr>
<tr>
<td width="100%" height="365">
</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</div>
<p align="center">Copyright © 2003 Hunan University. All rights reserved.</p>
<p align="center">湖南大学计算机与通信学院计科99-2班李泽青 版权所有</p>
<hr noshade size="3" color="#6D8E4D">
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -