<% If b_num = "" then '//일반등록 w_mode = "W" If b_type = "" then b_type = "N" '//값이 있으면 답변타입이다.. If b_type = "N" then b_content = a_writecontent ' If a_close="Y" Then ' b_open = "N" ' else b_open = "Y" ' End if b_noticechk = "N" elseIf b_num <> "" And b_type = "R" then '//답변글쓰기 일때 w_mode = "WR" '//레코드필드 R_Fields = "b_num, b_subject, b_content, b_ref, b_step, b_level, b_open" R_tablename_str = a_tablename R_WHERE_str = " WHERE b_num=" & b_num Call SelectQuery ( R_Fields, R_tablename_str, R_WHERE_str ) b_subject = "RE:" & b_subject If a_edit = "Y" then b_content = "



------------------ 원문 -------------------------

" & b_content Else b_content = vbcrlf & vbcrlf & vbcrlf & vbcrlf & "------------------ 원문 -------------------------" & vbcrlf & vbcrlf & b_content End if b_open = b_open ElseIf b_num <> "" then '//그냥 수정일때.. w_mode = "M" If is_ad_cms <> "Y" then '//관리자가아닐때 체크 If SESSION("pwd_chk_" & a_num & "_" & b_num) <> "ok" then '//체크통과했으면.. Call locationhref("pwd.asp?prepage=modi&a_num=" & a_num & "&b_num=" & b_num & "&" & page_info) End if End if '//레코드필드 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_temp5, b_temp6, b_temp7, b_keyword, b_zip1, b_zip2, b_addr1, b_addr2" ' 첨부파일 If Not IsNumeric(a_upload_len) Then a_upload_len = 5 For u=1 To a_upload_len R_Fields = R_Fields & ", b_file"&u '' b_file1, b_file2, b_file3, ‥‥ Next R_tablename_str = a_tablename R_WHERE_str = " WHERE b_num=" & b_num Call SelectQuery (R_Fields, R_tablename_str, R_WHERE_str) End if %>
&proc_mode=write_ok" enctype="multipart/form-data">
<%If a_type = "N" Or a_type="T" then '//공개여부%> <%End if%> <%If is_ad_cms = "Y" then '//관리자일때 비밀번호 자동으로%> <%End if%>
* 표시가 된 곳은 필수 항목입니다.
<%If is_ad_cms <> "Y" then '//관리자일때 비밀번호 자동으로%> <%End if%> <%If a_type = "Y" then '//공개/비공개%> <%End if%> <%If a_phone = "Y" then '//전화번호%> <%End if%> <%If a_email = "Y" then '//이메일%> <%End if%> <%If is_ad_cms = "Y" And b_type <> "R" then '//공지여부%> <%End if%> <%If a_cate = "Y" and b_type <> "R" then '//분류%> <%End if%> <%If a_home = "Y" then '//주소사용시%> <%End if%> <% '//사용자필드 for z=1 To 4 a_ftemp = eval("a_ftemp" & z ) a_ftemp_str = eval("a_ftemp" & z & "_str") b_temp = eval("b_temp" & z ) If a_ftemp = "Y" then %> <% End if next %> <% If a_upload = "Y" then '//첨부파일 사용일때 for z=1 to a_upload_len b_file_name = eval("b_file" & z) If z = 1 then '//$link_url = "파일추가하기"; '//$is_tr_css = ""; else '//$link_url = "파일빼기"; '//$is_tr_css = "id='filediv$z' style='display:none'"; End if %> > <% next End if %>
<%=replace( tit_name, " | ", "")%>
글쓰기
/> * 한글만 사용하실 수 있습니다.
* 10자 이내의 영문/숫자만 사용하실 수 있습니다.
공개여부 /> />
- -
* @포함한 이메일주소를 입력하세요.
공지여부 /> />
-

: 예)내당동, 수성구
↓ 기본 주소 - 동이름 검색 결과 목록입니다. 목록중 한개를 선택하세요.
<%If a_edit = "Y" then '//에디터가 사용일때 '//$_SESSION["fck_filepath"] = "/userfiles/"; //첨부파일경로 '//$_SESSION["fck_filepath"] = "/data/popup/"; //첨부파일경로 session("fck_filepath") = "/data/board/"& a_tablename & "/" '업로드 경로(동적경로를 위해 세션사용) 'response.write session("fck_filepath") Set oFCKeditor = New FCKeditor oFCKeditor.BasePath = "/fckeditor/" oFCKeditor.value = b_content oFCKeditor.ToolbarSet = "Basic" oFCKeditor.Create "b_content" Else %> <%End if%>
<%=link_url%> <%If b_file_name <> "" then%>
<%=b_file_name%>  <%End if%>
" >목록
<%If a_home = "Y" then '//주소사용시%>
<%End if%>