hotpro.asp

来自「一套设计完善、高效的web商城解决方案」· ASP 代码 · 共 17 行

<table width="190" align="center" cellpadding="0" cellspacing="0">
<%
if request("BigId")<>"" then
	BigId=request("BigId")
else
	BigId=0
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select top 11 * from hotpro where BigId="&BigId&" and ifshow=True and TextId=0 order by Dates desc"
rs.open sql,conn,1,1
do while not rs.eof
	Response.Write "<tr><td valign=middle width=190 height=22>&nbsp;<img src=Images/hotpro_0.gif>&nbsp;<a onfocus=blur() href="&rs("Links")&">"&rs("Texts")&"</a><br><img src=Images/190x1.gif></td></tr>"
	rs.movenext
loop
rs.close
set rs=nothing%>
</table>