%
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"
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
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_keyword"
' 첨부파일
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
prepage = Request.ServerVariables("path_info") & "?" & Request.ServerVariables("query_string")
%>