<% If SESSION("ss_m_id") ="" then Call loding("0", LOGIN_URL & "?prepage="&server.urlencode(request.ServerVariables("SCRIPT_NAME") & "?" & request.ServerVariables("QUERY_STRING"))) 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" Call SelectQuery(R_Fields, "member_config", "") '레코드필드 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, bdm_idx" R_tablename_str = "member" R_WHERE_str = " WHERE m_num=" &SESSION("ss_m_num") Call SelectQuery(R_Fields, R_tablename_str, R_WHERE_str) disabled_opt = "disabled ='disabled'" m_pwd_type = "text" 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) '최상위부서 조회 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 Randomize() auth_code_num = Int(Rnd * 10) %>

" /> " />

아이디	<%=m_id%>
비밀번호
비밀번호 확인
이름	<%=m_name%>
휴대전화	- - ※ 유선번호로 등록하시려면 (1544-9642 문자전송시스템 담당자)로 연락바랍니다.
부서	<% 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 %>