<% if is_write <> "Y" Then Call Back_back("쓰기권한이 없습니다.") End If ' 파라미터정보 ************************************************************************************* m_num = InputValue(request("m_num")) '************************************************************************************************** If m_num = "" then '등록 b_l_sdate = getDateFm(now,4) b_l_edate = getDateFm(now,4) ' 자동가입방지 randomize autoimg_str = Int((5 * Rnd) + 1) '$autoimg_str = Int((5 * Rnd) + 1); '01.png = DF4PH3 '02.png = HS42YP '03.png = S8VP3X '04.png = N4CW2U '05.png = 9SK6GR '$autoimg_str = "1"; m_pwd_type = "password" reset_url = "write.asp" is_title_str = "신규 회원 생성" else '수정 '레코드필드 R_Fields = "m_num, m_id, m_pwd, m_name, m_nickname, m_jumin, m_zipcode, m_addr1, m_addr2, m_phone1, m_phone2, m_phone3, m_email, m_mobile1, m_mobile2, m_mobile3, m_fax1, m_fax2, m_fax3, m_homepage, m_date, m_modymate, m_lastdate, m_chuchun, m_ip, m_level, m_autoimg_str, m_temp1, m_temp2, m_temp3, m_sex, m_birth, m_sms, m_mailing, m_marry, m_marrydate, m_job, m_text, m_secede_date, m_secede_reason" R_Fields = R_Fields & ", bdm_idx" R_tablename_str = "member" R_WHERE_str = " WHERE m_num=" & m_num Call SelectQuery(R_Fields, R_tablename_str, R_WHERE_str) disabled_opt = "disabled ='disabled'" m_pwd_type = "text" reset_url = "list.asp?" & page_info is_title_str = "회원 정보 수정" If IsNull(m_birth) Then m_birth = "" If IsNull(m_marrydate) Then m_marrydate = "" arr_birth = Split(m_birth,"-") arr_marrydate = Split(m_marrydate,"-") ReDim preserve arr_birth(2), arr_marrydate(2) m_birth_Y = arr_birth(0) m_birth_M = arr_birth(1) m_birth_D = arr_birth(2) m_marrydate_Y = arr_marrydate(0) m_marrydate_M = arr_marrydate(1) m_marrydate_D = arr_marrydate(2) m_jumin1 = left(m_jumin,6) m_jumin2 = right(m_jumin,7) End if '레코드필드 R_Fields = "mc_idx, mc_addr, mc_nickname, mc_phone, mc_mobile, mc_email, mc_homepage, mc_joinlevel, mc_wdate, mc_jumin, mc_mailing, mc_sms, mc_sex, mc_birth, mc_fax, mc_marry, mc_marrydate, mc_job, mc_text, mc_nickname_req, mc_jumin_req, mc_sex_req, mc_birth_req, mc_phone_req, mc_fax_req, mc_mobile_req, mc_email_req, mc_addr_req, mc_homepage_req, mc_marry_req, mc_marrydate_req, mc_job_req, mc_text_req" R_tablename_str = "member_config" R_WHERE_str = " WHERE mc_idx=1" Call SelectQuery(R_Fields, R_tablename_str, R_WHERE_str) '최상위부서 조회 sql = "select bdm_idx, bdm_menuname from bd_menu_page where bdm_chk = 'Y' and bdm_ref=0 order by bdm_code" Set rs = dbcon.execute( sql ) If rs.bof Or rs.eof Then buseo_data1 = null Else buseo_data1 = rs.getrows End If Set rs = Nothing %>

<%=is_title_str%>

회원 기본정보 * 표시가 된 곳은 필수 항목입니다.

회원 기본정보 서식 작성 <%if m_num = "" then%> <%end if%> <%if mc_nickname= "Y" then %> <%end if%> <%if mc_jumin = "Y" then %> <%end if%> <%if mc_sex= "Y" then %> <%end if%> <%if mc_birth= "Y" then %> <%end if%> <%if mc_email= "Y" then %> <%end if%> <%if mc_mailing= "Y" then %> <%end if%> <%If mc_phone = "Y" then %> <%end if%> <%If mc_mobile = "Y" then %> <%end if%> <%if mc_sms= "Y" then %> <%end if%> <%If mc_fax = "Y" then %> <%end if%> <%If mc_addr = "Y" then %> <%end if%> <%if mc_marry= "Y" then %> <%end if%> <%if mc_marrydate= "Y" then %> <%end if%> <%if mc_homepage= "Y" then %> <%end if%> <%if mc_job= "Y" then %> <%end if%> <%if mc_text= "Y" then %> <%end if%> <%If m_num = "" then%> <%end if%>
기능정보 서식
/> * 한글만 사용하실 수 있습니다.
/> * 10자 이내의 영문/숫자만 사용하실 수 있습니다.
* 비밀번호를 한번 더 입력하세요.
* 10자이내의 한글만 사용하실 수 있습니다.
- * 숫자만 사용하실 수 있습니다.
<% If Not( isnull(buseo_data1) ) Then For i = 0 To ubound(buseo_data1, 2) p_bdm_idx = buseo_data1(0, i) p_bdm_menuname = buseo_data1(1, i) %> <% next End if %>
<%if mc_sex_req= "Y" then %>*<%end if%> 성별 checked="checked" <%end if%> /> checked="checked" <%end if%> />
년 월 일
* @포함한 이메일주소를 정확히 입력하세요.
* 메일링 서비스 checked="checked" <%end if%> /> checked="checked" <%end if%> />
- -
- -
* SMS 서비스 checked="checked" <%end if%>/> checked="checked" <%end if%> />
- -
-

: 예)내당동, 수성구
↓ 기본 주소 - 동이름 검색 결과 목록입니다. 목록중 한개를 선택하세요.
* 결혼여부 checked="checked" <%end if%> /> checked="checked" <%end if%> />
년 월 일
자동가입방지   * 왼쪽에 보이는 숫자 및 문자를 모두 입력하세요.