%
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"
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
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 '//체크통과했으면..
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_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
prepage = Request.ServerVariables("path_info") & "?" & Request.ServerVariables("query_string")
%>