<% ' 테이블 기본 환경설정 ******************************************************************************** table = "popup" ' 테이블명 idx_field = "idx" ' 기본키 oreder_filed = "idx DESC" ' 정렬기준 필드 Query_Fields = "idx, w_width, w_height, w_top, w_left, ck_chk, ck_val, scrollbars, toolbar, menubar, locations, subject, content, w_chk, wdate, mdate, sdate, edate, tot_chk" ' 불러올 필드 v_pagesize = 20 ' 목록개수 v_block = 10 ' 페이지개수 ' **************************************************************************************************** ' ---------------조합 쿼리문------------------------------------ v_search = InputValue(request("v_search")) v_keyword = InputValue(request("v_keyword")) Query_Where = "" '기본 검색 If v_keyword <> "" then Query_Where = Query_Where & " and "&v_search&" like '%"&v_keyword&"%'" End If '' 조건 있을때 여기에 계속 추가 If Query_Where<>"" Then Query_Where2 = " WHERE " & Mid(Query_Where,5) End If Query_OrderBy = " ORDER BY "&oreder_filed ' --------------------------------------------------------------- ' ---------------------전체 레코드 수 뽑기---------------------------------------- sql = "select count("&idx_field&") as "&idx_field&" from "& table & Query_Where Set Rs = Dbcon.Execute (sql) recordcount = rs(0) rs.close : Set rs = Nothing ' --------------------------------------------------------------------------------- v_totalpage = int((recordcount-1)/v_pagesize)+1 ' '전체덩어리갯수 v_page = p_page If v_page = "" then v_page = 1 ElseIf v_page < 1 then v_page = 1 ElseIf v_page > v_totalpage then v_page = v_totalpage End if ' -----------------------------리스트 출력 쿼리문 생성----------------------------- sql = " SELECT TOP "& v_pagesize &" "& Query_Fields &" FROM "& table &" WHERE "& idx_field &" NOT IN " sql = sql & " ( SELECT TOP "& v_pagesize*(v_page-1) &" "& idx_field &" FROM "& table & Query_Where2 & Query_OrderBy &" ) " sql = sql & Query_Where &" "& 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 ' --------------------------------------------------------------------------------- %>

팝업 리스트

  • :
전체 <%=recordcount%>개 (페이지 <%=v_page%>/<%=v_totalpage%>)
팝업관리 수정/삭제/보기 <% If vCnt>-1 Then If v_page = 1 then num = recordcount else num = recordcount - ((v_page - 1) * v_pagesize) End if For i=0 To vCnt Call arr2Value(Query_Fields, "vData", i) If w_chk = "T" then w_chk_str = "사용(모든팝업)" ElseIf w_chk = "Y" then w_chk_str = "사용" ElseIf w_chk = "N" then w_chk_str = "중지" End if %> <% num = num - 1 Next Else %> <% End if %>
팝업관리 서식
선택 제목 사용기간 사용여부 수정 삭제 보기
<%=subject%> <%=sdate%> ~ <%=edate%> <%=w_chk_str%>
<%page("list.asp")%>