inews.asp

程序为自主开发ASP+SQL大型购物搜索网站,系统管理、商铺、会员三种会员唯一帐号管理。目前已有数据条商品数据与数万条商铺信息

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
Set Rs = Conn.Execute("Select top "& Mould_Setup(7) &" * From News Where ShopNumberID = '"& ShopNumberID &"' Order By DateTime Desc")

	While Not Rs.eof
	Response.Write "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
	Response.Write "<tr>"
	Response.Write "<td width=""5%""><img src=""images/i_31.gif"" width=""12"" height=""9""></td>"
	Response.Write "<td width=""70%""><A href=News.asp?NewsID="& Rs("ID") &" target=_blank>"& Rs("Title") &"</A></td>"
	Response.Write "<td width=""25%""><FONT COLOR=999999>"& Rs("DateTime") &"</FONT></td>"
	Response.Write "</tr></table>"
	
	Rs.MoveNext
	Wend
	Rs.Close
Set Rs = Nothing
%>