최초등록

This commit is contained in:
sp1000je
2026-02-23 10:01:00 +09:00
commit 7bc9767bf4
3120 changed files with 198447 additions and 0 deletions
+507
View File
@@ -0,0 +1,507 @@
<%
' ****************파라미터정보***************************
If a_ad_cms = "Y" then
a_ad_cms_url = "ad_cms.asp?a_num="&a_num&"&amp;"&page_info
else
a_ad_cms_url = "#"
End if
' *******************************************************
' ****************페이징정보*****************************
v_pagesize = a_displaysu ' 리스트 화면에 보여줄 갯수
v_block = 10 ' 페이징 갯수
length = 30 ' 내용 길이
' *******************************************************
' ****************테이블 기본 환경설정*******************
is_tablename = a_tablename ' 테이블명
R_Fields = "b_num, b_type, b_id, b_name, b_pwd, b_subject, b_email, b_jumin, b_phone1, b_phone2, b_phone3, b_cate, b_catename, b_noticechk, b_content, b_ip, b_count, b_look, b_open, b_ref, b_step, b_level, b_regdate, b_chuchun, b_sbjclr, b_sdate, b_edate, b_temp1, b_temp2, b_temp3, b_temp4, b_file1, b_file2, b_file3, b_file4, b_file5,b_c_count" ' 레코드필드
pk_Field = "b_num"
opt_where_str = "" ' 기본조건이 있을때 사용..없으면 '' 처리
' $orderby_str = " ORDER BY "&pk_Field&" DESC "; ' 정렬
orderby_str = " ORDER BY b_ref desc, b_step asc " ' 정렬
' *******************************************************
' ****************옵션 부분******************************
if trim(v_keyword) <> "" And v_search <> "" Then ' 검색어가 있다면
search_str = " AND " &v_search &" like '%" & replace(v_keyword,"'","''")&"%'"
End If
If is_ad_cms <> "Y" then ' 관리자가아닐때 실행할것들...
if a_member = "Y" then ' 회원제 사용일때
search_str2 = " AND b_id = '"&SESSION("ss_m_id")&"' "
if SESSION("ss_m_id") = "" then
Call goMessage("로그인 후 사용하세요", "/content/07guide/02_01.asp")
End if
End if
search_str5 =" AND b_look = 'Y' "
End if
if a_reply = "N" or (a_reply = "Y" and a_replyOpt = "2") then ' 답변기능을 사용하지 않을때.
search_str3 =" and b_type = 'N' "
End if
' 기간설정 사용시..
if a_date_list = "Y" then
If a_sdate <> "" And a_edate = "" then
search_str4 = " and left(b_regdate,10) >= '"&a_sdate&"' "
ElseIf a_sdate <> "" And a_edate <> "" then
search_str4 = " and left(b_regdate,10) >= '"&a_sdate&"' and left(b_regdate,10) <= '"&a_edate&"'"
End if
End if
' 분류기능 사용시..
if a_cate = "Y" and v_cate <> "" then
search_str6 = " AND b_cate = "&v_cate
End if
' *******************************************************
' ****************전체 레코드 수 뽑기********************
SQL_T = "select count("&pk_Field&") as "&pk_Field&" from "&is_tablename&" where b_noticechk = '' "
SQL_T = SQL_T & search_str & search_str2 & search_str3 & search_str4 & search_str5 & search_str6 ' 검색옵션
Set row = Dbcon.Execute (SQL_T)
recordcount = row(pk_Field)
v_totalpage = fix( (recordcount-1)/ v_pagesize)+1 '전체덩어리갯수
If v_page = "" then
v_page = 1
ElseIf v_page < 1 then
v_page = 1
ElseIf Int(v_page) > v_totalpage then
v_page = v_totalpage
End If
'//*******************************************************
strSQL = "select Top " & v_pagesize & " " & R_Fields & " from " & is_tablename & " where b_noticechk = ''"
strSQL = strSQL & search_str & search_str2 & search_str3 & search_str4 & search_str5 & search_str6 '검색옵션
strSQL = strSQL & " and " & pk_Field & " not in"
strSQL = strSQL & "(select top " & ( v_pagesize * (v_page - 1) ) & " " & pk_Field & " from " & is_tablename & " where b_noticechk = '' " & search_str & search_str2 & search_str3 & search_str4 & search_str5 & search_str6
strSQL = strSQL & " " & orderby_str & ")" & orderby_str
'response.write strSQL
'response.end
Set rs = dbcon.execute( strSQL )
If rs.bof Or rs.eof Then
list_data = null
Else
list_data = rs.getrows
End if
Set rs = nothing
%>
<!--#include virtual="/content/board/top.asp"-->
<!-- 리스트 -->
<div id="board" style="width:<%=a_width%>;">
<%If is_ad_cms = "Y" then%>
<form id= "frm_list" action="" method='post'>
<div>
<input type="hidden" name="status" />
<input type="hidden" name="a_num" value="<%=a_num%>" />
<input type="hidden" id="chk_all" name="chk_all" /><!-- 전체체크 사용하려구.. -->
</div>
<%End if%>
<div class="board_total">
<div class="board_total_left">
<%If a_ad_cms = "Y" then%>
<%If SESSION("ss_m_id") = "" then%>
<a href="manager.asp?a_num=<%=a_num%>"><img src="/content/board/nninc_simple/img/key.gif" alt="" /></a>
<%else%>
<a href="logout.asp?a_num=<%=a_num%>"><img src="/content/board/nninc_simple/img/unkey.gif" alt="" /></a>
<%End if%>
전체 <strong><%=recordcount%></strong>개 (페이지 <strong class="board_orange"><%=v_page%></strong>/<%=v_totalpage%>)
<%else%>
<img src="/content/board/nninc_simple/img/total_ic.gif" alt="" /> 전체 <strong><%=recordcount%></strong>개 (페이지 <strong class="board_orange"><%=v_page%></strong>/<%=v_totalpage%>)
<%End if%>
</div>
<div class="board_total_right">
<!--#include virtual="/content/board/code.asp"-->
</div>
</div>
<%colCnt=1%>
<!-- 리스트 테이블 -->
<div class="table_blist" id="faq_area">
<table cellspacing="0" >
<caption><%=replace(tit_name, " | ", "")%></caption>
<colgroup>
<%If is_ad_cms = "Y" then ' 관리권한이 있을때만 보인다%>
<col width="60" />
<%
colCnt = colCnt + 1
End if%>
<col width="" />
<%If is_write = "Y" or is_delete = "Y" then ' 수정/삭제권한%>
<col width="100" />
<%colCnt = colCnt + 1
End if%>
</colgroup>
<thead>
<tr>
<th class="disnone" colspan="<%=colCnt%>">자주하는 질문</th>
</tr>
</thead>
<tbody>
<!-- 공지기능 -->
<%
R_Fields_no = "b_num, b_type, b_id, b_name, b_pwd, b_subject, b_email, b_jumin, b_phone1, b_phone2, b_phone3, b_cate, b_catename, b_noticechk, b_content, b_ip, b_count, b_look, b_open, b_ref, b_step, b_level, b_regdate, b_chuchun, b_sbjclr, b_sdate, b_edate, b_temp1, b_temp2, b_temp3, b_temp4, b_file1, b_file2, b_file3, b_file4, b_file5,b_c_count" '//레코드필드
'sql = "SELECT " & R_Fields_no & " FROM " & a_tablename & " WHERE b_noticechk='Y' ORDER BY b_num DESC"
sql = "SELECT " & R_Fields_no & " FROM " & a_tablename & " WHERE b_noticechk='Y'"
'//분류기능 사용시..
if a_cate = "Y" and v_cate <> "" then
sql = sql & " AND b_cate = " & v_cate
End if
sql = sql & " ORDER BY b_regdate DESC"
Set col = dbcon.execute( sql )
If col.bof Or col.eof Then
notice_data = Null
notice_chk = false
Else
notice_data = col.getrows
notice_chk = true
End if
Set col = Nothing
If Not( IsNull( notice_data ) ) then
For i = 0 To UBound(notice_data , 2)
Call arr2Value(R_Fields_no, "notice_data", i)
'//댓글사용시
If a_command = "Y" then
if no_b_c_count <> "0" then
a_command_str = "(" & no_b_c_count & ")"
Else
a_command_str = ""
End if
Else
a_command_str = ""
End if
%>
<tr>
<%If is_ad_cms = "Y" then ' 관리권한이 있을때만 보인다%>
<td class="notice"><input type="checkbox" name="chk[]" value="<%=b_num%>" title="해당 게시글 선택" /></td>
<%End if%>
<td id="question_title<%=b_num%>" class="notice title_notice">
<%
If b_cate <> "" then
response.write "<span class='category_color'>"&b_cate_str(b_cate)&"</span>"
End if
%>
<a href="#<%=b_num%>" onclick="showAnswer(<%=b_num%>);" title="<%=b_subject%>"><%=b_subject%></a>
<span class="reply_count"><%=a_command_str%></span>
<%=get_newimg2(left( b_regdate, 10), a_new)%>
</td>
<%If is_write = "Y" or is_delete = "Y" then ' 수정/삭제권한%>
<td>
<%If is_write = "Y" then%>
<span><a href="write.asp?a_num=<%=a_num%>&amp;b_num=<%=b_num%>&amp;<%=page_info%>"><img src="/content/board/nninc_faq/img/modify_bt2.gif" width="43" height="18" alt="수정" /></a></span>
<%End if%>
<%If is_delete = "Y" then%>
<span><a href="javascript:d_chk('delete_ok.asp?a_num=<%=a_num%>&amp;b_num=<%=b_num%>&amp;<%=page_info%>');"><img src="/content/board/nninc_faq/img/delete_bt2.gif" width="43" height="18" alt="삭제" /></a></span>
<%End if%>
</td>
<%End if%>
</tr>
<tr id="answer<%=b_num%>" style="display:none;">
<%If is_ad_cms = "Y" then %>
<td class="content2">&nbsp;</td>
<%End if%>
<td class="content_notice">
<%=b_content%>
<%If a_upload = "Y" and ( b_file1 <> "" or b_file2 <> "" or b_file3 <> "" or b_file4 <> "" or b_file5 <> "" ) Then ' 첨부파일 사용일때{%>
<dl class="info">
<dd>
<%
For z=1 To 5
b_file_name = eval("b_file"&z)
If b_file_name <> "" then' 파일이 있으면..
strDir = server.mappath("/data/board/") & "\" & a_tablename & "\"
%>
<img src="/content/board/nninc_faq/img/icon_file.gif" alt="<%=b_file_name%>" width="13" height="11" /><a href="down.asp?a_tablename=<%=a_tablename%>&amp;filename=<%=b_file_name%>"><%=b_file_name%></a> <span class="size">(<%=Folderfilesize(strDir& b_file_name)%> byte)</span>
&nbsp;
<%
End If
next
%>
</dd>
</dl>
<%End if%>
</td>
<%If is_write = "Y" or is_delete = "Y" Then ' 수정/삭제권한%>
<td class="content2">&nbsp;</td>
<%End if%>
</tr>
<%
next
End if
%>
<!-- ' 공지기능 -->
<%
If IsNull( list_data ) then '//------ 내용이 있으면 리스트 출력
If Not notice_chk then
%>
<tr>
<td class="center" colspan="<%=colCnt%>">등록된 내용이 없습니다.</td>
</tr>
<%
End if
Else
If v_page = 1 then
num = recordcount
else
num = recordcount - ((v_page -1) * v_pagesize)
End if
For i = 0 To UBound(list_data, 2)
'//필드갯수만큼 ($Query_Fields).가지고온다..
Call arr2Value(R_Fields, "list_data", i)
' 첨부파일표시
If a_upload = "Y" and a_lt_e = "Y" then
If b_file1 <> "" Or b_file2 <> "" Or b_file3 <> "" Or b_file4 <> "" Or b_file5 <> "" then
file_str = "<img src='/content/board/nninc_faq/img/icon_file.gif' alt='첨부파일' />"
else
file_str = ""
End if
End if
' 답변표시
If b_type = "R" then
b_type_str = "" ' 초기화
For xx=1 To b_level
If xx <> 1 Then
b_type_str = b_type_str&"&nbsp;&nbsp;&nbsp;"
End If
Next
b_type_str = b_type_str&"<img src='/content/board/nninc_faq/img/reply_ic.gif' width='40' height='16' alt='' />"
else
b_type_str = ""
End if
' 공개/비공개
If a_type = "Y" then' 사용하면
If b_open = "N" then' 비공개이면
b_open_str = "<img src='/content/board/nninc_faq/img/icon_key.gif' width='17' height='12' alt='비밀글' />"
else
b_open_str = ""
End if
else
b_open_str = ""
End if
%>
<tr id="question<%=b_num%>" >
<%If is_ad_cms = "Y" then ' 관리권한이 있을때만 보인다%>
<td><input type="checkbox" name="chk" value="<%=b_num%>" title="해당 게시글 선택" /></td>
<%End if%>
<td id="question_title<%=b_num%>" class="title">
<%=b_type_str%>
<%If b_type="N" Then response.write "<span class='category_color'>"&b_cate_str(b_cate)&"</span>"%>
<a href="#<%=b_num%>" onclick="showAnswer(<%=b_num%>);" onkeypress="showAnswer(<%=b_num%>);"><%=b_subject%></a>
<span class="reply_count"><%=a_command_str%></span><%=get_newimg2(left(b_regdate,10), a_new)%>
<%=b_open_str%>
</td>
<%If is_write = "Y" or is_delete = "Y" then ' 수정/삭제권한%>
<td>
<%If is_write = "Y" then%>
<span><a href="write.asp?a_num=<%=a_num%>&amp;b_num=<%=b_num%>&amp;<%=page_info%>" title="수정"><img src="/content/board/nninc_faq/img/modify_bt2.gif" width="43" height="18" alt="수정" /></a></span>
<%End if%>
<%If is_delete = "Y" then%>
<span><a href="javascript:d_chk('delete_ok.asp?a_num=<%=a_num%>&amp;b_num=<%=b_num%>&amp;<%=page_info%>');" title="삭제"><img src="/content/board/nninc_faq/img/delete_bt2.gif" width="43" height="18" alt="삭제" /></a></span>
<%End if%>
</td>
<%End if%>
</tr>
<tr id="answer<%=b_num%>" >
<%If is_write = "Y" or is_delete = "Y" then' 수정/삭제권한%>
<td class="content2">&nbsp;</td>
<%End if%>
<td class="content">
<%=b_content%>
<%If a_upload = "Y" and (b_file1 <> "" or b_file2 <> "" or b_file3 <> "" or b_file4 <> "" or b_file5 <> "" ) then ' 첨부파일 사용일때{%>
<dl class="info">
<dd>
<%
For z=1 To 5
b_file_name = eval("b_file"&z)
If b_file_name <> "" then' 파일이 있으면..
strDir = server.mappath("/data/board/") & "\" & a_tablename & "\"
%>
<img src="/content/board/nninc_faq/img/icon_file.gif" alt="<%=b_file_name%>" width="13" height="11" /><a href="down.asp?a_tablename=<%=a_tablename%>&amp;filename=<%=b_file_name%>"><%=b_file_name%></a> <span class="size">(<%=Folderfilesize(strDir& b_file_name)%> byte)</span>
&nbsp;
<%
End if
next
%>
</dd>
</dl>
<%End if%>
</td>
<%If is_write = "Y" or is_delete = "Y" then ' 수정/삭제권한%>
<td class="content2">&nbsp;</td>
<%End if%>
</tr>
<%
num = num - 1
next
End If
%>
</tbody>
</table>
</div>
<!-- ' 리스트 테이블 -->
<%If is_ad_cms = "Y" then%>
</form>
<% End if %>
<!-- 버튼 -->
<div class="board_button">
<%If is_ad_cms = "Y" then ' 관리권한이 있을때만 보인다%>
<div class="fl">
<ul>
<li class="pl"><img src="/manager/img/line01.gif" width="36" height="21" alt="" /></li>
<li class="pt"><div class="board_bt01"><a href="javascript:checkAll();" ><span>전체 선택/해제</span></a></div><div class="board_bt01"><a href="javascript:delete2();" ><span>선택 게시글삭제</span></a></div><div class="board_bt01"><a href="javascript:bmove();" ><span>선택 게시글이동</span></a></div></li>
</ul>
</div>
<%End if%>
<div class="fr">
<span class="bt"><a href="list.asp?a_num=<%=a_num%>"><img src="/content/board/nninc_faq/img/list_bt.gif" width="62" height="23" alt="목록" /></a></span>
<%If is_write = "Y" then%>
<span class="bt"><a href="write.asp?a_num=<%=a_num%>"><img src="/content/board/nninc_faq/img/write_bt.gif" width="62" height="23" alt="쓰기" /></a></span>
<%End if%>
</div>
</div>
<!-- ' 버튼 -->
<!-- 페이징 -->
<div class="board_paginate">
<%page2("list.asp?a_num=" & a_num)%>
</div>
<!-- ' 페이징 -->
<!-- 게시물 검색 -->
<div class="board_search">
<form id="frm_sch" action="list.asp?a_num=<%=a_num%>" method="post">
<fieldset>
<legend>게시물 검색</legend>
<ul>
<li class="board_search_start"></li>
<li><img src="/content/board/nninc_faq/img/search_ic.gif" width="21" height="25" alt="" /></li>
<li>
<select id="p_search" name="p_search" title="검색형태 선택" >
<option value="b_subject" <%if v_search = "b_subject" Then response.write "selected='selected'" %>>제목</option>
<option value="b_content" <%if v_search = "b_content" Then response.write "selected='selected'" %>>내용</option>
</select>
</li>
<li><input type="text" size="25" title="검색어를 입력하세요" id="p_keyword" name="p_keyword" class="board_input" value="<%=v_keyword%>" /></li>
<li><input type="image" src="/content/board/nninc_faq/img/search_bt.gif" id="search_bt" name="search_bt" class="search_bt" alt="검색" /></li>
<li class="board_search_end"></li>
</ul>
</fieldset>
</form>
</div>
<!-- ' 게시물 검색 -->
</div>
<!-- ' 리스트 -->
<script type="text/javascript">
<!--
showAnswer2();
' -->
</script>
<!--#include virtual="/content/board/bottom.asp"-->