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

📄 shop_class2.asp

📁 一个非常好的旅游网站程序.
💻 ASP
📖 第 1 页 / 共 2 页
字号:
          <TD height="26" align=middle background="IMAGES/mfk2.gif" bgColor=#fcfcfc>&nbsp;</TD>
        </TR>
      </TBODY>
    </TABLE>
  </DIV>
  
<table width="760" height="700" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
      <td width="192" height="62" valign="top"> 
        <table border="0" cellpadding="0" cellspacing="0" width="100%" class=main1 height="700">
          <tr valign="top"> 
            
          <td bgcolor="#fcfcfc">&nbsp; </td>
          </tr>
        </table>                                        
      </td>                                        
      <td width="10" background="IMAGES/mfk6.gif"></td>                                        
      <td width="558" valign="top"> 
        <div align="center">                                        
          <table border="0" cellpadding="0" cellspacing="0" width="100%" class=main1 height="53" >
            <tr> 
              <td height="31" colspan="2"> 
                <div align="center"> 
                  <table width="100%" height="34" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
                    <tr> 
                      <td width="30">&nbsp;</td>
                      <td width="30"><div align="center"><img src="IMAGES/icon_photodesk.gif" width="14" height="15"></div></td>
                      
                    <td width="259"><font color="#8CC53E"> <font color="#000000">餐 
                      饮 酒 楼</font> </font></td>
                      <td width="239" align="center"> 
                        <!--日期开始(mfkiqpl)-->
                        <FONT 
      color=#9f9f9f> 
                        <SCRIPT language=JavaScript>      
 today=new Date();      
 function initArray(){      
   this.length=initArray.arguments.length      
   for(var i=0;i<this.length;i++)      
   this[i+1]=initArray.arguments[i]  }      
   var d=new initArray(      
     "Sunday",      
     "Monday",      
     "Tuesday",      
     "Wednesday",      
     "Thursday",      
     "Friday",      
     "Saturday");      
document.write(              
     today.getYear()," Year ",      
     today.getMonth()+1," Month ",      
     today.getDate()," Day   ",      
     d[today.getDay()+1] );       
                </SCRIPT>
                        <!--日期结束(write)-->
                        </FONT></td>
                    </tr>
                  </table>
                  <hr align="center" width="95%" size="1">
                <table width="100%" border="0" align="center" cellpadding="3" cellspacing="4">
                  <%                                                      
'/////////////////////////////////////////////////////////假如没有商品时//////////////////                                                      
If rs.eof and rs.bof then                                                       
   response.write "<td><p align='center'><font color='#ff0000'>还没任何商家加盟</font></p></td>"                                                      
   response.end                                                      
End if %>
                  <%row_count=1                                                      
                    '/////////////////////////////////////显示帖子的子程序////// ///////////////////////////////////                                                     
					Sub list()%>
                  <%i=0                                                      
                     Do While Not rs.EOF%>
                  <tr> 
                    <td width="50%">&nbsp;&nbsp;&nbsp;<img src="IMAGES/title.gif" width="12" height="11" align="absmiddle">&nbsp;<a href="shop/default.asp?shop_name=<%response.write rs(2)%>"> 
                      <%response.write rs(2)%>
                      </a></td>
                    <td width="25%"><a href="shop/default.asp?shop_name=<%response.write rs(2)%>"> 
                      <%response.write rs(7)%>
                      </a></td>
                    <td width="25%"><a href="shop/default.asp?shop_name=<%response.write rs(2)%>"> 
                      <%response.write rs(8)%>
                      </a></td>
                    <%if row_count mod 3 =0 then%>
                  </tr>
                  <%end if%>
                  <%                                                     
                        i=i+1                                                     
  					    if i >= MaxPerpage then exit do                                                     
				    	rs.MoveNext                                                     
					    row_count=row_count+1                                                     
						Loop                                                     
					end Sub                                                     
					  %>
                  <% call list                                                     
   If Rs.recordcount > MaxPerPage then               
                                                      
   call showpages                                                     
 end if%>
                </table>
              </div></td>
            </tr>
          </table>                                                     
        </div>                                                     
        </td>                                                     
    </tr>                                                     
  </table>                                                     
