1 : /* file: chkuser.sub¢Ò
2 : ¢Ò
3 : »ç¿ëÀÚ ÀÎÁõ(ÄíŰ) ºÎ ÇÁ·Î±×·¥ (author: ¼±¤Çö)¢Ò
4 : ¢Ò
5 : Copyright (c) 2001/03/25 by Wesoft¢Ò
6 : All Rights Reserved.¢Ò
7 : */¢Ò
8 : ¢Ò
9 : htmlquery("COOKIE");¢Ò
10 : if(usinfo!="")¢Ò
11 : {¢Ò
12 : usinfo= left(usinfo, cookie_garbage) ~ mid(usinfo, cookie_garbage+2);¢Ò
13 : decoding= decode(usinfo, "", decode_variable);¢Ò
14 : htmlquery(decoding);¢Ò
15 : dist_date= date(0) - val(ckdate);¢Ò
16 : if(dist_date<0 || dist_date>1) dist= COOKIE_EXPIRE*60+1;¢Ò
17 : else¢Ò
18 : {¢Ò
19 : dist_date*= 86400; // 1ÀÏ °æ°úºÐÀÇ ÃÊ´ÜÀ§ ½Ã°£(24*60*60)¢Ò
20 : time= time(0);¢Ò
21 : cur_sec= left(time,2)*3600 + mid(time,3,2)*60 + right(time,2);¢Ò
22 : cookie_hour= val(left(cktime,2));¢Ò
23 : cookie_min= val(mid(cktime,3,2));¢Ò
24 : cookie_sec= cookie_hour*3600+cookie_min*60+val(right(cktime,2));¢Ò
25 : dist= abs(cur_sec + dist_date - cookie_sec);¢Ò
26 : }¢Ò
27 : if(dist>COOKIE_EXPIRE*60 && ckid!="")¢Ò
28 : { // °ü¸®ÀÚ·Î ·Î±×ÀÎ ÇßÀ» ¶§¸¸ ÄíŰ ¸¸±â ó¸®ÇÔ¢Ò
29 : MSG1= "ÄíŰ ¸¸±â ¿À·ù";¢Ò
30 : MSG2= COOKIE_EXPIRE ~ "ºÐ°£ »ç¿ëÇÏÁö ¾Ê¾Æ Äí۰¡ ¸¸±âµÇ¾ú½À´Ï´Ù."¢Ò
31 : ~ " ´Ù½Ã ·Î±×ÀÎ Çϼ¼¿ä!"¢Ò
32 : ~ "<br><br>" ~ button(0,"gologin()","·Î±×ÀÎÇϱâ","width:90")¢Ò
33 : ~ " " ~ button(0,"gologout()","·Î±×¾Æ¿ôÇϱâ","width:90");¢Ò
34 : formdump(message_form);¢Ò
35 : return(FAIL);¢Ò
36 : }¢Ò
37 : }¢Ò
38 : us_class= "";¢Ò
39 : board_admin_depass= decode(board_admin_pass, "", decode_variable);¢Ò
40 : if(ckid!="")¢Ò
41 : {¢Ò
42 : if(ckid!=board_admin_id || ckpass!=board_admin_depass)¢Ò
43 : {¢Ò
44 : if(board_name=="") board_name= "ÀÌ °Ô½ÃÆÇ";¢Ò
45 : MSG1= "°Ô½ÃÆÇ °ü¸®ÀÚ ID ¶Ç´Â ¾ÏÈ£ ¿À·ù";¢Ò
46 : MSG2= "<font color=#0000c0>" ~ board_name ~ "</font>ÀÇ "¢Ò
47 : ~ "°ü¸®ÀÚ ID ¶Ç´Â ¾ÏÈ£°¡ ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù. ´Ù½Ã ·Î±×ÀÎ Çϼ¼¿ä!"¢Ò
48 : ~ "<br><br>" ~ button(0,"gologin()","·Î±×ÀÎÇϱâ","width:90")¢Ò
49 : ~ " " ~ button(0,"gologout()","·Î±×¾Æ¿ôÇϱâ","width:90");¢Ò
50 : formdump(message_form);¢Ò
51 : return(FAIL);¢Ò
52 : }¢Ò
53 : us_class= "A";¢Ò
54 : }¢Ò
55 : if(send_cookie!="NO") send_cookie(ckid, ckpass, ckemail, ckname);¢Ò
56 : return(OK);¢Ò
|