www.gusucode.com > 公寓出租网站整站源码 1.0程序 > ProductShow.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>= 200/200){
if(image.width>200){
ImgD.width=200;
ImgD.height=(image.height*200)/image.width;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
else{
if(image.height>200){
ImgD.height=200;
ImgD.width=(image.width*200)/image.height;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
}
}
//-->
</script>
<%
ShowSmallClassType=ShowSmallClassType_Article
dim ID
ID=trim(request("ID"))
if ID="" then
response.Redirect("Product.asp")
end if
sql="select * from Product where ID=" & ID & ""
Set rs1= Server.CreateObject("ADODB.Recordset")
rs1.open sql,conn,1,3
if rs1.bof and rs1.eof then
response.write"<SCRIPT language=JavaScript>alert('找不到此公寓！');"
response.write"javascript:history.go(-1)</SCRIPT>"
else
rs1("Hits")=rs1("Hits")+1
rs1.update
%>
<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="452"
height=25> <%
response.write " <a href='Product.asp?BigClassName=" & rs1("BigClassName") & "'>" & rs1("BigClassName") & "</a> >> "
if rs1("SmallClassName") & ""<>"" then
response.write "<a href='Product.asp?BigClassName=" & rs1("BigClassName")&"&SmallClassName=" & rs1("SmallClassName") & "'>" & rs1("SmallClassName") & "</a> >> "
end if
response.write rs1("Title")
%> </TD>
<TD width="98"><a href="Payment.asp?Product_Id=<%=rs1("Product_Id")%>",target="_blank"><img border=0 src=Images/inquire_now.gif
width=86 height=21></a></TD>
</TR>
<TR>
<TD
height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="237" colspan="3">
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="21" colspan="3"> </td>
</tr>
<tr> <%fileExt=lcase(getFileExtName(rs1("DefaultPicUrl")))%>
<td width="44%" rowspan="5"><font color="#FF6600"> </font><font color="#FF6600"> </font>
<%if fileext="jpg" or fileext="bmp" or fileext="png" or fileext="gif" then%>
<a href="<%=rs1("DefaultPicUrl")%>" target="_blank"><img style="BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-COLOR: #cccccc; BORDER-TOP-COLOR: #cccccc; BORDER-RIGHT-COLOR: #cccccc" src=<%=rs1("DefaultPicUrl")%> width="200" height="200" onload="javascript:DrawImage(this);"></a>
<%else
if fileext="swf" then%>
<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width='200' height='200'>
<param name=movie value='<%=rs1("DefaultPicUrl")%>'>
<param name=quality value=high>
<param name='Play' value='-1'>
<param name='Loop' value='0'>
<param name='Menu' value='-1'>
<embed src='<%=rs1("DefaultPicUrl")%>' width='200' height='200' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' ></embed>
</object>
<%end if
end if%>
</td>
<td height="39"><div align="right">公寓编号：</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs1("Product_Id")%></strong></font></td>
</tr>
<tr>
<td width="15%" height="39"><div align="right">公寓名称：</div></td>
<td width="41%" height="40"><font color="#FF6600"><strong><%=rs1("title")%></strong></font></td>
</tr>
<tr>
<td height="31"><div align="right">规 格：</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs1("Spec")%></strong></font></td>
</tr>
<tr>
<td height="29"><div align="right">公寓备注：</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs1("Memo")%></strong></font></td>
</tr>
<tr>
<td height="31"><div align="right">公寓类别：</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs1("BigClassName")%></strong></font></td>
</tr>
<tr>
<td height="9" colspan="3"> </td>
</tr>
</table></TD>
</TR>
<TR>
<TD class="title_right" height="37" colspan="3"> <img src="Images/smallbook.jpg" width="10" height="10">
公 寓 说 明 </TD>
</TR>
<TR>
<TD height="1" colspan="3"> <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> <%call ShowProductContent()%> </td>
</tr>
</table></TD>
</TR>
<TR>
<TD
height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD
height=25>点击数：<%=rs1("Hits")%> 录入时间：<%= FormatDateTime(rs1("UpdateTime"),2) %> 【<a href='javascript:window.print()'>打印此页</a>】 【<a href="javascript:self.close()">关闭</a>】</TD>
<TD
height=25><a href="Payment.asp?Product_Id=<%=rs1("Product_Id")%>",target="_blank"><img border=0 src=Images/inquire_now.gif
width=86 height=21></a></TD>
</TR>
</table> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
<%
end if
rs1.close
set rs1=nothing
call CloseConn()
%>
</table>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="end.asp"-->