|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* file: admzap.wel¢Ò 4 : ¢Ò 5 : ÁÖ¼Ò·Ï »ç¿ëÀÚ »èÁ¦ ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò 6 : ¢Ò 7 : Copyright (c) 2001/02/22 by Wesoft¢Ò 8 : All Rights Reserved.¢Ò 9 : */¢Ò 10 : ¢Ò 11 : htmlquery("GET");¢Ò 12 : include("common.inc");¢Ò 13 : if(mysql_connection()==MYSQL_ERR) return;¢Ò 14 : login= 0, admin= 1; // ·Î±ä »óÅ°¡ ¾Æ´Ï¸ç °ü¸®ÀÚ ¸Þ´º »ç¿ë°¡´É¢Ò 15 : if(include("chkuser.sub")!=OK) return disconnect();¢Ò 16 : ¢Ò 17 : no= val(no);¢Ò 18 : if(no<1)¢Ò 19 : {¢Ò 20 : MSG1= "ÀÚ·á¹øÈ£ ¿À·ù";¢Ò 21 : MSG2= "ÀÚ·á ¹øÈ£°¡ ¾ø°Å³ª À߸øµÇ¾ú½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò 22 : formdump(message_form);¢Ò 23 : return disconnect();¢Ò 24 : }¢Ò 25 : ¢Ò 26 : qstr= "select id from " ~ myustable ~ " where selno=" ~ no;¢Ò 27 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò 28 : myresult= mysql_store_result(mysql);¢Ò 29 : if(myresult==MYSQL_ERR) return err_store_result();¢Ò 30 : ¢Ò 31 : recnt= mysql_num_rows(myresult);¢Ò 32 : if(recnt>0) row= mysql_fetch_row(myresult);¢Ò 33 : if(recnt<1 || row==MYSQL_ERR)¢Ò 34 : {¢Ò 35 : MSG1= "[" ~ recnt ~ "] ÀÚ·á°¡ ¾ø½À´Ï´Ù!";¢Ò 36 : MSG2= "¹øÈ£" ~ no ~ "ÀÇ ÀÚ·á°¡ ¾ø½À´Ï´Ù!";¢Ò 37 : formdump(message_form);¢Ò 38 : return disconnect();¢Ò 39 : }¢Ò 40 : mysql_free_result(myresult);¢Ò 41 : qstr= "drop table " ~ preTBname ~ row[0];¢Ò 42 : mysql_query(mysql, qstr);¢Ò 43 : qstr= "delete from " ~ myustable ~ " where selno=" ~ no;¢Ò 44 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò 45 : url= strform("admin.wel?list={$list}&k={$k}",¢Ò 46 : "&ps={$ps}&pw={$pw}&pS={$pS}&pN={$pN}&pl={$pl}&pr={$pr}");¢Ò 47 : replace_location(url);¢Ò 48 : return disconnect();¢Ò |
||||
|