www.gusucode.com > 公寓出租网站整站源码 1.0程序 > Product.asp

    <!--#include file="top.asp"-->
<script language="JavaScript"> 
<!-- 
var flag=false; 
function DrawImage(ImgD){ 
 var image=new Image(); 
 image.src=ImgD.src; 
 if(image.width>0 && image.height>0){ 
  flag=true; 
  if(image.width/image.height>= 105/80){ 
   if(image.width>105){
    ImgD.width=105; 
    ImgD.height=(image.height*105)/image.width; 
   }else{ 
    ImgD.width=image.width;
    ImgD.height=image.height; 
   } 
   ImgD.alt="点击查看详细信息..."; 
  } 
  else{ 
   if(image.height>80){
    ImgD.height=80; 
    ImgD.width=(image.width*80)/image.height; 
   }else{ 
    ImgD.width=image.width;
    ImgD.height=image.height; 
   } 
   ImgD.alt="点击查看详细信息..."; 
  } 
 }
}

function CheckAll(form)
  {
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.Name != "chkAll")
       e.checked = form.chkAll.checked;
    }
  }
//--> 
</script> 
<%
MaxPerPage=MaxPerPage_Default
strFileName="Product.asp?BigClassName=" & BigClassName & "&SmallClassName=" & SmallClassName 
%>
  <tr>
    <td><table width="977" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="237" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="37" valign="bottom" background="images/18.gif"><table width="50%" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td align="center"><b>公寓分类</b></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td background="images/22.gif"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td style="line-height:25px;"><% call ShowSmallClass_Tree() %></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td><img src="images/28.gif" width="237" height="10" alt="" /></td>
          </tr>
          <tr>
            <td height="5"></td>
          </tr>
          <tr>
            <td height="37" valign="bottom" background="images/18.gif"><table width="50%" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td align="center"><b>公寓查询</b></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td background="images/22.gif"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td valign="top" style="line-height:25px;"><% call ShowSearch(1) %></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td><img src="images/28.gif" width="237" height="10" alt="" /></td>
          </tr>
                              <tr>
            <td height="5"></td>
          </tr>
          <tr>
            <td height="37" valign="bottom" background="images/18.gif"><table width="50%" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td align="center"><b>新闻动态</b></td>
              </tr>
            </table></td>
          </tr>
<%
set rs_news1=server.createobject("adodb.recordset")
sqltext4="select top 5 * from news where BigClassName='新闻动态'"
rs_news1.open sqltext4,conn,1,1				 	
%>

          <tr>
            <td background="images/22.gif"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<%i=0
do while not rs_news1.eof%>
              <tr>
                <td valign="top" style="line-height:25px;">
				<img border="0" src="Img/arrow_6.gif" width="11" height="11"><a href="shownews.asp?id=<%=rs_news1("id")%>" target="_blank"><%=rs_news1("title")%></a></td>
              </tr>
<%
rs_news1.movenext
i=i+1
loop
rs_news1.close
%>

            </table></td>
          </tr>
          <tr>
            <td><img src="images/28.gif" width="237" height="10" alt="" /></td>
          </tr>
                              <tr>
            <td height="5"></td>
          </tr>
          <tr>
            <td height="37" valign="bottom" background="images/18.gif"><table width="50%" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td align="center"><b>联系方式</b></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td background="images/22.gif"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select Content from Aboutus where Title='联系方式'"
rs.open sql,conn,1,3
%>

              <tr>
                <td valign="top" style="line-height:25px;"><%=left(rs("Content"),300)%></td>
              </tr>
<%rs.close
set rs=nothing
%>
            </table></td>
          </tr>
          <tr>
            <td><img src="images/28.gif" width="237" height="10" alt="" /></td>
          </tr>

        </table></td>
        <td width="10" valign="top"> </td>
        <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="10" valign="bottom" background="images/26.gif"><img src="images/26.gif" width="730" height="10" alt="" /></td>
          </tr>
          <tr>
            <td background="images/23.gif"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td><b>公寓展示</b></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td><img src="images/29.gif" width="730" height="10"></td>
          </tr>
         <tr>
            <td><div align="center">
					<table border="0" width="95%" cellpadding="0" style="border-collapse: collapse">
						<tr>
							<td align="left"><br>
							                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <TR> 
              <TD width="453" 
                  height=28> <% call ShowClassGuide() %> </TD>
              <TD width="102"> <% call ShowProductTotal() %> </TD>
            </TR>
            <TR> 
              <TD 
                  height=1 colspan="2" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" 
              width=10></TD>
            </TR>
            <TR> 
                      <TD 
                  height=42 colspan="2"> 
                        <form action="Payment.asp" method="Post" name="Inquire" target="_blank" >
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                              <td width="53%" height="26" bgcolor="#FF9257"> 
                                <div align="center"> </div></td>
                              <td width="22%" bgcolor="#FF9257">
<div align="right"> 
                                  <input name="chkAll" type="checkbox" id="chkAll" onClick=CheckAll(this.form) value="checkbox">
                                  选取所有</div></td>
                              <td width="25%" bgcolor="#FF9257">
<div align="center"> 
                                  <input name="image" type="image" src="Images/inquire_now.gif" width="86" height="21" border="0">
                                </div></td>
                    </tr>
                    <tr> 
                      <td colspan="3"> <% call ShowProduct(32) %> </td>
                    </tr>
                  </table>
				</form></TD>
            </TR>
            <TR> 
              <TD 
                  height=1 colspan="2"> 
		<%
		  if totalput>0 then		    
		  	call showpage(strFileName,totalput,MaxPerPage,false,true,"个产品")
		  end if
		  %> </TD>
            </TR>
                  </table></td>
              </tr>
            </table></td>
        </tr>
      </table></td>
  </tr>
</table>

							</td>
						</tr>
<%rs1.close
set rs1=nothing
%>
					</table>
				</div></td>
          </tr>
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<!--#include file="end.asp"-->