iheeo_gqhot10rank.asp

易和阳光购物商城 v1.3 | 功能简介 增加了防注入文件

<TABLE cellSpacing=1 cellPadding=5 width=185 border=0 bgcolor="#FAFAFA" class="wenbenkuang">
                <TBODY>
                  <TR>
                    <TD>
                      <TABLE class=sub_basic cellSpacing=0 cellPadding=0 
                              width=173 border=0>
                        <TBODY>
                          <TR>
                            <TD>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=173 border=0>
                                <TBODY>
                                  <TR>
                                    <TD width=22><B><IMG height=16 
                                src="images/sub_gesi_icon.gif" width=17 
                                align=absMiddle> </B></TD>
                                    <TD class=title_01 height=24>商城最新动态</TD>
                                    <TD width=40 align="right">
									<a href="dongtai.asp">[更多]</a></TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD><IMG height=2 
                                src="images/mydata_left_sunimg.gif" 
                                width=173></TD>
                          </TR>
                          <TR>
                            <TD height=5></TD>
                          </TR>
                          <TR>
                            <TD align=middle>
                              <TABLE class=sub_basic cellSpacing=0 
                                cellPadding=0 width=167 border=0>
                                <TBODY><%'dim i
		  i=0
		  set rs=server.CreateObject("adodb.recordset")
		  rs.open "select top 6 newsname,adddate,newsid from BJX_news order by adddate desc",conn,1,1
		  if rs.eof and rs.bof then
		  response.write "目前还没有新闻！"
		  else
		  do while not rs.eof
		  i=i+1%>
                        <TR>
                          <TD  height=18><IMG height=2 
                                src="images/jum_bullet.gif" width=12 
                                align=absMiddle><%if len(trim(rs("newsname")))>12 then
		  response.write "<a href=""news.asp?id="&rs("newsid")&""" target=""_blank"" title="&year(rs("adddate"))&"年"&month(rs("adddate"))&"月"&day(rs("adddate"))&"日发布>"&left(trim(rs("newsname")),11)&".."&"</a><br>"
		  else
		  response.write "<a href=""news.asp?id="&rs("newsid")&""" target=""_blank"" title="&year(rs("adddate"))&"年"&month(rs("adddate"))&"月"&day(rs("adddate"))&"日发布>"&trim(rs("newsname"))&"</a>"
		  end if%></TD>
                        </TR>
<%if i>=6 then exit do
rs.movenext
		  loop
		  end if
		  rs.close
		  set rs=nothing%></TBODY>
                            </TABLE></TD>
                          </TR>
                        </TBODY>
                    </TABLE></TD>
                  </TR>
                </TBODY>
            </TABLE>