|
||||
1 : #!/bin/wel¢Ò 2 : ¢Ò 3 : /* zipcode.wel¢Ò 4 : ¢Ò 5 : ÁÖ¼Ò ÀÔ·Â ºÎÇÁ·Î±×·¥¢Ò 6 : ¢Ò 7 : Copyright (c) 2001/01/27 by Wesoft¢Ò 8 : All Rights Reserved.¢Ò 9 : ¢Ò 10 : */¢Ò 11 : ¢Ò 12 : host= "localhost";¢Ò 13 : htmlquery("GET");¢Ò 14 : htmlquery("POST");¢Ò 15 : htmlquery(decode(mysqlupass, "", "@mysqlupass")); // MySQL(myuser, mypass)¢Ò 16 : ¢Ò 17 : dbname= "zipcode";¢Ò 18 : tablename= "zipcode";¢Ò 19 : cpright= "<font color=#5c5c5c face=Verdana size=1>"¢Ò 20 : ~ "<b>Wesoft Corp.</b> ¨Ï 2001 All rights reserved.</font>";¢Ò 21 : ¢Ò 22 : PROGRAM_NAME= "zipcode.wel";¢Ò 23 : PROGRAM_VERSION= "v0.1.2";¢Ò 24 : ¢Ò 25 : if(background!="") bground= " background='" ~ background ~ "'";¢Ò 26 : else if(bgcolor!="") bground= " bgcolor='#" ~ bgcolor ~ "'";¢Ò 27 : ¢Ò 28 : if(onlylist!=1)¢Ò 29 : {¢Ò 30 : if(fn=="" || z1=="" || z2=="" || a1=="" || a2=="")¢Ò 31 : {¢Ò 32 : formdump("form/usage.fom");¢Ò 33 : return;¢Ò 34 : }¢Ò 35 : }¢Ò 36 : if(dong=="") { formdump("form/zipcode.fom"); return; }¢Ò 37 : ¢Ò 38 : dong= strchange(lrtrim(dong), "'|\\", "\"|/");¢Ò 39 : pos= strfind(dong, " ");¢Ò 40 : if(pos==0) sido_cond= "", keyword= dong;¢Ò 41 : else¢Ò 42 : {¢Ò 43 : fch= "°æ³²|°æºÏ|Àü³²|ÀüºÏ|Ãæ³²|ÃæºÏ";¢Ò 44 : rch= "°æ»ó³²µµ|°æ»óºÏµµ|Àü¶ó³²µµ|Àü¶óºÏµµ|Ãæû³²µµ|ÃæûºÏµµ";¢Ò 45 : sido= strchange(left(dong, pos-1), fch, rch);¢Ò 46 : dong= ltrim(mid(dong, pos+1));¢Ò 47 : keyword= sido ~ " " ~ dong;¢Ò 48 : sido_cond= "(sido like '%" ~ sido¢Ò 49 : ~ "%' or gugun like '%" ~ sido ~ "%') and ";¢Ò 50 : }¢Ò 51 : ¢Ò 52 : mysql= mysql_connect(host, myuser, mypass);¢Ò 53 : if(mysql==MYSQL_ERR)¢Ò 54 : {¢Ò 55 : MSG1= "MySQL ¼¹ö Á¢¼Ó ¿À·ù";¢Ò 56 : MSG2= host ~ " ¼¹ö¿¡ Á¢¼ÓÇÒ ¼ö ¾ø½À´Ï´Ù! ¼¹ö °ü¸®ÀÚ¿¡°Ô ¹®ÀÇÇϼ¼¿ä!";¢Ò 57 : formdump("form/error.fom");¢Ò 58 : return;¢Ò 59 : }¢Ò 60 : ¢Ò 61 : if(mysql_select_db(mysql, dbname)==MYSQL_ERR)¢Ò 62 : {¢Ò 63 : MSG1= "Database ¼±Åà ¿À·ù";¢Ò 64 : MSG2= dbname¢Ò 65 : ~ " µ¥ÀÌÅͺ£À̽º¸¦ ¼±ÅÃÇÒ ¼ö ¾ø½À´Ï´Ù! ¼¹ö °ü¸®ÀÚ¿¡°Ô ¹®ÀÇÇϼ¼¿ä!";¢Ò 66 : formdump("form/error.fom");¢Ò 67 : return;¢Ò 68 : }¢Ò 69 : ¢Ò 70 : qstr= "select zipcode,sido,gugun,dong,bunji,ho from " ~ tablename¢Ò 71 : ~ " where " ~ sido_cond ~ "dong like '%" ~ dong ~ "%'";¢Ò 72 : ¢Ò 73 : if(mysql_query(mysql, qstr)==MYSQL_ERR)¢Ò 74 : {¢Ò 75 : MSG1= "Database Query ¿À·ù";¢Ò 76 : MSG2= "µ¥ÀÌÅͺ£À̽º Äõ¸®°¡ À߸øµÇ¾ú½À´Ï´Ù! ¼¹ö °ü¸®ÀÚ¿¡°Ô ¹®ÀÇÇϼ¼¿ä!"¢Ò 77 : ~ "<br>Query: " ~ qstr;¢Ò 78 : formdump("form/error.fom");¢Ò 79 : return;¢Ò 80 : }¢Ò 81 : ¢Ò 82 : result= mysql_store_result(mysql);¢Ò 83 : if(result==MYSQL_ERR)¢Ò 84 : {¢Ò 85 : MSG1= "mysql_store_result() ¿À·ù";¢Ò 86 : MSG2= "mysql_store_result() ¿À·ùÀÔ´Ï´Ù! ¼¹ö °ü¸®ÀÚ¿¡°Ô ¹®ÀÇÇϼ¼¿ä!";¢Ò 87 : formdump("form/error.fom");¢Ò 88 : return;¢Ò 89 : }¢Ò 90 : ¢Ò 91 : formopen("form/zipcode.fom");¢Ò 92 : DATA_TABLE= 1;¢Ò 93 : rows_count= mysql_num_rows(result);¢Ò 94 : if(rows_count==0)¢Ò 95 : {¢Ò 96 : NO_DATA= 1;¢Ò 97 : MSG_COLOR= "#f00000";¢Ò 98 : MSG= "'" ~ keyword ~ "'¿¡ ´ëÇÑ ÀÚ·á°¡ ¾ø½À´Ï´Ù.";¢Ò 99 : }¢Ò 100 : else if(rows_count<=256)¢Ò 101 : {¢Ò 102 : MSG_COLOR= "#000000";¢Ò 103 : MSG= "ÃÑ " ~ rows_count ~ "°³ÀÇ '" ~ keyword ~ "'ÀÌ(°¡) °Ë»öµÇ¾ú½À´Ï´Ù.";¢Ò 104 : }¢Ò 105 : else¢Ò 106 : {¢Ò 107 : MSG_COLOR= "#f00000";¢Ò 108 : MSG= "ÃÑ " ~ rows_count ~ "°³ÀÇ '"¢Ò 109 : ~ keyword ~ "'ÀÌ(°¡) °Ë»öµÇ¾î 256°³¸¸ ó¸®Çß½À´Ï´Ù.";¢Ò 110 : rows_count= 256;¢Ò 111 : }¢Ò 112 : for (i=1; i<=rows_count; i++)¢Ò 113 : {¢Ò 114 : row= mysql_fetch_row(result);¢Ò 115 : if(isarray(row))¢Ò 116 : {¢Ò 117 : zip1= mid(row[0], 1, 3);¢Ò 118 : zip2= mid(row[0], 5, 3);¢Ò 119 : address2= row[1];¢Ò 120 : if(row[2]!="") address2~= " "~row[2];¢Ò 121 : if(row[3]!="") address2~= " "~row[3];¢Ò 122 : address= address2; // È£¿Í ¹øÁö°¡ Á¦¿ÜµÈ ÁÖ¼Ò¢Ò 123 : if(row[4]!="") address2~= " "~row[4];¢Ò 124 : if(row[5]!="") address2~= " "~row[5];¢Ò 125 : formmerge(0);¢Ò 126 : }¢Ò 127 : }¢Ò 128 : formdump();¢Ò 129 : formclose();¢Ò 130 : mysql_free_result(result);¢Ò 131 : mysql_close(mysql);¢Ò 132 : return;¢Ò |
||||
|