<% If b_num = "" then ' 일반등록 w_mode= "W" If b_type = "" Then b_type = "N" ' 값이 있으면 답변타입이다.. If b_type = "N" Then b_content = a_writecontent b_open = "Y" 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 b_content = "



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

"&b_content 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 ' 체크통과했으면.. 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_file1, b_file2, b_file3, b_file4, b_file5,b_keyword" 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" 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 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 is_ad_cms = "Y" then ' 공지여부%> <%End if%> <%If a_cate = "Y" and b_type <> "R" then '//분류%> <%End if%> <% 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%>
목록