File name: addrbook/admview.wel (2,382 bytes) Text file viewer v1.2
    1 : #!/bin/wel¢Ò
    2 : ¢Ò
    3 : /* file: admview.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 * from " ~ myustable ~ " where selno=" ~ no;¢Ò
   27 : ¢Ò
   28 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò
   29 : ¢Ò
   30 : myresult= mysql_store_result(mysql);¢Ò
   31 : if(myresult==MYSQL_ERR) return err_store_result();¢Ò
   32 : ¢Ò
   33 : recnt= mysql_num_rows(myresult);¢Ò
   34 : if(recnt>0) row= mysql_fetch_row(myresult);¢Ò
   35 : if(recnt<1 || row==MYSQL_ERR)¢Ò
   36 :  {¢Ò
   37 :     MSG1= "[" ~ recnt ~ "] ÀÚ·á°¡ ¾ø½À´Ï´Ù!";¢Ò
   38 :     MSG2= "¹øÈ£" ~ no ~ "ÀÇ ÀÚ·á°¡ ¾ø½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò
   39 :     formdump(message_form);¢Ò
   40 :     return disconnect();¢Ò
   41 :  }¢Ò
   42 : mysql_free_result(myresult);¢Ò
   43 : ¢Ò
   44 : selno  = row[0];¢Ò
   45 : wdtime = insert_week(row[1]);¢Ò
   46 : sdtime = insert_week(row[2]);¢Ò
   47 : ldtime = insert_week(row[3]);¢Ò
   48 : lldtime= insert_week(row[4]);¢Ò
   49 : id     = row[5];¢Ò
   50 : pass   = decode(row[6], "", decode_variable);¢Ò
   51 : title  = row[7];¢Ò
   52 : usecnt = row[8];¢Ò
   53 : class  = row[9];¢Ò
   54 : kind   = row[10];¢Ò
   55 : useflag= row[11];¢Ò
   56 : name   = row[12];¢Ò
   57 : phone  = row[13];¢Ò
   58 : hdphone= row[14];¢Ò
   59 : email  = row[15];¢Ò
   60 : pagerec= row[16];¢Ò
   61 : ¢Ò
   62 : if(kind=="C") cku= "Æó¼â";¢Ò
   63 :   else if(kind=="O") cku= "<font color=#f00000>°ø°³</font>";¢Ò
   64 :   else cku= "¸ð¸§";¢Ò
   65 : ¢Ò
   66 : if(useflag=="S") cku~= "/<font color=#009000>½Åû</font>";¢Ò
   67 :   else if(useflag=="Y") cku~= "/<font color=#000090>°¡µ¿</font>";¢Ò
   68 :   else if(useflag=="N") cku~= "/<font color=#f00000>Á¤Áö</font>";¢Ò
   69 :   else cku~= "/¸ð¸§";¢Ò
   70 : ¢Ò
   71 : if(class=="U") cku= "»ç¿ëÀÚ/" ~ cku;¢Ò
   72 :   else if(class!="A") cku= "¸ð¸§/" ~ cku ~ " [ "¢Ò
   73 :                          ~ class ~ " / " ~ kind ~ " / " ~ useflag ~ " ]";¢Ò
   74 :   else cku= "<font color=#f00000>°ü¸®ÀÚ</font>";¢Ò
   75 : ¢Ò
   76 : if(class=="A") user= "°ü¸®ÀÚ"; else user= "¼ÒÀ¯ÀÚ";¢Ò
   77 : ¢Ò
   78 : addr_recnt= get_recount(mysql, preTBname~id, "");¢Ò
   79 : if(addr_recnt==-1)¢Ò
   80 :   {¢Ò
   81 :     addr_recnt= "<font color=#f00000>NoTB</font> (<font color=#f00000>"¢Ò
   82 :               ~ preTBname ~ id ~ "</font> Å×À̺íÀÌ ¾øÀ½)";¢Ò
   83 :   }¢Ò
   84 :  else¢Ò
   85 :   {¢Ò
   86 :     if(addr_recnt==-2) addr_recnt= "(MySQL ³»ºÎ ¿À·ù)";¢Ò
   87 :   }¢Ò
   88 : fm= formdump("form/admview.fom");¢Ò
   89 : if(fm==FORM_OPENERR) return err_form("admview.fom");¢Ò
   90 : return disconnect();¢Ò
File name: addrbook/admview.wel (2,382 bytes) Wesoft Corp. ¨Ï 2001 All rights reserved.