📄 index.asp

📁 多多网店系统v3.01 完全免费可用版-功能简介: 支持多模板皮肤色切换[8套] 支持按商品特性[推荐商品/特价商品/新品分类]浏览支持按商品类别浏览支持单件商品用支付宝交易按钮直接支付订

💻 ASP

字号:

<%dim dbpath
dbpath=""
%>
<!--#include file="Conn.asp"-->
<!--#include file="include/MyRequest.asp" -->
<!--#include file="sub.asp" -->
<%
//参数设置表中相关参数调出
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select root_option_NumsPerRow,root_option_RowsIndexNew,root_option_RowsIndexTj,root_option_RowsIndexSpec,root_option_WidthSPic,root_option_HeighSPic from root_option where id=1"
rs.open sql,conn,1,1
root_option_NumsPerRow   =rs(0)
root_option_RowsIndexNew =rs(1)
root_option_RowsIndexTj  =rs(2)
root_option_RowsIndexSpec=rs(3)
root_option_WidthSPic    =rs(4)
root_option_HeighSPic    =rs(5)
rs.close
set rs=nothing

if root_option_NumsPerRow="" then root_option_NumsPerRow=5
if root_option_WidthSPic="" then root_option_WidthSPic=80
if root_option_HeighSPic="" then root_option_HeighSPic=80
if root_option_RowsIndexNew="" then root_option_RowsIndexNew=2
if root_option_RowsIndexTJ="" then root_option_RowsIndexTJ=2
if root_option_RowsIndexSpec="" then root_option_RowsIndexSpec=2

Set rs=Server.CreateObject("ADODB.Recordset")
sql="select root_info_IndexTitle,root_info_IndexKeyWords,root_info_IndexDescription from root_info where id=1"
rs.open sql,conn,1,1
root_info_IndexTitle      =rs(0)
root_info_IndexKeyWords   =rs(1)
root_info_IndexDescription=rs(2)
rs.close
set rs=nothing
%>
<html>


<head>
<meta http-equiv="Content-Language" content="zh-cn">
<title><%=root_info_IndexTitle%></title>
<meta name="keywords" content="<%=root_info_IndexKeyWords%>">
<meta name="description" content="<%=root_info_IndexDescription%>">
</head>

<body>
<!--#include file="top.asp" -->
<table border="0" width="100%" cellpadding="0" style="border-collapse: collapse">
	<tr>
		<td width="180" valign="top"><!--#include file="Left.asp"--></td>
		<td width="10"></td>
		<td valign="top">
		<table border="0" width="100%" cellpadding="0" style="border-collapse: collapse">
			<tr>
				<td width="470" valign="top"><!--#include file="Adv_Middle.asp" --></td>
				<td width="8">　</td>
				<td valign="top"><!--#include file="News_Top10.asp" --></td>
			</tr>
		</table>
		<table border="0" width="100%" cellpadding="4" style="border-collapse: collapse" bordercolor="#86B9D6">
			<tr>
				<td class="RightHead">
				<a href="Product_ListFlag.asp?flag=2" class="U">最新推荐商品</a></td>
				<td class="RightHead" align="right">
				<a href="Product_ListFlag.asp?flag=2" class="U">
				<span style="font-weight: 400">更多精品推荐</span></a></td>
			</tr>
			<tr>
				<td colspan="2"><%call ProductIndexList(2,root_option_NumsPerRow,root_option_RowsIndexTj)%></td>
			</tr>
		</table>
		<br>
		<table border="0" width="100%" cellpadding="4" style="border-collapse: collapse" bordercolor="#86B9D6">
			<tr>
				<td class="RightHead">
				<a href="Product_ListFlag.asp?flag=1" class="U">最新新品速递</a></td>
				<td class="RightHead" align="right">
				<a href="Product_ListFlag.asp?flag=1" class="U">
				<span style="font-weight: 400">更多新品速递</span></a></td>
			</tr>
			<tr>
				<td colspan="2"><%call ProductIndexList(1,root_option_NumsPerRow,root_option_RowsIndexNew)%></td>
			</tr>
		</table>
		<br>
		<table border="0" width="100%" cellpadding="4" style="border-collapse: collapse" bordercolor="#86B9D6">
			<tr>
				<td class="RightHead">
				<a href="Product_ListFlag.asp?flag=3" class="U">最新特价商品</a></td>
				<td class="RightHead" align="right">
				<a href="Product_ListFlag.asp?flag=3" class="U">
				<span style="font-weight: 400">更多特价商品</span></a></td>
			</tr>
			<tr>
				<td colspan="2"><%call ProductIndexList(3,root_option_NumsPerRow,root_option_RowsIndexSpec)%></td>
			</tr>
		</table>
		</td>
	</tr>
</table>
<br>
<!--#include file="End.asp"-->			
</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -