�� SSI �ļ�ʱ��
�� SSI �ļ�ʱ��
�� SSI �ļ�ʱ��
�� SSI �ļ�ʱ��
<% user_chk_yn = "N" : c_menu1 = 4 %> �� SSI �ļ�ʱ��
<% h_code = "GL01" h_page = gReq("page") '// 현재 페이지 sch_group = gReq("sch_group") goParam = "?sch_group=" & sch_group Call dbConnect Call gBoardConfig(db, h_code) intPageSize = 19 ' // 리스트 갯수 intBlockPage = 19 ' // 페이징 수 If Len(h_page) = 0 Then h_page = 1 sqlFrom = "FROM " & tb_board & " T1 " sqlWhere = "WHERE bm_code='" & h_code & "' AND bd_status = 1 " If Not gIsNull(sch_group) Then sqlWhere = sqlWhere & "AND bd_branch = '" & sch_group & "' " sqlOrder = "ORDER BY bd_first DESC, bd_disp_num DESC" sqlSelect = "bd_seq, bd_branch, bd_etc3, bd_etc1, bd_etc2 " sql = "SELECT COUNT(*), CEILING(CAST(COUNT(*) AS FLOAT)/" & intPageSize & ") " & sqlFrom & sqlWhere Set rs = db.Execute(sql,,adCmdText) intTotalCount = rs(0) + (numTop + 1) '// 전체 글수 intTotalPage = rs(1) '// 전체 페이지수 intNumber = intTotalCount - ((h_page -1) * intPageSize) Call rsClose sql = "SELECT TOP " & h_page * intPageSize & " " & sqlSelect & sqlFrom & sqlWhere & sqlOrder Set rs = db.Execute(sql,,adCmdText) If rs.eof Then numList = -1 '// 대상글이 없음 Else arrList = rs.GetRows numList = Ubound(arrList,2) End If Call rsClose Call dbClose %> ECONEKO