File name: addrbook/delmark.wel (1,182 bytes) Text file viewer v1.2
    1 : #!/bin/wel¢Ò
    2 : ¢Ò
    3 : /* file: delmark.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= admin= 0; // ·Î±ä »óÅ°¡ ¾Æ´Ï¸ç °ü¸®ÀÚ ¸Þ´º »ç¿ëºÒ´É¢Ò
   15 : if(include("chkuser.sub")!=OK) return disconnect();¢Ò
   16 : ¢Ò
   17 : if(openpassmatch==0)¢Ò
   18 :  {¢Ò
   19 :     MSG1= "°³¹æÇü ÁÖ¼Ò·Ï Àбâ Àü¿ë »óÅÂ";¢Ò
   20 :     MSG2= "ÁÖ¼Ò·ÏÀ» °³¹æÇüÀ¸·Î ÇßÀ» °æ¿ì ID¿Í ¾ÏÈ£°¡ ÀÏÄ¡Çؾ߸¸"¢Ò
   21 :         ~ " ½Å±Ôµî·Ï/¼öÁ¤/»èÁ¦°¡ °¡´ÉÇϸç<br>¾ÏÈ£°¡ ÀÏÄ¡ÇÏÁö ¾ÊÀ¸¸é"¢Ò
   22 :         ~ " ÁÖ¼Ò·ÏÀ» Á¶È¸¸¸ ÇÒ ¼ö ÀÖ½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò
   23 :     formdump(message_form);¢Ò
   24 :     return disconnect();¢Ò
   25 :  }¢Ò
   26 : no= val(no);¢Ò
   27 : if(no<1)¢Ò
   28 :  {¢Ò
   29 :     MSG1= "ÀÚ·á¹øÈ£ ¿À·ù";¢Ò
   30 :     MSG2= "ÀÚ·á ¹øÈ£°¡ ¾ø°Å³ª À߸øµÇ¾ú½À´Ï´Ù." ~ HELP_ADMIN;¢Ò
   31 :     formdump(message_form);¢Ò
   32 :     return disconnect();¢Ò
   33 :  }¢Ò
   34 : ¢Ò
   35 : if(del==1) dflag= "d"; else dfalg= "";¢Ò
   36 : qstr= "update " ~ mytable ~ " set delflag='" ~ dflag ~ "' where selno=" ~ no;¢Ò
   37 : ¢Ò
   38 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò
   39 : url= strform("addrbook.wel?list={$list}&k={$k}&n={$n}&o={$o}",¢Ò
   40 :              "&pi={$pi}&pw={$pw}&pm={$pm}&ps={$ps}&pd={$pd}");¢Ò
   41 : replace_location(url);¢Ò
   42 : return disconnect();¢Ò
File name: addrbook/delmark.wel (1,182 bytes) Wesoft Corp. ¨Ï 2001 All rights reserved.