</div>                                                     
<%                                                     
'显示翻页的子程序                                                     
sub showpages()%>                   
             
                             
<table  border="0" cellPadding="0" cellSpacing="0" width="530" >
  <td>
  <INPUT  type=hidden value=<%=ProductClass_1%> name=ProductClass_1>
      <table border="0" cellPadding="0" cellSpacing="0" width="100%" height="30" class="box2">
        <tr> 
          <td> <font color="#000000"> 
            <p align="center"> 
              <%                                                     
   Response.write "<font color='#000000'>页面-> </font>"                                                        
   If currentpage > 1 Then                                                     
      response.write "<a href='shop_class2.asp?&page="+cstr(1)+"&ProductClass_1="+Cstr(ProductClass_1)+"'><font color='#000000'>首页</font></a><font color='#000000'><b>-</b></font>"                                                       
      Response.write "<a href='shop_class2.asp?page="+Cstr(currentpage-1)+"&ProductClass_1="+Cstr(ProductClass_1)+"'><font color='#000000'>前页</font></a><font color='#000000'><b>-</b></font>"                                                     
   Else                                                     
      Response.write "<font color='#000000'>首页-</font>"                                                     
      Response.write "<font color='#000000'>前页-</font>"                                                      
   End if                                                     
                                                        
   If currentpage < Rs.PageCount Then                                                     
      Response.write "<a href='shop_class2.asp?page="+Cstr(currentPage+1)+"&ProductClass_1="+Cstr(ProductClass_1)+"'><font color='#000000'>后页</font></a><font color='#000000'><b>-</b></font>"                                                     
      Response.write "<a href='shop_class2.asp?page="+Cstr(Rs.PageCount)+"&ProductClass_1="+Cstr(ProductClass_1)+"'><font color='#000000'>尾页</font></a>&nbsp;&nbsp;"                                                     
   Else                                                     
      Response.write "<font color='#000000'>后页-</font>"                                                     
      Response.write "<font color='#000000'>尾页</font>&nbsp;&nbsp;"                                                            
   End if                                                     
   Response.write "<font color='#000000'>页次:</font>" & "<font color=#FF0000>" & Cstr(CurrentPage) &  "</font>" & "<font color='#000000'>/" & Cstr(rs.pagecount) & "</font>&nbsp;"                                                     
   Response.write " 共 <font color=#FF0000>" & Cstr(Rs.RecordCount) & "</font>" & "<font color='#000000'>个商家</font>&nbsp;&nbsp;"                                                     
                                                     
response.write "</td><td align='center'>"                                                     
response.write "<font color='#000000' class=main1> 转到第 </font><input type='text' name='page' size=2 maxlength=3 class=smallInput value="&Currentpage&"> 页&nbsp;"                                                     
   response.write "<input class=buttonface type='submit'  value='Go'  name='cndok' style='background-color: #Eaeaea'></span>&nbsp;&nbsp;"                                                        
%>
            </font> </td>
    </tr>
  </table>
    </td> 
</table>                                                     
</form>
<%end sub%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr> 
    <td><hr align="center" width="760" size="1" class="EFONT"></td>
  </tr>
</table>
<table width="760" height="120" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr> 
    <td>&nbsp;</td>
    <td height="100"><div align="center"><a href="http://www.0701.com.cn/web.other/ad/aboutus.htm">关于本站</a> 
        | <a href="other/shopadd.htm">商家加盟</a> | <a href="http://www.0701.com.cn/web.other/ad/about.htm">隐私条款</a> 
        | <a href="mailto:style@0701.com.cn">联系我们</a> | <a href="http://www.0701.com.cn/web.business/ads/ads.htm">广告服务</a> 
        | <a href="http://www.0701.com.cn/web.other/ad/wzdh.htm">网站地图</a> | <a href="zixun/">在线咨询</a><br>
        <br>
        版权所有:鹰潭便民网 <a href="http://www.0701.com.cn">www.0701.com.cn</a> 客户服务电话:6233399 <a href="mailto:style@0701.com.cn"><img src="lk/images/mail.gif" alt="联系管理员" width="19" height="13" border="0" align="absmiddle"></a><br>
        <br>
        如果您对我们的服务有任何意见或建议,请惠赐E-mail至:<a href="mailto:style@0701.com.cn">style@0701.com.cn</a>欢迎社会各界洽谈合作事宜</div>
      <br></td>
    <td></td>
  </tr>
</table>
</body>                                                     
                                                     

⌨️ 快捷键说明

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