new.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 32 行

 
<div align=center>

  
 <table border=0 width=100%>
 <tr>
<%                   
set rs=server.CreateObject("adodb.recordset")      
    
		sql="select top 4 special_id,image,special_name from SongSpecial order by Special_Id desc"      
		rs.open sql,conn,1,1      
		do while not rs.eof      
               if len(rs("image"))>0 then
                   picsrc=rs("image")
                else
                 picsrc="../img/blank.gif"
               end if
			response.write "<td width=""25%""><a href=Special_Show.asp?Special_Id="&rs("Special_Id")&" ><img src="&picsrc&" border=0 width=100 height=100></a><br> "&rs("special_Name")&" </td> "      
			   
		rs.movenext      
		loop      
		rs.close      
		%>  
</tr></table>

</div>