<%
sub flea_new(wtits,t_num,w_num,et,ct)
  dim rs,wtit,wname,temp1
  wtit="×îÐÂÐÅÏ¢"
  if var_null(wtits)<>"" then wtit=wtits
  sql="select top "&t_num&" id,topic,tim from flea where hidden=1 order by id desc"
  temp1="<table border=0 width='100%'>"
  set rs=conn.execute(sql)
  do while not rs.eof
    wname=rs("topic")
    temp1=temp1&"<tr><td height="&space_mod&">"&img_small(sk_jt)&"<a href='javascript:;' onclick=""javascript:open_view('flea_view.asp?id="&rs("id")&"',1);"" title='"&wname&"'>"&objv7.code_html(wname,1,w_num)&"</a><font class=tims>"
    if et>-1 then temp1=temp1&" "&objv7.time_type(rs("tim"),et)
    temp1=temp1&"</font></td></tr>"
    rs.movenext
  loop
  rs.close:set rs=nothing
  temp1=temp1&"</table>"
  response.write kong&format_bar("<font class="&sk_class&">"&wtit&"</font>",temp1,"",sk_bar,"")
end sub
%>