1 : #!/bin/wel¢Ò
2 : ¢Ò
3 : /* file: admmemozap.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 : no= val(no);¢Ò
17 : if(no<1)¢Ò
18 : {¢Ò
19 : MSG1= "ÀÚ·á¹øÈ£ ¿À·ù";¢Ò
20 : MSG2= "ÀÚ·á ¹øÈ£°¡ ¾ø°Å³ª À߸øµÇ¾ú½À´Ï´Ù." ~ BACK_BUTTON;¢Ò
21 : formdump(message_form);¢Ò
22 : return disconnect();¢Ò
23 : }¢Ò
24 : qstr= "delete from " ~ memotable ~ " where selno=" ~ no;¢Ò
25 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò
26 : url= strform("admmemo.wel?list={$list}&k={$k}",¢Ò
27 : "&ps={$ps}&pw={$pw}&pS={$pS}&pN={$pN}&pl={$pl}&pr={$pr}");¢Ò
28 : replace_location(url);¢Ò
29 : return disconnect();¢Ò
|