% IDX = Request("IDX") search_category = Request("search_category") searchstring = Request("searchstring") B_CATEGORY = Request("b_category") write_mode = Request("write_mode") B_PWD = Request("bdpw") If write_mode = "" Then write_mode = "add" DIM ARRFILENAME(9), LINK(2) Select Case write_mode Case "add" If Session("user_id") <> "" And Session("login_site") = "uni" Then sql = "" sql = sql & " Select " sql = sql & " user_id, user_name " sql = sql & " ,user_mobile1,user_mobile2,user_mobile3 " sql = sql & " ,user_email,user_email_flag,user_post1,user_post2 " sql = sql & " From TBL_MEMBER" sql = sql & " Where user_id = '" & session("user_id") & "'" Set rs = DbCon.execute(sql) If Not(rs.bof Or rs.eof) Then user_id = rs("user_id") user_name = rs("user_name") user_tel1 = rs("user_mobile1") user_tel2 = rs("user_mobile2") user_tel3 = rs("user_mobile3") res_user_email = rs("user_email") If Trim(res_user_email&"")<>"" Then user_email1 = Left(res_user_email, InStr(res_user_email,"@")-1) user_email2 = Mid(res_user_email, InStr(res_user_email,"@")+1, Len(res_user_email)) End If Else ' // °´Ã¼ ¿¬°á ²÷±â Call SubObjClose(rs) : Call SubObjClose(DbCon) Call MoveJavaAlert("Á¤º¸°¡ Á¤È®ÇÏÁö ¾Ê½À´Ï´Ù.", "/") Response.End End IF ' // °´Ã¼ ¿¬°á ²÷±â Call SubObjClose(rs) : Call SubObjClose(DbCon) Else user_id = Session("user_id") user_name = Session("user_name") End If Case "edit" SQL = "SELECT * FROM tbl_order WHERE IDX = "&IDX SET RS = DBCON.EXECUTE(SQL) idx = RS("idx") user_id = RS("user_id") user_name = RS("user_name") user_age = RS("user_age") user_sex = RS("user_sex") user_tel = RS("user_tel") user_tel = Split(user_tel,"-") user_tel1 = user_tel(0) user_tel2 = user_tel(1) user_tel3 = user_tel(2) user_email = RS("user_email") user_email = Split(user_email,"@") user_email1 = user_email(0) user_email2 = user_email(1) user_pass = RS("user_pass") If admin_pass = B_PWD Then admin_type = 1 Else If user_pass <> B_PWD AND Trim(Session("id")&"")="" Then RESPONSE.WRITE ExecJavaAlert("ºñ¹Ð¹øÈ£°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù.",0) RESPONSE.END End If End If bbs_type_u = RS("bbs_type_u") reple_type1 = RS("reple_type1") reple_type2 = RS("reple_type2") reple_type3 = RS("reple_type3") reple_type4 = RS("reple_type4") user_year = RS("user_year") user_month = RS("user_month") user_day = RS("user_day") user_week = RS("user_week") branchCode = RS("branchCode") b_subject = RS("b_subject") b_content = RS("b_content") b_file0 = RS("b_file0") b_file1 = RS("b_file1") b_content_re = RS("b_content_re") b_writedate = RS("b_writedate") b_re_writedate = RS("b_re_writedate") select_type = RS("select_type") RS.CLOSE : SET RS = Nothing End Select If user_sex = "" Then user_sex = "1" If bbs_type_u = "" Then bbs_type_u = "1" If reple_type1 = "" Then reple_type1 = "1" If reple_type2 = "" Then reple_type2 = "1" If reple_type3 = "" Then reple_type3 = "1" If reple_type4 = "" Then reple_type4 = "1" If branchCode = "" Then branchCode = "U001" If select_type = "" Then select_type = "1" If user_year = "" Then user_year = Year(now) If user_month = "" Then user_month = month(now)-1 Else user_month = user_month - 1 End If If user_day = "" Then user_day = day(now) %>