WEB源码(ASP,PHP,...)

开发平台：

HTML/CSS

Index_newpro.asp：源码内容

							
<%
set rsmai=server.CreateObject("adodb.recordset")
sqlmai="select top 4 * from [Gu_pro] where shenhe=1 and pic<>''order by id desc,addtime desc"
rsmai.open sqlmai,conn,1,1
%>
<div align="center">
	<table border="0" width="133" height="84" cellpadding="0" cellspacing="0">
	<%if Rsmai.eof or Rsmai.bof then%>
		<tr>
			<td height="76" width="133">
			<p align="center">暂时没有商家产品</td>
		</tr>
	<%
	else
	%>	
	<tr>
			<%do while not rsmai.eof%>
			<td height="91" width="133">
<div align="center">
<table border="0" width="125" height="88" cellpadding="0" cellspacing="1"  >
	<tr>
		<td height="86" width="116" style="border: 1px solid #D0D4D9" align="center">
		<a href="Gu_showpro.asp?guxing=<%=rsmai("id")%>">
		<img border="0" src="<%=rsmai("pic")%>" width="123" height="84" alt="名称：<%=rsmai("name")%>&#13&#10时间：<%=rsmai("addtime")%>"></a></td>
		<td height="86" width="4">　</td>
	</tr>
</table></div>
			</td>
			<% 
    rsmai.movenext  
    loop
    Rsmai.Close
    Set Rsmai=Nothing
    
%><%end if%>
		</tr>
	</table>
</div>

						