|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* file: register.wel¢Ò 4 : ¢Ò 5 : ÁÖ¼Ò·Ï »ç¿ëÀÚ µî·Ï½Åû ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò 6 : ¢Ò 7 : Copyright (c) 2001/02/22 by Wesoft¢Ò 8 : All Rights Reserved.¢Ò 9 : */¢Ò 10 : ¢Ò 11 : htmlquery("POST");¢Ò 12 : include("common.inc");¢Ò 13 : if(register_flag==0)¢Ò 14 : {¢Ò 15 : MSG1= "ÁÖ¼Ò·Ï ½Å±Ô ½Åû ºÒ´É »óÅÂ";¢Ò 16 : MSG2= "ÇöÀç´Â °ü¸®ÀÚ°¡ ½Åû¼¸¦ ÀÛ¼ºÇÒ ¼ö ¾øµµ·Ï Çß½À´Ï´Ù.<br>"¢Ò 17 : ~ "µî·ÏÀ» Èñ¸ÁÇϽøé Á÷Á¢ " ~ HELP_ADMIN;¢Ò 18 : print_type("");¢Ò 19 : formdump(message_form);¢Ò 20 : return;¢Ò 21 : }¢Ò 22 : step= val(step);¢Ò 23 : if(step<2)¢Ò 24 : {¢Ò 25 : if(step==0) fmfile= "register.fom"; else fmfile= "register2.fom";¢Ò 26 : print_type("");¢Ò 27 : fm= formdump("form/" ~ fmfile);¢Ò 28 : if(fm==FORM_OPENERR) err_form(fmfile);¢Ò 29 : return;¢Ò 30 : }¢Ò 31 : if(mysql_connection()==MYSQL_ERR) return;¢Ò 32 : id= strchange(tolower(left(id,12)), fch~"| ", rch~"|");¢Ò 33 : recnt= get_recount(mysql, myustable, "id='" ~ id ~ "'");¢Ò 34 : if(recnt>0)¢Ò 35 : {¢Ò 36 : MSG1= "ID Áߺ¹ ¿À·ù";¢Ò 37 : MSG2= "ÁÖ¼Ò·Ï ID: " ~ id ~ " ´Â ÀÌ¹Ì µî·ÏµÇ¾î ÀÖ½À´Ï´Ù!" ~ BACK_BUTTON;¢Ò 38 : print_type("");¢Ò 39 : formdump(message_form);¢Ò 40 : return disconnect();¢Ò 41 : }¢Ò 42 : ¢Ò 43 : wdtime= date(1) ~ " " ~ left(time(1),5);¢Ò 44 : pass= tolower(left(pass,12));¢Ò 45 : enpass= encode(pass, encodekey(), "", decode_variable);¢Ò 46 : title= strchange(lrtrim(title), fch, rch);¢Ò 47 : name= strchange(lrtrim(name), fch, rch);¢Ò 48 : phone= strchange(lrtrim(phone), fch, rch);¢Ò 49 : hdphone= strchange(lrtrim(hdphone), fch, rch);¢Ò 50 : email= strchange(lrtrim(email), fch, rch);¢Ò 51 : ¢Ò 52 : if(register_flag==2) useflag= "Y"; else useflag= "S";¢Ò 53 : qstr= "insert into " ~ myustable¢Ò 54 : ~ " (wdtime,id,pass,title,class,kind,useflag,name,phone,hdphone,email,pagerec) "¢Ò 55 : ~ strform("values('{$wdtime}','{$id}','{$enpass}','{$title}','U','{$kind}',",¢Ò 56 : "'{$useflag}','{$name}','{$phone}','{$hdphone}','{$email}','10')");¢Ò 57 : ¢Ò 58 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò 59 : ¢Ò 60 : include("adminsert.sub");¢Ò 61 : if(mysql_query(mysql, create_addrtable)==MYSQL_ERR)¢Ò 62 : {¢Ò 63 : MSG1= "ÁÖ¼Ò·Ï ID: " ~ id ~ " Å×ÀÌºí »ý¼º ¿À·ù";¢Ò 64 : MSG2= "ÁÖ¼Ò·Ï ID: " ~ id ~ " Å×À̺íÀ» »ý¼ºÇÒ ¼ö ¾ø½À´Ï´Ù." ~ HELP_ADMIN;¢Ò 65 : print_type("");¢Ò 66 : formdump(message_form);¢Ò 67 : return disconnect();¢Ò 68 : }¢Ò 69 : ¢Ò 70 : url= "register3.wel?id=" ~ id ~ "&use=";¢Ò 71 : if(register_flag==2)¢Ò 72 : {¢Ò 73 : send_cookie(id, pass);¢Ò 74 : url~= "1";¢Ò 75 : }¢Ò 76 : else¢Ò 77 : {¢Ò 78 : print_type("");¢Ò 79 : url~= "0";¢Ò 80 : }¢Ò 81 : replace_location(url);¢Ò 82 : return disconnect();¢Ò |
||||
|