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

📄 index.asp

📁 主要特色功能如下: 1.注册与否均可购物(同类程序中大多要求注册才能购物)
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="Comm/conn.asp"-->
<!--#include file="indexconfig.asp" -->
<html>
<head>
<title><%=sitename%>-<%=siteurl%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="shop.css" type="text/css">
</head>
<body  text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" background=images/fig_background.gif>
<div align="center"> 
  <!--#include file="menu/topbar.asp"-->
   <script language=javascript src="jsroot/openwin.js"></script>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">  
<tr><td bgcolor="FFFBF7" align="center" valign="top" width="185"> 
	<table width=180 border="0" cellspacing="0" cellpadding="0"><tr><td height=8></td></tr></table>
			<!--#include file="loginbox.asp" -->
	<table width=180 border="0" cellspacing="0" cellpadding="0"><tr><td height=8></td></tr></table>
		    <!--#include file="prodtree.asp" -->
        <TABLE border=0  cellspacing=0 cellpadding=0 width="100%">
          <tr class=row bgcolor=#f2f2f2> 
            <td valign=top align="center"></td>
          </tr>
          <tr> 
            <td valign=top align="center"></td>
          </tr>
          <tr class=row bgcolor=#f2f2f2> 
            <td align="center"> 
            </td>
          </tr>
        </table> </td>
     <td height="370" bgcolor="#CCCCCC" width="1"></td>
      <td width="569" height="370" align="center" valign="top">


<table width="564"  height=155 border=0 align="center" cellpadding=0 cellspacing=0 bgcolor=#fbfbfb class="new">

<tr><td height=3></td></tr>
<tr>
<td width=275 height=155 valign=center align=center  rowspan="2"> 


