<% sqlnew = "select top 3 bbs_date, * from " & table & "_news where bbs_code = 'N01' order by bbs_date desc" rs.open sqlnew, db, adOpenKeyset if rs.eof Then line_num = 1 %>
µî·ÏµÈ °Ô½Ã¹°ÀÌ ¾ø½À´Ï´Ù.
<% else i = 0 line_num = 1 do while not rs.eof bbs_date=left(rs("bbs_date"),10) if DateDiff("d",bbs_date,Now()) < 1 then IsNearWrite = True else IsNearWrite = False end if ' ÃÖ±Ù 24½Ã°£ À̳» ¾´ ±Û üũ ³¡ '±ä Á¦¸ñ ó¸® bbs_title = rs("bbs_subj") TitleLen = 30 ' Ãâ·ÂµÉ Á¦¸ñ Ä®·³ÀÇ ±æÀÌ if LEN(bbs_title) >= TitleLen then bbs_title = left(bbs_title, TitleLen - 2) & ".." end if '±ä Á¦¸ñ ó¸® ³¡ bbs_num = rs("bbs_num") %>
<%=Replace(bbs_date, "-", ".")%> <%=bbs_title%><%if IsNearWrite then%> <%end if%>
<% rs.movenext i = i + 50 line_num = line_num + 1 loop end if rs.close If line_num > 2 Then %>
<%End if%>