


<%
sql="select top 10 id,forum_id,topic from bbs_topic order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted #e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,20)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>





<%
  sql="select top 10 id,forum_id,topic,re_counter from bbs_topic order by re_counter desc" 
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted 

#e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a 

href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' target=_blank 

alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,20)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>


þ

<%
  sql="select top 10 id,forum_id,topic from bbs_topic where isgood=1 order by id desc"  
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted 

#e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a 

href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' target=_blank 

alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,20)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>


÷̳

 <%
sql="select top 8 id,forum_id,topic from bbs_topic where forum_id=33 order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,13)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>


Ϸ̳

 <%
sql="select top 8 id,forum_id,topic from bbs_topic where forum_id=33 or forum_id=71 order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a href='forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,13)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>

'ְ
dim c_id,p_id,c_name,p_job,c_job,p_tim,c_tim,p_iname,p_sex,isex
sql="select top 8 id,job,tim,iname,sex from person where hidden=1 order by tim desc"
set rs=conn.execute(sql)
do while not rs.eof
p_id=rs("id")
p_job=rs("job")
p_tim=rs("tim")
p_iname=rs("iname")
p_sex=rs("sex")
if p_sex=true then isex="" else isex="Ů"
response.write vbcrlf&" <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted #e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle> "&p_iname&" ("&isex&") <a href='job_person_view.asp?id="&p_id&"' target=_blank alt='ְ'>"&joekoe_cms.code_html(p_job,1,20)&"</a></td><td class=tims style='border-bottom:1px dotted #e0e0e0' align=right>"&joekoe_cms.time_type(p_tim,4)&"</td></tr>"
rs.movenext
loop
rs.close
  
,ѡһ
dim c_id,p_id,c_name,p_job,c_job,p_tim,c_tim

'ְ
sql="select top 10 id,job,tim from person where hidden=1 order by tim desc"
set rs=conn.execute(sql)
do while not rs.eof
p_id=rs("id")
p_job=rs("job")
p_tim=rs("tim")
response.write vbcrlf&" <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted #e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a href='job_person_view.asp?id="&p_id&"' target=_blank alt='ְ'>"&joekoe_cms.code_html(p_job,1,20)&"</a></td><td class=tims style='border-bottom:1px dotted #e0e0e0' align=right>"&joekoe_cms.time_type(p_tim,4)&"</td></tr>"
rs.movenext
loop
rs.close
 


'ҵƸ
sql="select top 10 id,job,tim from job where hidden=1 order by tim desc"
set rs=conn.execute(sql)
do while not rs.eof
c_id=rs("id")
c_job=rs("job")
c_tim=rs("tim")
response.write vbcrlf&" <tr><td height='"&dim_num(6)&"' style='border-bottom:1px dotted #e0e0e0'><img src='skin/"&joekoe_cms.web_skin&"/small/h_forum.gif' border=0 align=absMiddle><a href='job_view.asp?id="&c_id&"' target=_blank alt='ҵƸ'>"&joekoe_cms.code_html(c_job,1,20)&"</a></td><td class=tims style='border-bottom:1px dotted #e0e0e0' align=center>"&joekoe_cms.time_type(c_tim,4)&"</td><td class=red align=right style='border-bottom:1px dotted #e0e0e0'>Ƹ</td></tr>"
rs.movenext
loop
rs.close
