File name: addrbook/modify.wel (1,634 bytes) Text file viewer v1.2
    1 : #!/bin/wel¢Ò
    2 : ¢Ò
    3 : /* file: modify.wel¢Ò
    4 : ¢Ò
    5 :    ÁÖ¼Ò·Ï ÀÚ·á ¼öÁ¤ ÇÁ·Î±×·¥ (author: ¼­±¤Çö)¢Ò
    6 : ¢Ò
    7 :    Copyright (c) 2001/02/22 by Wesoft¢Ò
    8 :    All Rights Reserved.¢Ò
    9 : */¢Ò
   10 : ¢Ò
   11 : htmlquery("GET");¢Ò
   12 : htmlquery("POST");¢Ò
   13 : include("common.inc");¢Ò
   14 : if(mysql_connection()==MYSQL_ERR) return;¢Ò
   15 : login= admin= 0; // ·Î±ä »óÅ°¡ ¾Æ´Ï¸ç °ü¸®ÀÚ ¸Þ´º »ç¿ëºÒ´É¢Ò
   16 : if(include("chkuser.sub")!=OK) return disconnect();¢Ò
   17 : ¢Ò
   18 : if(openpassmatch==0)¢Ò
   19 :  {¢Ò
   20 :     MSG1= "°³¹æÇü ÁÖ¼Ò·Ï Àбâ Àü¿ë »óÅÂ";¢Ò
   21 :     MSG2= "ÁÖ¼Ò·ÏÀ» °³¹æÇüÀ¸·Î ÇßÀ» °æ¿ì ID¿Í ¾ÏÈ£°¡ ÀÏÄ¡Çؾ߸¸"¢Ò
   22 :         ~ " ½Å±Ôµî·Ï/¼öÁ¤/»èÁ¦°¡ °¡´ÉÇϸç<br>¾ÏÈ£°¡ ÀÏÄ¡ÇÏÁö ¾ÊÀ¸¸é"¢Ò
   23 :         ~ " ÁÖ¼Ò·ÏÀ» Á¶È¸¸¸ ÇÒ ¼ö ÀÖ½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò
   24 :     formdump(message_form);¢Ò
   25 :     return disconnect();¢Ò
   26 :  }¢Ò
   27 : if(writeflag!=1) { include("modify.sub"); return; }¢Ò
   28 : ¢Ò
   29 : include("editdata.sub");¢Ò
   30 : mdtime= date(1) ~ " " ~ time(1);¢Ò
   31 : mip= getenv("REMOTE_ADDR");¢Ò
   32 : qstr= "update " ~ mytable¢Ò
   33 :     ~ strform(" set mdtime='{$mdtime}',mip='{$mip}',birth='{$birth}',",¢Ò
   34 :               "name='{$name}',hdphone='{$hdphone}',hphone='{$hphone}',",¢Ò
   35 :               "hfax='{$hfax}',homepage='{$homepage}',email='{$email}',",¢Ò
   36 :               "hzipcode='{$hzipcode}',haddr1='{$haddr1}',haddr2='{$haddr2}',",¢Ò
   37 :               "office='{$office}',buseo='{$buseo}',position='{$position}',",¢Ò
   38 :               "ophone='{$ophone}',ofax='{$ofax}',ozipcode='{$ozipcode}',",¢Ò
   39 :               "oaddr1='{$oaddr1}',oaddr2='{$oaddr2}',memo='{$memo}'",¢Ò
   40 :               " where selno={$no}");¢Ò
   41 : ¢Ò
   42 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò
   43 : url= strform("view.wel?no={$no}&list={$list}&k={$k}&n={$n}&o={$o}",¢Ò
   44 :              "&pi={$pi}&pw={$pw}&pm={$pm}&ps={$ps}&pd={$pd}");¢Ò
   45 : replace_location(url);¢Ò
   46 : return disconnect();¢Ò
File name: addrbook/modify.wel (1,634 bytes) Wesoft Corp. ¨Ï 2001 All rights reserved.