<%
'如果没有给showTuiJianNum赋值，则默认显示4条推荐车辆
if showTuiJianNum = "" or isnumeric(showTuiJianNum) = false or showTuiJianNum <= 0 then
	showTuiJianNum = 4
end if
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#EDEDEF">
<tr>
                  <td>
                  <br />
                  <%
				  set rsers = server.CreateObject("adodb.recordset")
				  rsers.open "select top "& showTuiJianNum &" id,caryear,productSort,provice_shi,smallimg,memberprice from product where recommend = 1 and fabu=1  order by id desc",conn,1,1
				  do while not rsers.eof
				  %>
                  <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr>
                      <td width="49%"><div style="width:111px; height:75px; border:solid 1px #333333;">
                    <%
					if rsers("smallimg") = "nothing" then
						response.write "<a href='view2car.asp?id="& rsers("id") &"' target='_blank'><img src='images/noImg.gif' alt='暂无图片' border=0 width=111 height=75 /></a>"
					else
						response.write "<a href='view2car.asp?id="& rsers("id") &"' target='_blank'><img src='"& rsers("smallimg") &"' border=0 width=111 height=75 /></a>"
					end if
					%></div></td>
                      <td width="51%">
                      <div>
                    <div title="<%=exportpinp(rsers("productSort"),"pinpaiandxinghao")%>" style="line-height:15px; margin-top:2px;">车型：<%=left(exportpinp(rsers("productSort"),"pinpaiandxinghao"),8)%></div>
                    <div style="line-height:15px;">年份：<%=rsers("caryear")%></div>
                    <div style="line-height:15px;">价格：<%=rsers("memberprice")&"元"%></div>
                    <div style="line-height:15px;">地点：<%=rsers("provice_shi")%></div>
                  </div></td>
                    </tr>
                  </table>
                  <br />
                  <%
				  rsers.movenext
				  loop
				  rsers.close
				  set rsers = nothing
				  %></td>
  </tr>
</table>
