File name: addrbook/modify.sub (1,240 bytes) Text file viewer v1.2 
    1 : /* file: modify.sub
    2 : 
    3 :    주소록 자료 수정 폼 출력 부 프로그램 (author: 서광현)
    4 : 
    5 :    Copyright (c) 2001/02/22 by Wesoft
    6 :    All Rights Reserved.
    7 : */
    8 : 
    9 : qstr= "select * from " ~ mytable ~ " where selno=" ~ no;
   10 : 
   11 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();
   12 : myresult= mysql_store_result(mysql);
   13 : if(myresult==MYSQL_ERR) return err_store_result();
   14 : recnt= mysql_num_rows(myresult);
   15 : if(recnt>0) row= mysql_fetch_row(myresult);
   16 : if(recnt<1 || row==MYSQL_ERR)
   17 :  {
   18 :     MSG1= "[" ~ recnt ~ "] 자료가 없습니다!";
   19 :     MSG2= "번호" ~ no ~ "의 자료가 없습니다!" ~ BACK_BUTTON;
   20 :     formdump(message_form);
   21 :     return disconnect();
   22 :  }
   23 : mysql_free_result(myresult);
   24 : 
   25 : selno= row[0];
   26 : wdtime= row[1];
   27 : wip= row[2];
   28 : mdtime= row[3];
   29 : mip= row[4];
   30 : idtime= row[5];
   31 : iip= row[6];
   32 : name= row[7];
   33 : birth= row[8];
   34 : hdphone= row[9];
   35 : hphone= row[10];
   36 : hfax= row[11];
   37 : homepage= row[12];
   38 : email= row[13];
   39 : hzip1= left(row[14],3);
   40 : hzip2= right(row[14],3);
   41 : haddr1= row[15];
   42 : haddr2= row[16];
   43 : office= row[17];
   44 : buseo= row[18];
   45 : position= row[19];
   46 : ophone= row[20];
   47 : ofax= row[21];
   48 : ozip1= left(row[22],3);
   49 : ozip2= right(row[22],3);
   50 : oaddr1= row[23];
   51 : oaddr2= row[24];
   52 : memo= row[25];
   53 : fm= formdump("form/modify.fom");
   54 : if(fm==FORM_OPENERR) return err_form("modify.fom");
   55 : return disconnect();
File name: addrbook/modify.sub (1,240 bytes) Wesoft Corp. ⓒ 2001 All rights reserved.