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

📄 default.asp

📁 物流管理系统,可以用于中小企业,建立自己的内部物流管理.
💻 ASP
字号:
🔍 
<%@ codepage ="936" %>
<!--#include file="head.asp"-->
<!--#include file="sortcount.asp"-->
<!--#include file="newcount.asp"-->
<% 
const MaxPic=5
const TjMax=12
dim zsrs
dim zssql
dim rssort
dim sortsql
dim rs1
dim sql1
'打开推荐企业目录数据库
set rs1=server.createobject("adodb.recordset") 
sql1="select web,id,qymc,qorder from qyml where tjbz like '%02%' order by qorder asc,ID desc"
rs1.open sql1,conn,1,1
'打开大分类数据库
Set rssort= Server.CreateObject("ADODB.Recordset") 
sortsql="select * from Class_1" 
rssort.open sortsql,conn,1,1
'打开精品推荐商品展示数据库
zssql="select id,picture,cpmc,qorder from spzs where zsbz like '%02%' and flag=1 order by qorder asc,ID desc"
Set rszs= Server.CreateObject("ADODB.Recordset") 
rszs.open zssql,conn,1,1
 '打开商品展示数据库
zssql1="select id,qorder from spzs where Cpmc<>'' order by qorder asc,ID desc"
Set rszs1= Server.CreateObject("ADODB.Recordset") 
rszs1.open zssql1,conn,1,1 
cpnum=rszs1.recordcount
%>
<HTML><HEAD><TITLE>产品展示.<%=WebName%></TITLE>
<META content=zh-cn http-equiv=Content-Language>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<LINK 
href="images/main.css" rel=stylesheet type=text/css>
<META content="Microsoft FrontPage 6.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff text=#000000 topMargin=0 marginheight="0">
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=750 style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD vAlign=top height="285">
<SCRIPT language=javascript>
<!--
function validate()
{
if(document.f.s_key.value=="" || document.f.s_key.value==null)
{
alert("请输入查询的关键字!");
document.f.s_key.focus();
document.f.s_key.select();
}
else
{
document.f.submit();
}
}
-->
</SCRIPT>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber6" height="1">
<tr>
<td width="100%" height="2"></td>
</tr>
</table>
<TABLE border=1 borderColorDark=#ffffff borderColorLight=#ced7ce cellPadding=0 cellSpacing=0 width="100%">
<FORM action=search.asp method=POST name=search>
<TBODY>
<TR bgColor=#f7f7e7>
<TD bgColor=#edf2f8 class=M height=35>
<DIV align=left><B><FONT color=#3366ff>查询产品资料：</FONT></B> 
<INPUT name=txtitle size=22>
<select name="sortid">
<%
dim rs2,sql2
set rs2=server.createobject("adodb.recordset")
sql2="select * from Class_1"
rs2.open sql2,conn,1,1
if rs2.eof and rs2.bof then 
response.write "<option value='没有类别'>没有类别</option>"
else
response.write "<option value='0'>所有类别</option>"&vbcrlf 
do while not rs2.eof
response.write "<option value='"&rs2("SortID")&"'" 
if request("SortID")<>"" then 
if rs2("SortID")=cint(request("SortID")) then response.write " selected " 
end if 
response.write ">"&rs2("Sort")&"</option>"&vbcrlf 
rs2.movenext 
loop 
end if 
rs2.close 
%>
</select> &nbsp;
<INPUT align=bottom border=0 name=I9 src="images/CreditDynamic_index_search.gif" type=image >
</DIV>
</TD>
<TD bgColor=#edf2f8 height=35>
<a href=default_1.asp><B>查看详细行业分类</b></a>
</TD>
</TR>
</FORM>
</TBODY>
</TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD width="25%">　</TD>
<TD width="25%">　</TD>
<TD width="25%">　</TD>
<TD width="25%">　</TD></TR>
<TR>
<TD height=22 width="100%" colspan="4">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<TD width="100%" height="16" style="color: #000; font-family: 宋体; font-size: 12px; line-height:150%"> 
<div align="right">
<TABLE border="0" width="98%" height="20" style="border-collapse: collapse" cellspacing="0" cellpadding="0"> 
<%do while not rssort.eof%> 
<TR> 
<td width="134" height="25" align="left" style="color: #000; font-family: 宋体; font-size: 12px; line-height:150%"><p style="line-height: 150%">
<a href="search.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a><font color="#808080"><%response.write"("&count(rssort("sortid"))&")" %></font><%if count1(rssort("sortid"))=0 then%><%else%><img border="0" src="images/newicon2.gif"><%end if%></td>
<%rssort.movenext %> 
<td width="136" height="20" align="left" style="color: #000; font-family: 宋体; font-size: 12px; line-height:150%"><p style="line-height: 150%">
<a href="search.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a><font color="#808080"><%response.write"("&count(rssort("sortid"))&")" %></font><%if count1(rssort("sortid"))=0 then%><%else%><img border="0" src="images/newicon2.gif"><%end if%></td>
<% rssort.movenext %> 
<td width="138" height="25" align="left" style="color: #000; font-family: 宋体; font-size: 12px; line-height:150%" ><p style="line-height: 150%">
<a href="search.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a><font color="#808080"><%response.write"("&count(rssort("sortid"))&")" %></font><%if count1(rssort("sortid"))=0 then%><%else%><img border="0" src="images/newicon2.gif"><%end if%></td>
<% rssort.movenext %> 
<td width="132" height="25" align="left" style="color: #000; font-family: 宋体; font-size: 12px; line-height:150%" ><p style="line-height: 150%">
<a href="search.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a><font color="#808080"><%response.write"("&count(rssort("sortid"))&")" %></font><%if count1(rssort("sortid"))=0 then%><%else%><img border="0" src="images/newicon2.gif"><%end if%></td>
</TR> 
<% rssort.movenext 
loop 
rssort.close 
set rssort=nothing 
%>
</TABLE>
</div>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=550>
<TBODY>
<TR>
<TD height=20>　</TD></TR>
<TR>
<TD background="images/z3.gif" width="550" height="30">
<div align="right">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="70%" id="AutoNumber2">
<tr>
<td width="34%">　</td>
<td width="5%">　</td>
<td width="43%"><font color="#FFFFFF">
产品统计：<%=cpnum%>件</font></td>
<td width="18%"><font color="#FFFFFF">产品指南</font></td>
</tr>
</table>
</div>
</TD></TR>
<TR>
<TD background=images/Products_index_xia02.gif>
<%DO WHILE NOT rszs.eof%>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=530>
<TBODY>
<TR>
<TD height=7 width=125></TD>
<TD width=10></TD>
<TD width=125></TD>
<TD width=10></TD>
<TD width=125></TD>
<TD width=10></TD>
<TD width=125></TD></TR>
<TR>
<TD height=100>
<DIV align=center>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width=110>
	<TBODY>
	<TR> 
	<TD background=images/Products_index_xia044.gif height=110>
	<DIV align=center>
	<a href="Show_product.asp?id=<%=rszs("id")%>">
	<IMG 
	border=0 
	src="../picture/<%=rszs("picture")%>" width="88" height="88" alt="<%=rszs("cpmc")%>" style="border: 1px solid #000000"></a></DIV></TD></TR>
	<TR>
	<TD height=5></TD></TR>
	<TR>
	<TD 
	background=images/Products_index_xia055.gif 
	height=30>
	<DIV align=center>
	<span style='font-size:9pt;line-height: 15pt'>
	<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">
	<%if len(rszs("Cpmc"))>7 then%>
	<%=left(rszs("Cpmc"),7)%></a><a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">..<% else%><%=rszs("Cpmc")%><%end if%></a></span>
	</DIV></TD></TR>
	</TBODY></TABLE>