<!--#include file="comm/gdpic.asp" -->
<SCRIPT language=JavaScript1.2> 
<!-- 
var scrollerwidth=270
var scrollerheight=150
var scrollerbgcolor='#FFFFFF'
var pausebetweenimages=2500
var waitingtime=10
var slideimages=new Array()
slideimages[0]='<a href=<%=pic1_lnk%>><img  src=adv/G1.jpg  border=0  width=270 height=150  title=<%=tit1%>></a>'
slideimages[1]='<a href=<%=pic2_lnk%>><img  src=adv/G2.jpg  border=0  width=270 height=150  title=<%=tit2%>></a>'
slideimages[2]='<a href=<%=pic3_lnk%>><img  src=adv/G3.jpg  border=0  width=270 height=150  title=<%=tit3%>></a>'
slideimages[3]='<a href=<%=pic4_lnk%>><img  src=adv/G4.jpg  border=0  width=270 height=150  title=<%=tit4%>></a>'
if (slideimages.length>1)
i=2
else
i=0
function move1(whichlayer){
tlayer=eval(whichlayer)
if (tlayer.top>0&&tlayer.top<=5){
tlayer.top=0
setTimeout("move1(tlayer)",pausebetweenimages)
setTimeout("move2(document.main.document.second)",pausebetweenimages)
return
}
if (tlayer.top>=tlayer.document.height*-1){
tlayer.top-=5
setTimeout("move1(tlayer)",waitingtime)
}
else{
tlayer.top=scrollerheight
tlayer.document.write(slideimages[i])
tlayer.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}}
function move2(whichlayer){
tlayer2=eval(whichlayer)
if (tlayer2.top>0&&tlayer2.top<=5){
tlayer2.top=0
setTimeout("move2(tlayer2)",pausebetweenimages)
setTimeout("move1(document.main.document.first)",pausebetweenimages)
return
}
if (tlayer2.top>=tlayer2.document.height*-1){
tlayer2.top-=5
setTimeout("move2(tlayer2)",waitingtime)
}
else{
tlayer2.top=scrollerheight
tlayer2.document.write(slideimages[i])
tlayer2.document.close()
if (i==slideimages.length-1)
i=0
else
i++
}}
function move3(whichdiv){
tdiv=eval(whichdiv)
if (tdiv.style.pixelTop>0&&tdiv.style.pixelTop<=5){
tdiv.style.pixelTop=0
setTimeout("move3(tdiv)",pausebetweenimages)
setTimeout("move4(second2)",pausebetweenimages)
return
}
if (tdiv.style.pixelTop>=tdiv.offsetHeight*-1){
tdiv.style.pixelTop-=5
setTimeout("move3(tdiv)",waitingtime)
}
else{
tdiv.style.pixelTop=scrollerheight
tdiv.innerHTML=slideimages[i]
if (i==slideimages.length-1)
i=0
else
i++
}
}
function move4(whichdiv){
tdiv2=eval(whichdiv)
if (tdiv2.style.pixelTop>0&&tdiv2.style.pixelTop<=5){
tdiv2.style.pixelTop=0
setTimeout("move4(tdiv2)",pausebetweenimages)
setTimeout("move3(first2)",pausebetweenimages)
return
}
if (tdiv2.style.pixelTop>=tdiv2.offsetHeight*-1){
tdiv2.style.pixelTop-=5
setTimeout("move4(second2)",waitingtime)
}
else{
tdiv2.style.pixelTop=scrollerheight
tdiv2.innerHTML=slideimages[i]
if (i==slideimages.length-1)
i=0
else
i++
}}
function startscroll(){
if (document.all){
move3(first2)
second2.style.top=scrollerheight
}
else if (document.layers){
move1(document.main.document.first)
document.main.document.second.top=scrollerheight+5
document.main.document.second.visibility='show'
}}
window.onload=startscroll
//-->
</SCRIPT>
<ILAYER id=main bgcolor="&amp;{scrollerbgcolor};" 
height="&amp;{scrollerheight};" width="&amp;{scrollerwidth};"><LAYER id=first 
width="&amp;{scrollerwidth};" top="1" left="0">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[0])
</SCRIPT>
</LAYER><LAYER id=second width="&amp;{scrollerwidth};" top="0" left="0" 
visibility="hide">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[1])
</SCRIPT>
</LAYER></ILAYER>
<SCRIPT language=JavaScript1.2>
<!-- 
if (document.all){
document.writeln('<span id="main2" style="position:relative;width:'+scrollerwidth+';height:'+scrollerheight+';overflow:hiden;background-color:'+scrollerbgcolor+'">')
document.writeln('<div style="position:absolute;width:'+scrollerwidth+';height:'+scrollerheight+';clip:rect(0 '+scrollerwidth+' '+scrollerheight+' 0);left:0;top:0">')
document.writeln('<div id="first2" style="position:absolute;width:'+scrollerwidth+';left:0;top:1;">')
document.write(slideimages[0])
document.writeln('</div>')
document.writeln('<div id="second2" style="position:absolute;width:'+scrollerwidth+';left:0;top:0">')
document.write(slideimages[1])
document.writeln('</div>')
document.writeln('</div>')
document.writeln('</span>')
}
//-->
</SCRIPT>
</td>


<td height=155 valign=top>
<table cellspacing=0 cellpadding=0 border=0 align="center" width=95%>
 <%
'*************新闻板块
'判断日期是否过期,和是否设定在线!
sqlprom = "select top 9 NewsId,NewsTitle,PubDate from News where online=true and date()<OffDate and date()>=PubDate order by uup desc,Pubdate desc"
set rsnews=Server.CreateObject("ADODB.RecordSet")
rsnews.open sqlprom,conn,1,1
%>
<%
if rsnews.eof and rsnews.bof then
	response.write "<tr><td height=50 align=center>最近没有促销信息</td></tr>"
else
	Do while Not rsnews.eof
	%><tr><td><a href="news_detail.asp?NewsId=<%=Cstr(rsnews("NewsId"))%>" target="_blank">→
	<%
	if len(rsnews("NewsTitle"))>15 then 
		response.write left(rsnews("NewsTitle"),14)&"…"
	else
		Response.write rsnews("NewsTitle")
	end if
	%>
	</a></td><td align=right><%=rsnews("PubDate")%></td></tr>
         <%

⌨️ 快捷键说明

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