|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* file: addrbook.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= admin= 0; // ·Î±ä »óÅ°¡ ¾Æ´Ï¸ç °ü¸®ÀÚ ¸Þ´º »ç¿ëºÒ´É¢Ò 15 : if(include("chkuser.sub")!=OK) return disconnect();¢Ò 16 : ¢Ò 17 : if(n==0 && o==0) n= o= 1;¢Ò 18 : if(n==1) nchked= " checked"; // n Àº À̸§À¸·Î ã±â üũ¹Ú½º º¯¼ö¢Ò 19 : if(o==1) ochked= " checked"; // o ´Â Á÷ÀåÀ¸·Î ã±â üũ¹Ú½º º¯¼ö¢Ò 20 : ¢Ò 21 : if(list=="s") // °Ë»ö¾î¸¦ ÀÔ·ÂÇÏ¿© ã±â ¹öÆ°À» ´©¸¥ °æ¿ì¢Ò 22 : {¢Ò 23 : datefield= "";¢Ò 24 : pagevar= "ps";¢Ò 25 : sels= " selected";¢Ò 26 : k= strchange(lrtrim(k), fch, rch);¢Ò 27 : if(k=="") cond= "name=''"; // °Ë»ö¾î°¡ ¾ø´Â °æ¿ì´Â ¾øÀ½¢Ò 28 : else // (´Ü, URLÀÇ query¿¡¼´Â Á¦¿Ü)¢Ò 29 : {¢Ò 30 : if(n==1) ncond= "name like '%" ~ k ~ "%'";¢Ò 31 : if(o==1) ocond= "office like '%" ~ k ~ "%'";¢Ò 32 : cond= ncond;¢Ò 33 : if(n==1 && o==1) cond~= " or ";¢Ò 34 : cond~= ocond;¢Ò 35 : if(o==1) order=" order by name asc"; else order=" order by office asc";¢Ò 36 : }¢Ò 37 : }¢Ò 38 : else if(list=="w") // µî·ÏÀÚ·á º¸±â¢Ò 39 : {¢Ò 40 : datefield= "wdtime";¢Ò 41 : pagevar= "pw";¢Ò 42 : selw= " selected";¢Ò 43 : cond= datefield ~ ">'' and delflag<>'d'";¢Ò 44 : order= " order by wdtime desc";¢Ò 45 : }¢Ò 46 : else if(list=="m") // ¼öÁ¤ÀÚ·á º¸±â¢Ò 47 : {¢Ò 48 : datefield= "mdtime";¢Ò 49 : pagevar= "pm";¢Ò 50 : selm= " selected";¢Ò 51 : cond= datefield ~ ">'' and delflag<>'d'";¢Ò 52 : order= " order by mdtime desc";¢Ò 53 : }¢Ò 54 : else if(list=="d") // »èÁ¦ÀÚ·á º¸±â¢Ò 55 : {¢Ò 56 : datefield= "";¢Ò 57 : pagevar= "pd";¢Ò 58 : seld= " selected";¢Ò 59 : cond= "delflag='d'";¢Ò 60 : order= " order by idtime desc";¢Ò 61 : }¢Ò 62 : else // Á¶È¸ÀÚ·á º¸±â¢Ò 63 : {¢Ò 64 : datefield= "idtime";¢Ò 65 : pagevar= "pi";¢Ò 66 : seli= " selected";¢Ò 67 : cond= datefield ~ ">'' and delflag<>'d'";¢Ò 68 : order= " order by idtime desc";¢Ò 69 : }¢Ò 70 : k= queryencode(keyword=k);¢Ò 71 : ¢Ò 72 : fm= formopen("form/addrbook.fom");¢Ò 73 : if(fm==FORM_OPENERR) return err_form("addrbook.fom");¢Ò 74 : ¢Ò 75 : tot_recnt= get_recount(mysql, mytable, "");¢Ò 76 : now_recnt= get_recount(mysql, mytable, cond);¢Ò 77 : if(list=="d") del_recnt= now_recnt;¢Ò 78 : else del_recnt= get_recount(mysql, mytable, "delflag='d'");¢Ò 79 : ¢Ò 80 : tot_page= now_recnt / pagerec;¢Ò 81 : if(now_recnt%pagerec>0) tot_page++;¢Ò 82 : view_page= val(pg);¢Ò 83 : if(view_page<1) view_page= val(parser(pagevar));¢Ò 84 : if(view_page<1) view_page= 1;¢Ò 85 : else if(view_page>tot_page) view_page= tot_page;¢Ò 86 : parser(pagevar~"="~view_page);¢Ò 87 : start_rec= (view_page-1) * pagerec;¢Ò 88 : ¢Ò 89 : qstr= "select selno,name,hdphone,hphone,office,ophone,delflag";¢Ò 90 : if(datefield!="") qstr~= "," ~ datefield;¢Ò 91 : qstr~= " from " ~ mytable;¢Ò 92 : if(cond!="") qstr~= " where " ~ cond;¢Ò 93 : qstr~= order ~ " limit " ~ start_rec ~ "," ~ pagerec;¢Ò 94 : ¢Ò 95 : if(mysql_query(mysql, qstr)==MYSQL_ERR) return err_query();¢Ò 96 : myresult= mysql_store_result(mysql);¢Ò 97 : if(myresult==MYSQL_ERR) return err_store_result();¢Ò 98 : row_recnt= mysql_num_rows(myresult);¢Ò 99 : dflag= "";¢Ò 100 : for(rec=1; rec<=row_recnt; rec++)¢Ò 101 : {¢Ò 102 : row= mysql_fetch_row(myresult);¢Ò 103 : if(row!=MYSQL_ERR)¢Ò 104 : {¢Ò 105 : selno= row[0];¢Ò 106 : name= row[1];¢Ò 107 : hdphone= row[2];¢Ò 108 : hphone= row[3];¢Ò 109 : office= row[4];¢Ò 110 : ophone= row[5];¢Ò 111 : if(list!="d") dflag= row[6];¢Ò 112 : formmerge(0);¢Ò 113 : }¢Ò 114 : }¢Ò 115 : mysql_free_result(myresult);¢Ò 116 : selno= name= hphone= hdphone= office= ophone= "";¢Ò 117 : formdump();¢Ò 118 : formclose();¢Ò 119 : return disconnect();¢Ò |
||||
|