</DIV>
</TD>
<%rszs.movenext %>
<TD>　</TD>
<TD height=100>
<DIV align=center>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width=110>
	  <TBODY>
	    <TR>
		<TD background=images/Products_index_xia044.gif height=110>
			<DIV align=center>
			<a href="Show_product.asp?id=<%=rszs("id")%>">
			<IMG border=0 src="../picture/<%=rszs("picture")%>" width="88" height="88" alt="<%=rszs("cpmc")%>" style="border: 1px solid #000000"></a>
			</DIV>
		</TD>
	    </TR>
	    <TR>
		<TD height=5></TD>
	    </TR>
	    <TR>
		<TD background=images/Products_index_xia055.gif height=30>
			<DIV align=center>
			<span style=\&quot;font-size:9pt;line-height: 15pt\">
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">
			<%if len(rszs("Cpmc"))>7 then%>
			<%=left(rszs("Cpmc"),7)%></a>
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">..<% else%><%=rszs("Cpmc")%><%end if%></a></span>
			</DIV>
		</TD>
	    </TR>
	  </TBODY>
	</TABLE>
</DIV>
</TD>
<%rszs.movenext %>
<TD>　</TD>
<TD height=100>
<DIV align=center>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width=110>
	  <TBODY>
	    <TR>
		<TD background=images/Products_index_xia044.gif height=110>
			<DIV align=center>
			<a href="Show_product.asp?id=<%=rszs("id")%>">
			<IMG border=0 src="../picture/<%=rszs("picture")%>" width="88" height="88" alt="<%=rszs("cpmc")%>" style="border: 1px solid #000000"></a>
			</DIV>
		</TD>
	    </TR>
	    <TR>
		<TD height=5></TD>
	    </TR>
	    <TR>
		<TD background=images/Products_index_xia055.gif height=30>
			<DIV align=center>
			<span style=\&quot;font-size:9pt;line-height: 15pt\">
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">
			<%if len(rszs("Cpmc"))>7 then%>
			<%=left(rszs("Cpmc"),7)%></a>
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">..<% else%><%=rszs("Cpmc")%><%end if%></a></span>
			</DIV>
		</TD>
	    </TR>
	  </TBODY>
	</TABLE>
