|
||||
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();¢Ò |
||||
|