<%@ Language="VBScript"%> <% Call fSetDBCon() Call fSetRs() const alllistsize = 3 Set objStrCut = new StrCut strsQL = "select bl.subject,bc.cat_name,bl.no from board_list bl, board_cat bc where bl.faq_checkYN='Y' and bl.lang_type=1 and bl.delete_checkYN='N' and bl.cat_no=bc.no order by bl.no" objRs.Open strsQL,objDBCon if not (objRs.eof or objRs.bof) then datalist = objRs.getRows fRsRelease() %>

Home > Customer service center    <%if isarray(datalist) then%> <%for i = 0 to ubound(datalist,2)%> <%if not (i < alllistsize) then exit for%> <%next%> <%End if%> [<%=datalist(1,i)%>]<%=objStrCut.strTitleCut(datalist(0,i),40)%>

<% Set objStrCut = nothing %>