function fullHairetu(fol_name,fullmem,url,urllink,prolink,annual){ this.fol_name = fol_name this.fullmem = fullmem this.url = url this.urllink = urllink this.prolink = prolink this.annual = annual } // function fullmemGo(){ var count=0; var co_f=0; //----- ↓ここにFull Membership数を入力します var max=111; //------------------------------------------- var i; var j; var k; var ichi1; var ichi2; var lang; var f_nameDB=new Array(); var f_countDB=new Array(); for (i=1;i <= max;i++) { document.write(""); // Full Member処理------------------------ if (FullmemDB[i].urllink != "#") { document.write(""+FullmemDB[i].fullmem+"   "+FullmemDB[i].url+""); } else { document.write(""+FullmemDB[i].fullmem+"   "+FullmemDB[i].url+""); } // Profile Plan処理------------------------ count=parseFloat(FullmemDB[i].prolink.charAt(0)); if (20 <= count * 10) { // 複数ファイルがある場合の処理 // "/"の位置を求める k = i; co_f = 0; for (j=1;j <= count+1;j++) { f_countDB[j] = FullmemDB[k].prolink.indexOf("/",co_f); co_f = f_countDB[j] + 1; } // ファイル名を取り出す for (j=1;j <= count;j++) { ichi1 = f_countDB[j]+1; ichi2 = f_countDB[j+1]; f_nameDB[j] = FullmemDB[k].prolink.substring(ichi1,ichi2); } // ブラウザに出力 document.write("") for (j=1;j <= count;j++) { document.write("□ "); } document.write(""); } else { // １ファイルの場合 if (FullmemDB[i].prolink != "#") { document.write("□"); } else { document.write("□"); } } // Annual Report処理------------------------ count=parseFloat(FullmemDB[i].annual.charAt(0)); if (20 <= count * 10) { // 複数ファイルがある場合の処理 // "/"の位置を求める k = i; co_f = 0; for (j=1;j <= count+1;j++) { f_countDB[j] = FullmemDB[k].annual.indexOf("/",co_f); co_f = f_countDB[j] + 1; } //alert("f_countDB[1]="+f_countDB[1]+"\nf_countDB[2]="+f_countDB[2]+"\nf_countDB[3]="+f_countDB[3]+"\nf_countDB[4]="+f_countDB[4]) // ファイル名を取り出す for (j=1;j <= count;j++) { ichi1 = f_countDB[j]+1; ichi2 = f_countDB[j+1]; f_nameDB[j] = FullmemDB[k].annual.substring(ichi1,ichi2); //alert(k+"行目\n"+"ichi1="+ichi1+"\nichi2="+ichi2+"\nファイル名＝"+f_nameDB[j]) } // ブラウザに出力 document.write("") for (j=1;j <= count;j++) { document.write("□ "); } document.write(""); } else { // １ファイルの場合 if (FullmemDB[i].annual != "#") { document.write("□"); } else { document.write("□"); } } } document.close(); } //---------------------------------------------------------- FullmemDB=new Array(); // ñ 差込済みデータを、以下にペースト FullmemDB[1]=new fullHairetu("0904","Casey City, Australia","URL","http://www.casey.vic.gov.au/","CaseyCity_profile.pdf","#") FullmemDB[2]=new fullHairetu("0908","Corio Norlane Development Advisory Board, Australia","URL","http://www.corionorlane.org.au/","#","") FullmemDB[3]=new fullHairetu("0902","Gold Coast City, Australia","URL","http://www.goldcoast.qld.gov.au","GoldCoastCity_HealthPlan.pdf.pdf","#") FullmemDB[4]=new fullHairetu("0906","Healthy Cities Illawarra, Australia","URL","http://www.healthyillawarra.org.au/","#","Annual Report 2006-07.pdf") FullmemDB[5]=new fullHairetu("0905","Kiama Municpal Council, Australia","","#","supplement.pdf","#") FullmemDB[6]=new fullHairetu("0903","Logan City, Australia","URL","http://www.logan.qld.gov.au","Profile_baseline.pdf","#") FullmemDB[7]=new fullHairetu("0907","The City of Marion, Australia","URL","http://www.marion.sa.gov.au/","#","") FullmemDB[8]=new fullHairetu("0901","Townsville City, Australia","URL","http://www.townsville.qld.gov.au/","ProfilePlan_2003_1.pdf","#") FullmemDB[9]=new fullHairetu("0101","Phnom Penh, Cambodia","URL","http://www.phnompenh.gov.kh/english/introduction.html","ProfilePlan_2003_1.pdf","#") FullmemDB[10]=new fullHairetu("0216","Central and Western District, Hong Kong SAR, China","URL","http://www.districtcouncils.gov.hk/","#","#") FullmemDB[11]=new fullHairetu("0206","Changshu City, Jiangsu Province, China","","#","ProfilePlan_2005_1.pdf","#") FullmemDB[12]=new fullHairetu("0221","Huai'an City, China","URL","http://healthy.huaian.gov.cn/","Huaian_profile.pdf","#") FullmemDB[13]=new fullHairetu("0220","Islands District, Hong Kong SAR, China","","#","Profile_Islands.pdf","#") FullmemDB[14]=new fullHairetu("0215","The Kowloon City District, Hong Kong SAR, China","","#","Kowloon_Profile.pdf","#") FullmemDB[15]=new fullHairetu("0208","Kunshan City, Jiangsu Province, China","URL","http://www.jk.ks.cn","Kunshan_Documents.pdf","#") FullmemDB[16]=new fullHairetu("0201","Kwai Tsing District, Hong Kong SAR, China","URL","http://www.kwaitsinghsa.org.hk/English/background/Background.asp","ProfilePlan_2004_1.pdf","#") FullmemDB[17]=new fullHairetu("0211","Kwun Tong District, Hong Kong SAR, China","","#","KwunTong_profile_AppIV.pdf","#") FullmemDB[18]=new fullHairetu("0207","Luohu District, Shenzhen, China","","#","ProfilePlan_2005_1.pdf","#") FullmemDB[19]=new fullHairetu("0202","Macao Special Administrative Region, China","URL","http://www.ssm.gov.mo/design/home_e_fs.htm","ProfilePlan_2004_1.pdf","#") FullmemDB[20]=new fullHairetu("0219","North District, Hong Kong SAR, China","","#","DistrictProfileNorthDistrict.pdf","#") FullmemDB[21]=new fullHairetu("0203","Sai Kung District, Hong Kong SAR, China","URL","http://www.tko-hc.org/","ProfilePlan_2004_1.pdf","#") FullmemDB[22]=new fullHairetu("0214","Sha Tin District, Hong Kong SAR, China","","#","ShaTin_Documents.pdf","#") FullmemDB[23]=new fullHairetu("0218","Southern District, Hong Kong SAR, China","","#","SouthernDistrictProfile.pdf","#") FullmemDB[24]=new fullHairetu("0204","The City of Suzhou, China","URL","http://www.healthycity.com.cn/","ProfilePlan_2004_1.pdf","#") FullmemDB[25]=new fullHairetu("0209","Taicang City, Jiangsu Province, China","","#","Taicang_Profile.pdf","#") FullmemDB[26]=new fullHairetu("0222","Tai Po District, Hong Kong SAR, China","URL","http://www.tpshc.org","Tai Po_Profile.pdf","#") FullmemDB[27]=new fullHairetu("0212","Tongzhou City, Jiangsu Province, China","URL","http://www.jsjktz.com","Tongzhou_Profile.pdf","#") FullmemDB[28]=new fullHairetu("0213","Tsuen Wan, Hong Kong SAR, China","URL","http://www.yuenyuen.org.hk/non-flash/ch3/ch3-3-6.htm","TsuenWan_Documents.pdf","#") FullmemDB[29]=new fullHairetu("0210","Wujiang City, Jiangsu Province, China","URL","http://www.jkwj.gov.cn","Wujiang_Documents.pdf","#") FullmemDB[30]=new fullHairetu("0217","Yau Tsim Mong District, Hong Kong SAR, China","","#","YauTsimMong_Profile.pdf","#") FullmemDB[31]=new fullHairetu("0205","Zhangjiagang City, Jiangsu Province, China","","#","Profile_Plan_2003_1.pdf","#") FullmemDB[32]=new fullHairetu("0310","Abiko City, Japan","","#","#","#") FullmemDB[33]=new fullHairetu("0301","Fukuroi City, Japan","","#","ProfilePlan_2003_1.PDF","#") FullmemDB[34]=new fullHairetu("0303","Ichikawa City, Japan","URL","http://www.city.ichikawa.chiba.jp/","5/200503HC_ProgramIchikawa_English_final.doc/200503HC_ProgramIchikawa_English_final.pdf/200503HC_ProgramIchikawa_Japanese_final.doc/PRG_digest(English060112version).doc/PRG_digest(Japanese).pdf/","3/2003Healthy City Ichikawa Annual Report.doc/2004HCIannualreport(English).doc/2004HCIannualreport(Japanese).doc/") FullmemDB[35]=new fullHairetu("0309","Kobe City, Japan","URL","http://www.city.kobe.jp/","#","#") FullmemDB[36]=new fullHairetu("0302","Miyakojima City, Japan","URL","http://www.city.miyakojima.lg.jp","ProfilePlan_2004_1.pdf","#") FullmemDB[37]=new fullHairetu("0308","Nagareyama City, Japan","URL","http://www.city.nagareyama.chiba.jp/","Nagareyama_profile.pdf","#") FullmemDB[38]=new fullHairetu("0306","Nagoya City, Japan","URL","http://www.city.nagoya.jp/","Nagoya_Profile.pdf","#") FullmemDB[39]=new fullHairetu("0307","Obu City, Japan","URL","http://www.city.obu.aichi.jp/","Obu_Documents.pdf","#") FullmemDB[40]=new fullHairetu("0304","Owariasahi City, Japan","URL","http://www.city.owariasahi.lg.jp/","ProfilePlan_2004_1.pdf","#") FullmemDB[41]=new fullHairetu("0305","Tajimi City, Japan","URL","http://www.city.tajimi.gifu.jp/","#","#") FullmemDB[42]=new fullHairetu("0312","Taito-ku, Tokyo, Japan","URL","http://www.city.taito.tokyo.jp/","#","#") FullmemDB[43]=new fullHairetu("0311","Yamato City, Japan","","#","#","#") FullmemDB[44]=new fullHairetu("0440","Andong City, Republic of Korea","URL","http://www.andong.go.kr/","#","#") FullmemDB[45]=new fullHairetu("0436","Asan-si, Republic of Korea","URL","http://www.asan.go.kr/eng/about/sub_01.asp","#","#") FullmemDB[46]=new fullHairetu("0426","Buk-gu, Ulsan, Republic of Korea","URL","http://healthpia.bukgu.ulsan.kr/","BukGuUlsan_Profile.pdf","#") FullmemDB[47]=new fullHairetu("0401","Busanjin-gu, Busan Metropolitan City, Republic of Korea","URL","http://www.bsjin.net/English/main.htm","ProfilePlan_2004_1.pdf","Results of Busanjin healthy city approach.doc") FullmemDB[48]=new fullHairetu("0414","Busan Metropolitan City, Republic of Korea","URL","http://www.busan.go.kr","BusanMetropolitanCity_profile.doc","#") FullmemDB[49]=new fullHairetu("0441","Buyeo County, Republic of Korea","URL","http://buyeo.go.kr/","Buyeo_ProfileDocument.pdf","#") FullmemDB[50]=new fullHairetu("0402","Changwon City, Republic of Korea","URL","http://www.changwon.go.kr/foreign/english/","ProfilePlan_2004_1.pdf","#") FullmemDB[51]=new fullHairetu("0449","Cheonan City, Republic of Korea","URL","http://www.cheonan.go.kr/","#","#") FullmemDB[52]=new fullHairetu("0425","ChunCheon City, Republic of Korea","","#","ChunCheon_profile.pdf","#") FullmemDB[53]=new fullHairetu("0406","Dobong-gu, Seoul, Republic of Korea","URL","http://www.dobong.go.kr/english/intro/greeting.asp","#","#") FullmemDB[54]=new fullHairetu("0421","Dong-gu, Gwangju Metropolitan City, Republic of Korea","URL","http://donggu.gwangju.kr","Dong-gu_Profile.pdf","#") FullmemDB[55]=new fullHairetu("0438","Donghae City, Republic of Korea","URL","http://www.dh.go.kr/","#","#") FullmemDB[56]=new fullHairetu("0417","Dongjak-gu, Seoul, Republic of Korea","URL","http://healthycity.dongjak.go.kr","2/activities_healthcenter_dongjak(final).ppt/Dongjak-gu_cityprofile.xls/","#") FullmemDB[57]=new fullHairetu("0432","Gangdong District, Seoul, Republic of Korea","URL","http://www.gangdong.go.kr/pub/eng/","Gangdong_Profile.pdf","#") FullmemDB[58]=new fullHairetu("0408","Gangnam-gu, Seoul, Republic of Korea","URL","http://healthpia.gangnam.go.kr/english/eng-intro.html","ProfilePlan_2005_1.pdf","#") FullmemDB[59]=new fullHairetu("0405","Geumsan County, Republic of Korea","URL","http://www.geumsan.go.kr/english/index.htm","#","#") FullmemDB[60]=new fullHairetu("0419","Guro-gu, Seoul, Republic of Korea","URL","http://www.guro.go.kr/site/hc/index.jsp","GuroProfile.pdf","#") FullmemDB[61]=new fullHairetu("0416","Gwangjin-gu, Seoul, Republic of Korea","URL","http://www.gwangjin.go.kr","Gwangjin-gu_profile.pdf","#") FullmemDB[62]=new fullHairetu("0430","Gwangmyeong City, Gyeonggi Province, Republic of Korea","URL","http://www.gm.go.kr/","#","#") FullmemDB[63]=new fullHairetu("0451","Hadong County, Republic of Korea","URL","http://www.hdhealth.go.kr/","Profile_HadongCounty.pdf","#") FullmemDB[64]=new fullHairetu("0422","Hwaseong City, Republic of Korea","URL","http://www.hscity.net","#","#") FullmemDB[65]=new fullHairetu("0428","Jangheung-gun, Jeollanamdo, Republic of Korea","URL","http://www.jangheung.go.kr/","Jangheung_profile.pdf","#") FullmemDB[66]=new fullHairetu("0452","Jangsu County, Republic of Korea","URL","http://www.jangsu.go.kr/","#","") FullmemDB[67]=new fullHairetu("0444","Jecheon City, Chungcheongbuk Province,Republic of Korea","URL","http://www.okjc.net/","#","#") FullmemDB[68]=new fullHairetu("0407","Jeju Special Self-Governing Province, Republic of Korea","URL","http://www.jeju.go.kr/jeju_f/english/index_new.php","ProfilePlan_2005_1.pdf","#") FullmemDB[69]=new fullHairetu("0418","Jeonju City, Republic of Korea","URL","http://health.jeonju.go.kr","Jeonju_ProfilePlan.pdf","#") FullmemDB[70]=new fullHairetu("0442","Jincheon County, Republic of Korea","URL","http://jincheon.go.kr/","Jincheon_Profile.pdf","#") FullmemDB[71]=new fullHairetu("0413","Jinju City, Gyeongsangnam-do, Republic of Korea","URL","http://english.jinju.go.kr/","Jinju_HCProfileKKW.pdf","#") FullmemDB[72]=new fullHairetu("0423","Jung-Gu, Seoul, Republic of Korea","URL","http://health.junggu.seoul.kr","Profile of city.doc","#") FullmemDB[73]=new fullHairetu("0445","Muju County, Republic of Korea","URL","http://www.muju.org/","#","#") FullmemDB[74]=new fullHairetu("0448","Nam-gu, Gwangju, Republic of Korea","URL","http://www.namgu.gwangju.kr/namgu/","#","#") FullmemDB[75]=new fullHairetu("0409","Namhae-gun, Gyeongsangnam-do, Republic of Korea","URL","http://english.namhae.go.kr/","ProfilePlan_2005_1.pdf","#") FullmemDB[76]=new fullHairetu("0431","Seocho District, Seoul, Republic of Korea","","#","Seocho_profile.pdf","#") FullmemDB[77]=new fullHairetu("0424","Seodaemun-District, Seoul, Republic of Korea","URL","http://www.seodaemun.seoul.kr/","Seodaemun_Profile.pdf","#") FullmemDB[78]=new fullHairetu("0434","Seo-gu, Gwangju, Republic of Korea","URL","http://www.chosun.ac.kr/","#","#") FullmemDB[79]=new fullHairetu("0412","Seongbuk District, Seoul, Republic of Korea","URL","http://www.seongbuk.go.kr","Seongbuk_ProfilePlan.pdf","#") FullmemDB[80]=new fullHairetu("0410","Seongdong-gu, Seoul, Republic of Korea","URL","http://healthysd.or.kr","ProfilePlan_2005_1.pdf","#") FullmemDB[81]=new fullHairetu("0415","Seosan City, Republic of Korea","URL","http://www.seosan.go.kr","Seosan_CityProfile.pdf","#") FullmemDB[82]=new fullHairetu("0403","Seoul, Republic of Korea","URL","http://english.seoul.go.kr/","SEOUL_Profile2004.pdf","#") FullmemDB[83]=new fullHairetu("0447","Siheung City, Republic of Korea","","#","Siheung_ProfileDocument.pdf","#") FullmemDB[84]=new fullHairetu("0435","Sokcho-City, Republic of Korea","URL","http://sokcho.gangwon.kr/section/health/html/main.html","#","#") FullmemDB[85]=new fullHairetu("0446","Songpa District, Seoul, Republic of Korea","URL","http://www.songpa.go.kr/","Songpa_ProfileDocument.pdf","#") FullmemDB[86]=new fullHairetu("0420","Suncheon-si, Jeollanamdo, Republic of Korea","URL","http://www.suncheon.go.kr","Suncheon_ProfilePlan.pdf","#") FullmemDB[87]=new fullHairetu("0443","Taebaek city, Gangwon province, Republic of Korea","URL","http://www.taebaek.go.kr/","#","#") FullmemDB[88]=new fullHairetu("0439","Uiwang city, Gyeonggi province, Republic of Korea","URL","http://www.uw21.net/","#","#") FullmemDB[89]=new fullHairetu("0427","Wando-gun, Jeollanamdo, Republic of Korea","URL","http://www.wando.go.kr/","Wando_profile.pdf","#") FullmemDB[90]=new fullHairetu("0404","Wonju City, Republic of Korea","URL","http://english.wonju.go.kr/","#","#") FullmemDB[91]=new fullHairetu("0429","Yanggu-County, Gwangwon Province, Republic of Korea","URL","http://yangguhealth.com/","#","#") FullmemDB[92]=new fullHairetu("0437","Yangpyeong county, Gyeonggi province, Republic of Korea","URL","http://www.yp21.net/","#","#") FullmemDB[93]=new fullHairetu("0450","Yangsan City, Gyeongsangnam-Do, Republic of Korea","URL","http://yshealth.go.kr/","Profile_YangsanCity.pdf","") FullmemDB[94]=new fullHairetu("0433","Yeongdeungpo-Gu, Seoul, Republic of Korea","URL","http://health.ydp.go.kr/","#","#") FullmemDB[95]=new fullHairetu("0411","Yeongi County, Chungnam Province, Republic of Korea","URL","http://english.yeongi.go.kr/eng_index.asp","ProfilePlan_2005_1.pdf","#") FullmemDB[96]=new fullHairetu("0453","Yongsan-gu, Seoul, Republic of Korea","URL","http://www.yongsan.go.kr/","#","") FullmemDB[97]=new fullHairetu("0501","Kuching City, Malaysia","URL","http://www.healthycity.sarawak.gov.my/","ProfilePlan_2002_1.pdf","2/200006_6thConferenceReport.pdf/KchAnnReport2002.doc/") FullmemDB[98]=new fullHairetu("0601","Ulaanbaatar City, Mongolia","","#","ProfilePlan_2003_1.PDF","#") FullmemDB[99]=new fullHairetu("0709","Caloocan City, Philippines","","#","#","#") FullmemDB[100]=new fullHairetu("0708","Dagupan City, Philippines","","#","#","#") FullmemDB[101]=new fullHairetu("0707","Las Piñas City, Philippines","URL","http://www.laspiñascity.gov.ph","LasPinas_CityProfile.pdf","#") FullmemDB[102]=new fullHairetu("0710","Makati City, Philippines","","http://www.makati.gov.ph/portal/index.jsp","#","#") FullmemDB[103]=new fullHairetu("0701","Marikina City, Philippines","URL","http://www.marikina.gov.ph/","#","#") FullmemDB[104]=new fullHairetu("0705","Muntinlupa City, Philippines","URL","http://www.muntinlupacity.gov.ph/","ProfilePlan_2005_1.pdf","#") FullmemDB[105]=new fullHairetu("0706","Parañaque City, Philippines","URL","http://www.paranaquecity.com/","ProfilePlan_2005_1.pdf","#") FullmemDB[106]=new fullHairetu("0711","Pasig City, Philippines","URL","http://www.pasigcity.gov.ph/","#","#") FullmemDB[107]=new fullHairetu("0702","San Fernando, La Union, Philippines","URL","http://www.sanfernandocity.gov.ph/","#","#") FullmemDB[108]=new fullHairetu("0712","Santiago City, Philippines","URL","http://www.cityofsantiago.gov.ph","Profile_SantiagoCity.pdf","#") FullmemDB[109]=new fullHairetu("0703","Tagaytay City, Philippines","","#","ProfilePlan_2004_1.pdf","#") FullmemDB[110]=new fullHairetu("0704","Valencia City, Bukidnon, Philippines","URL","http://www.valencia.gov.ph/","ProfilePlan_2003_1.PDF","4/AnnualReport2003.PDF/File0001.PDF/File0002.PDF/File0005.PDF/") FullmemDB[111]=new fullHairetu("0801","Hue City, Vietnam","","#","ProfilePlan_2004_1.PDF","#")