<% po_pk = InputValue(request("po_pk")) ' 테이블 기본 환경설정 ******************************************************************************** table = "poll_question" ' 테이블명 idx_field = "poq_idx" ' 기본키 oreder_filed = "poq_code ASC" ' 정렬기준 필드 Query_Fields = "poq_idx ,po_pk ,poq_code, poq_topmemo, poq_question, poq_type, poq_multi, poq_chk, poq_bogi1, poq_bogi2, poq_bogi3, poq_bogi4, poq_bogi5, poq_wdate, poq_mdate" ' 불러올 필드 ' **************************************************************************************************** ' ---------------조합 쿼리문------------------------------------ If v_keyword <> "" then search_str = " AND "&v_search&" like '%"&v_keyword&"%'" End if Query_OrderBy = " ORDER BY "&oreder_filed ' --------------------------------------------------------------- ' -----------------------------리스트 출력 쿼리문 생성----------------------------- sql = "select "&Query_Fields&" from "&table&" WHERE po_pk = "&po_pk sql = sql & search_str & search_str2 & 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 ' --------------------------------------------------------------------------------- %>

설문조사 문항설정

현재경로: 설문조사 리스트 > <%=get_pollsubject(po_pk)%>

설문문항생성 서식 작성
설문조사문항생성 서식
설문항목 서식
1
2
3
4
5
설문조사관리 수정/삭제/보기 <% If vCnt > -1 Then zz = 1 For i=0 To vCnt Call arr2Value(Query_Fields, "vData", i) If poq_chk ="Y" then poq_chk_str = "사용" else poq_chk_str = "중지" End If %> <% zz = zz+1 Next Else ' 게시할 목록이 없다면 %> <% End if %>
설문조사관리 서식
선택 순서 제목 사용여부 수정 삭제
순서 위로 이동순서 아래로 이동
1
2
3
4
5
<%=poq_chk_str%>