<% ' 테이블 기본 환경설정 ******************************************************************************** table = "banner2" ' 테이블명 idx_field = "b_l_num" ' 기본키 Query_OrderBy = "b_l_code desc" ' 정렬기준 필드 Query_Fields = "b_l_num, info_url, b_l_code, b_l_img, b_l_url, b_l_chk, b_l_sdate, b_l_edate, b_l_subject, b_l_memo, b_l_wdate, b_l_mdate, b_main_img" ' 불러올 필드 ' **************************************************************************************************** ' 검색어가 있다면 if v_keyword <> "" And v_search <> "" then search_str = " AND "&v_search&" like '%"& replace(v_keyword, "'","''")&"%'" End If '검색조건 추가시 여기 계속 추가 If search_str<>"" Then search_str = "where" & Mid(search_str,5) End if ' -----------------------------리스트 출력 쿼리문 생성----------------------------- sql = "select "&Query_Fields&" from " & table & search_str & " ORDER BY " &Query_OrderBy Set Rs = Dbcon.Execute (sql) If rs.eof Then vCnt = -1 Else vData = rs.getrows() vCnt = UBound(vData,2) End If rs.close : Set rs = nothing ' --------------------------------------------------------------------------------- %>

팝업존 리스트

  • :
전체 <%=vCnt+1%>개
회원관리 수정/삭제/보기 <% zz = 1 If vCnt > -1 Then For i=0 To vCnt Call arr2Value(Query_Fields, "vData", i) If b_l_chk = "Y" then b_l_chk_str = "사용" ElseIf b_l_chk = "N" then b_l_chk_str = "중지" End If %> <% zz = zz + 1 next Else %> <% End If %>
회원관리 서식
선택 순서 팝업존 이미지 사용기간 사용여부 수정 삭제
순서 위로 이동순서 아래로 이동 <%=b_l_subject%> <%=b_l_sdate%> ~ <%=b_l_edate%> <%=b_l_chk_str%>