|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* file: delete.wel¢Ò 4 : ¢Ò 5 : °Ô½ÃÆÇ »èÁ¦ ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò 6 : ¢Ò 7 : Copyright (c) 2001/03/25 by Wesoft¢Ò 8 : All Rights Reserved.¢Ò 9 : */¢Ò 10 : ¢Ò 11 : htmlquery("GET");¢Ò 12 : htmlquery("POST");¢Ò 13 : break_on= 0;¢Ò 14 : if(include("include/board.inc")!=OK) return;¢Ò 15 : if(read_only==1)¢Ò 16 : {¢Ò 17 : MSG1= "°ü¸®ÀÚ Àü¿ë " ~ prg_title;¢Ò 18 : if(board_name=="") board_name= "ÀÌ " ~ prg_title;¢Ò 19 : MSG2= "<font color=#0000c0>" ~ board_name ~ "</font>¿¡¼´Â "¢Ò 20 : ~ "°ü¸®ÀÚ¸¸ ¾²±â/¼öÁ¤/»èÁ¦¸¦ ÇÒ ¼ö ÀÖ½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò 21 : formdump(message_form);¢Ò 22 : return disconnect();¢Ò 23 : }¢Ò 24 : no= val(no);¢Ò 25 : if(no<1)¢Ò 26 : {¢Ò 27 : MSG1= "ÀÚ·á¹øÈ£ ¿À·ù";¢Ò 28 : MSG2= "ÀÚ·á ¹øÈ£°¡ ¾ø°Å³ª À߸øµÇ¾ú½À´Ï´Ù." ~ BACK_BUTTON;¢Ò 29 : formdump(message_form);¢Ò 30 : return disconnect();¢Ò 31 : }¢Ò 32 : qstr= "select grpno,answer,attfile,fileseq,postpass,wname from " ~ mytable¢Ò 33 : ~ " where selno=" ~ no;¢Ò 34 : if( (rt=mysql_getrecord(qstr,"")) < 1 )¢Ò 35 : {¢Ò 36 : if(rt==0)¢Ò 37 : {¢Ò 38 : MSG1= "ÀÚ·á°¡ ¾ø½À´Ï´Ù!";¢Ò 39 : MSG2= no ~ "¹øÀÇ °Ô½Ã¹°ÀÌ ÀÌ¹Ì »èÁ¦µÇ¾ú°Å³ª ¾ø½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò 40 : formdump(message_form);¢Ò 41 : }¢Ò 42 : return disconnect();¢Ò 43 : }¢Ò 44 : answer_len= len(answer);¢Ò 45 : cond= "grpno=" ~ grpno ~ " and substring(answer,1," ~ answer_len ~ ")='"¢Ò 46 : ~ answer ~ "' and length(answer)> " ~ answer_len;¢Ò 47 : answer_cnt= get_recount(mytable, cond);¢Ò 48 : if(answer_cnt>0)¢Ò 49 : {¢Ò 50 : MSG1= "´äº¯±ÛÀÌ ÀÖ½À´Ï´Ù!";¢Ò 51 : MSG2= "µî·Ï¹øÈ£ " ~ no ~ "¹øÀÇ °Ô½Ã¹°Àº ´äº¯±ÛÀÌ ÀÖ¾î »èÁ¦ÇÒ ¼ö ¾ø½À´Ï´Ù!"¢Ò 52 : ~ BACK_BUTTON;¢Ò 53 : formdump(message_form);¢Ò 54 : return disconnect();¢Ò 55 : }¢Ò 56 : if(postpass=="") depass= board_admin_depass;¢Ò 57 : else depass= decode(postpass,"",decode_variable);¢Ò 58 : if(us_class!="A" && pass!=depass && pass!=board_admin_depass)¢Ò 59 : {¢Ò 60 : if(authflag==1) MSG= "<font color=#f00000>¾ÏÈ£°¡ Ʋ¸³´Ï´Ù. ´Ù½Ã ÀÔ·ÂÇϼ¼¿ä!</font>";¢Ò 61 : else¢Ò 62 : {¢Ò 63 : if(postpass!="") MSG= "°Ô½Ã¹°ÀÇ ¼öÁ¤ / »èÁ¦ ¾ÏÈ£ ¶Ç´Â";¢Ò 64 : else MSG= "°Ô½Ã¹°ÀÌ ¾ÏÈ£ ¾øÀÌ ÀÛ¼ºµÇ¾ú½À´Ï´Ù.";¢Ò 65 : MSG~= " °ü¸®ÀÚ ¾ÏÈ£¸¦ ÀÔ·ÂÇϼ¼¿ä!";¢Ò 66 : }¢Ò 67 : focus= "pass", action= "delete.wel";¢Ò 68 : back= "goview()", check= "Check2()", btname= "»èÁ¦Çϱâ";¢Ò 69 : idinput= "", title= "°Ô½Ã¹° ¼öÁ¤ / »èÁ¦ ¾ÏÈ£ È®ÀÎ";¢Ò 70 : fm= formdump(skin~"auth.fom");¢Ò 71 : if(fm==FORM_OPENERR) return err_form("auth.fom");¢Ò 72 : return disconnect();¢Ò 73 : }¢Ò 74 : if(attfile!="")¢Ò 75 : {¢Ò 76 : if(fileseq>0) attfile= fileseq ~ "-" ~ attfile; // ÀúÀåµÈ ½ÇÁ¦ ÆÄÀϸí¢Ò 77 : unlink("upload/"~db~"/" ~ attfile); // ¾÷·Îµå ÆÄÀÏ»èÁ¦¢Ò 78 : }¢Ò 79 : qstr= "delete from " ~ mytable ~ " where selno=" ~ no;¢Ò 80 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò 81 : url= strform("board.wel?db={$db}&pg={$pg}&bp={$bp}&sk={$sk}&k={$k}&cn={$cn}&cs={$cs}&cc={$cc}");¢Ò 82 : replace_location(url);¢Ò 83 : return disconnect();¢Ò |
||||
|