<% Option Explicit %> <% ' 공통펑션 %> <% ' DB 접속 %> <% ' DB 접속 %> <% '################################# [ 변수 선언 ] ################################################## ' 폼변수 선언 Dim frm_postvar, cp_no, cp_nm '// 일반변수 선언 Dim increse_val, tmp_no, boxtype '// 배열 변수 선언 '// 쿠키변수 Dim cookie_cp_no, cookie_cp_nm '// db 관련 변수 지정 Dim tb_order, tblconsult_file, strQuery, strQuery_where, objRs, objRs2 '// db 필드 변수 Dim qno, qtitle, qname, qregdate , qhit, qlevel,qstep,q_pno, tTitle Dim a_title, a_writer, a_findate, a_state, a_qatype, a_fileimg Dim receive,receive_ar, fileimg, send_nm,bd_class, kind_img,state_img '// 페이지 카운트 변수 Dim page, first_page, last_page, block, blocksize, pre_block, next_block, plink_page, page_loop '// 검색어 처리 변수 Dim search_field, search_str '################################# [ 파라미터 변수 확인 ] ######################################### Dim ERR_FLAG ERR_FLAG = false if ERR_FLAG Then jhj_GETpostgetParameter End If '################################# [ GET 방식 변수 일반변수 처리 ] ############################### ' 올바른 page 변수 구함 page = Request.Querystring("page") if (len(page) <= 0 ) Then page = 1 End If search_field = Request.Querystring("search_field") '// 검색필드 search_str = Request.Querystring("search_str") '// 검색어 jhj_connectDB '################################# [ DB 기본 인자 셋팅 ] ########################################## 'response.end tb_order = "tp_board_qna" '// 질문 테이블 Set objRs = Server.CreateObject("ADODB.Recordset") '================================= [ query WHERE절 처리 ] ========================================== strQuery_where = " WHERE 1=1" '// 검색어로 넘어오는 변수 If ( ( len( search_str ) > 0 ) AND ( len( search_field) >0 ) ) Then strQuery_where = strQuery_where & " AND " & search_field & " LIKE '" & search_str & "%'" End If strQuery ="SELECT qno, qtitle, qname, qregdate ,q_hit, qlevel,qstep,q_pno "&_ " FROM " & tb_order & strQuery_where & " ORDER BY q_pno DESC, qlevel ASC " objRs.pagesize = 20 '// 한페이지당 처리되는 레코드수 objRs.cursorlocation = aduseclient objRs.open strQuery, dbcon, adOpenStatic, adLockReadOnly, adCmdText '// 레코드 셋 오픈 increse_val = 0 'response.write "strQuery : " & strQuery 'response.end %> ::::: TOTAL POST :::::
홈 > 게시판 > Q&A
   
 
   
<% If Not objRs.Eof Then objRs.AbsolutePage = page '// fetch 할 페이지 설정 tmp_no = objRs.Recordcount - objRs.Pagesize * (page-1) '// 레코드개수에 따른 가상 번호 지정 increse_val = 1 '// 증가값 WHILE ( NOT objRs.Eof ) AND ( increse_val <= objRs.Pagesize ) qno=objRs(0): qtitle=objRs(1) : qname=objRs(2) : qregdate=jhj_datestr_convert(objRs(3),".") qhit=objRs(4) : qlevel=objRs(5) : qstep=objRs(6) : q_pno=objRs(7) '################################# [ 레코드 필드 처리 ] ################################## %> <% tmp_no = tmp_no - 1 increse_val = increse_val + 1 objRs.MoveNext WEND Else increse_val = 0 %> <% End If %>
<%=tmp_no%>
 <%=GetBulletinThread(CInt(qstep))%><%=qtitle%>.
<%=qname%>
<%=qregdate%>
<%=qhit%>
등록된 내용이 없습니다!
 
 
<% blocksize=10 '############################ [ 페이지 카운트 function 호출 ] ##################################### Call jhj_USER_PageCounter ( objRs, blocksize, "../img01", "btn_prev.gif","btn_next.gif","btn_first.gif","btn_last.gif","align=absmiddle" ) %>
<%= first_page %>  <%= pre_block %>  <%= page_loop %> <%= next_block %>  <%= last_page %>