</DIV>
</TD>
<%rszs.movenext %>
<TD>　</TD>
<TD height=100>
<DIV align=center>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width=110>
	  <TBODY>
	    <TR>
		<TD background=images/Products_index_xia044.gif height=110>
			<DIV align=center>
			<a href="Show_product.asp?id=<%=rszs("id")%>">
			<IMG border=0 src="../picture/<%=rszs("picture")%>" width="88" height="88" alt="<%=rszs("cpmc")%>" style="border: 1px solid #000000"></a>
			</DIV>
		</TD>
	    </TR>
	    <TR>
		<TD height=5></TD>
	    </TR>
	    <TR>
		<TD background=images/Products_index_xia055.gif height=30>
			<DIV align=center>
			<span style='font-size:9pt;line-height: 15pt'>
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">
			<%if len(rszs("Cpmc"))>7 then%>
			<%=left(rszs("Cpmc"),7)%></a>
			<a target="_blank" href="Show_product.asp?id=<%=rszs("id")%>">..<% else%><%=rszs("Cpmc")%><%end if%></a></span>
			</DIV>
		</TD>
	    </TR>
	  </TBODY>
	</TABLE>
</DIV></TD>
<TD></TD></TR>

<TR>
<TD height=7></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD></TR>
</TBODY></TABLE>
</DIV>
<% y=y+4
if y>=MaxPic then exit do
rszs.movenext 
loop 
rszs.close 
set rszs=nothing 
%>
</TD></TR>
<TR>
<TD>
<IMG src="images/Products_index_xia03.gif"></TD></TR>
<TR>
<TD>　</TD></TR></TBODY></TABLE></TD>
<TD height="285">　</TD>
<TD background=images/Products_index_right_bg01.gif 
vAlign=top width=190 height="285">
<DIV align=right>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=180 style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD><a href="add.asp">
<IMG border=0 
src="images/Products_index_right01.gif"></a></TD></TR>
<TR>
<TD>　</TD></TR>
<TR>
<TD background="images/z1.gif" width="180" height="31">
&nbsp;&nbsp; <font color="#FFFFFF"><span style="font-size: 10.5pt"><b>
本站会员推荐</b></span></font></TD></TR>
<TR>
<%do while not rs1.eof%>
<TD 
background=images/Products_index_right_bg03.gif>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="95%">
<TBODY>
<TR>
<TD class=LL>·<FONT color=#000080><%if rs1("web")="" or rs1("web")="http://" then%><a target="_blank" href="../company/index.asp?id=<%=rs1("id")%>"><% if len(rs1("qymc"))>12 then%><%=left(rs1("qymc"),11)%>..<% else%><%=rs1("qymc")%><%end if%></a><%else%>
<a target="_blank" href="<%=rs1("web")%>"><% if len(rs1("qymc"))>12 then%><%=left(rs1("qymc"),11)%>..<% else%><%=rs1("qymc")%></a><%end if%><%end if%></TD></TR>
</TBODY></TABLE></DIV></TD></TR>
<%n=n+1 
if n>=TjMax then exit do 
rs1.movenext 
loop
rs1.close 
set rs1=nothing 
%>
<TR>
<TD height=1>
<map name="FPMap0">
<area href="../qyml/company_info.asp" shape="rect" coords="6, 4, 84, 20">
<area href="../qyml/default.asp" shape="rect" coords="117, 0, 166, 19">
</map>
<IMG border=0 
src="images/Products_index_right04.gif" 
useMap=#FPMap0></TD></TR>
<TR>
<TD>
　</TD></TR>
<TR>
<TD>
<table border="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber7" cellspacing="0">
<tr>
<td width="100%" height="6"><script type="text/javascript"><!--
google_ad_client = "pub-1643874477780591";
google_ad_width = 180;
google_ad_height = 150;
google_ad_format = "180x150_as";
google_ad_type = "text_image";
google_ad_channel = "";
google_color_border = "C3D9FF";
google_color_bg = "FFFFFF";
google_color_link = "0066CC";
google_color_text = "000000";
google_color_url = "E1771E";
//--></script>
<script type="text/javascript"
  src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script></td>
</tr>
</table>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber8">
<tr>
<td width="100%">
<p align="center"><script src="../ads/cpzs.asp"></script>
</td>
</tr>
</table>
</center>
</div>
<TR> 
</td>
</tr>
</table>
</center>
</TD></TR></TABLE></TD></TR></TBODY></TABLE></DIV></TD></TR></TBODY></TABLE>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="750" id="AutoNumber1">
<tr>
<td width="100%" background="images/bt2.gif">　</td>
</tr>
<!--#include file="../inc/end.asp"-->
</table>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -