<%
Dim bdm_idx, info_url, bdm_depth, bdm_code, bdm_ref, bdm_menuname, bdm_t_clr, bdm_ro_clr, bdm_chk, bdm_type, bdm_target, bdm_bbs, bdm_editor, bdm_url, bdm_wdate, bdm_id
Dim orderby_sel
Dim prepage
orderby_sel = InputValue( request("orderby_sel") )
If orderby_sel = "" Then orderby_sel = "bdm_menuname asc"
prepage = NOWPAGE
set ST = New SelectTable
r_fields_s = "(select count(*) from bd_address_page where bdm_idx = a.bdm_idx) as cnt, bdm_idx, info_url, bdm_depth, bdm_code, bdm_ref, bdm_menuname, bdm_t_clr, bdm_ro_clr, bdm_chk, bdm_type, bdm_target, bdm_bbs, bdm_editor, bdm_url, bdm_wdate, bdm_id, bdm_color"
table = "bd_address a"
Where = " where bdm_id = '" & session("ss_m_id") & "'"
Orderby = " order by " & orderby_sel
sql = "select " & r_fields_s & " from " & table & Where & Orderby
'Response.write sql
list_data = ST.selectQueryTable( sql )
%>
그룹관리
그룹등록
그룹수정
그룹 주소록