Dim useragents() as String Dim referers() as String Dim randheaders() as String Dim randURLs() as String randURLs.Append "http://www.jimin.jp/" randURLs.Append "http://www.jimin.jp/involved/joining/" randURLs.Append "http://www.jimin.jp/involved/donate/" randURLs.Append "http://www.jimin.jp/sitemap/" randURLs.Append "http://www.jimin.jp/english/" randURLs.Append "http://www.jimin.jp/policy/" randURLs.Append "http://www.jimin.jp/activity/" randURLs.Append "http://www.jimin.jp/member/" randURLs.Append "http://www.jimin.jp/involved/" randURLs.Append "http://www.jimin.jp/election/" randURLs.Append "http://www.jimin.jp/aboutus/" randURLs.Append "http://www.jimin.jp/voice/" randURLs.Append "http://www.jimin.jp/top.html" randURLs.Append "http://www.jimin.jp/../eco/index.html" randURLs.Append "http://youth.jimin.jp/activity/team-11/index.html" randURLs.Append "http://www.jimin.jp/activity/movie/0ch_cafe_sta/1_anniversary/" randURLs.Append "http://www.jimin.jp/../involved/campaign/116958.html" randURLs.Append "http://www.jimin.jp/../involved/campaign/113868.html" randURLs.Append "http://www.jimin.jp/../involved/donate/index.html" randURLs.Append "http://www.jimin.jp/../involved/j_nsc/index.html" randURLs.Append "http://www.jimin-shop.jp/" randURLs.Append "http://www.jimin.jp/../reconstruction/index.html" randURLs.Append "http://www.jimin.jp/../activity/press/president/117457.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117454.html" randURLs.Append "http://www.jimin.jp/../activity/news/117422.html" randURLs.Append "http://www.jimin.jp/../involved/paper/117421.html" randURLs.Append "http://www.jimin.jp/../policy/policy_topics/117405.html" randURLs.Append "http://www.jimin.jp/../activity/press/president/117401.html" randURLs.Append "http://www.jimin.jp/../policy/policy_topics/117398.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117397.html" randURLs.Append "http://www.jimin.jp/../activity/press/chairman_prc/117399.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117386.html" randURLs.Append "http://www.jimin.jp/../policy/policy_topics/117385.html" randURLs.Append "http://www.jimin.jp/../involved/paper/117356.html" randURLs.Append "http://www.jimin.jp/../activity/news/117348.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117347.html" randURLs.Append "http://www.jimin.jp/../activity/press/president/117325.html" randURLs.Append "http://www.jimin.jp/../activity/press/chairman_prc/117315.html" randURLs.Append "http://www.jimin.jp/../policy/policy_topics/117328.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117311.html" randURLs.Append "http://www.jimin.jp/../involved/paper/117273.html" randURLs.Append "http://www.jimin.jp/../activity/press/chief_secretary/117245.html" randURLs.Append "http://www.jimin-nara.jp/koubo-23san.html" randURLs.Append "http://www.jimin.jp/../election/116363.html" randURLs.Append "http://www.jimin.jp/../involved/campaign/116650.html" randURLs.Append "http://www.jimin.jp/../involved/campaign/113467.html" randURLs.Append "http://www.jimin.jp/../involved/campaign/115266.html" randURLs.Append "http://www.jimin.jp/branch_info.html" randURLs.Append "http://jimin-gifu.jp/gifuseijijyuku/admissions.html" randURLs.Append "http://www.jimin-saitama.net/gakuin/index.html" randURLs.Append "http://www.saga-jimin.com/newleader2/" randURLs.Append "http://www.jimin.jp/activity/colum/index.html" randURLs.Append "http://www.jimin.jp/activity/colum/117241.html" randURLs.Append "http://www.jimin.jp/activity/colum/117116.html" randURLs.Append "http://www.jimin.jp/activity/colum/116667.html" randURLs.Append "http://www.jimin.jp/activity/colum/116622.html" randURLs.Append "http://www.jimin.jp/../involved/mailmagazine/backnumber/117418.html" randURLs.Append "http://www.jimin.jp/activity/movie/" randURLs.Append "http://twitter.com/?status=%e3%80%90%e8%87%aa%e7%94%b1%e6%b0%91%e4%b8%bb%e5%85%9a%e3%81%ae%e5%85%ac%e5%bc%8f%e3%82%b5%e3%82%a4%e3%83%88%e3%80%91%e8%87%aa%e6%b0%91%e5%85%9a%e3%81%ae%e6%94%bf%e7%ad%96%e3%80%81%e6%9c%80%e6%96%b0%e3%83%8b%e3%83%a5%e3%83%bc%e3%82%b9%e3%80%81%e7%b7%8f%e8%a3%81%e3%81%ae%e3%83%a1%e3%83%83%e3%82%bb%e3%83%bc%e3%82%b8%e3%80%81%e8%ad%b0%e5%93%a1%e6%83%85%e5%a0%b1%e3%81%aa%e3%81%a9%e3%82%92%e6%8e%b2%e8%bc%89%e3%81%97%e3%81%a6%e3%81%84%e3%81%be%e3%81%99%e3%80%82http%3a%2f%2fwww%2ejimin%2ejp%2f%20%23jimin" randURLs.Append "http://www.jimin.jp/mailto:" randURLs.Append "http://www.jimin.jp/activity/conference/index.html" randURLs.Append "http://www.jimin.jp/activity/media/index.html" randURLs.Append "http://www.jimin.jp/activity/press/president/117325.html" randURLs.Append "http://www.jimin.jp/policy/policy_topics/117101.html" randURLs.Append "http://www.jimin.jp/activity/press/chief_secretary/117347.html" randURLs.Append "http://www.jimin.jp/policy/policy_topics/117114.html" randURLs.Append "http://www.jimin.jp/policy/policy_topics/117385.html" randURLs.Append "http://www.jimin.jp/policy/policy_topics/117093.html" randURLs.Append "http://www.jimin.jp/policy/policy_topics/116666.html" randURLs.Append "http://www.jimin.jp/activity/news/117348.html" randURLs.Append "http://www.jimin.jp/activity/colum/116298.html" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=J-NSC&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E5%85%AC%E5%8B%9F&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E5%8E%9F%E5%AD%90%E5%8A%9B%E8%A6%8F%E5%88%B6%E5%A7%94%E5%93%A1%E4%BC%9A%E8%A8%AD%E7%BD%AE%E6%B3%95&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E5%8F%82%E8%AD%B0%E9%99%A2&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E5%9B%BD%E5%9C%9F%E5%BC%B7%E9%9D%AD%E5%8C%96%E5%9F%BA%E6%9C%AC%E6%B3%95%E6%A1%88&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E5%B0%8F%E6%9E%97+%E7%AF%80&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E6%86%B2%E6%B3%95&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E6%97%A5%E6%9C%AC%E3%81%AE%E5%86%8D%E8%B5%B7%E3%81%AE%E3%81%9F%E3%82%81%E3%81%AE%E6%94%BF%E7%AD%96&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E7%94%9F%E7%94%B0+%E3%82%88%E3%81%97%E3%81%8B%E3%81%A4&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/mt/mt-estraier.cgi?query=%E9%9D%92%E6%A3%AE&tag=1&blog_id=25" randURLs.Append "http://www.jimin.jp/ssl/index.html" randURLs.Append "http://www.jimin.jp/privacy_policy/" randURLs.Append "http://www.jimin.jp/aboutus/home/guide/" randURLs.Append "http://www.jimin.jp/policy/policy_topics/" randURLs.Append "http://www.jimin.jp/policy/parliament/" randURLs.Append "http://www.jimin.jp/policy/basic_policy/" randURLs.Append "http://www.jimin.jp/policy/manifest/" randURLs.Append "http://www.jimin.jp/policy/pamphlet/" randURLs.Append "http://www.jimin.jp/activity/news/" randURLs.Append "http://www.jimin.jp/activity/press/" randURLs.Append "http://www.jimin.jp/activity/project/" randURLs.Append "http://www.jimin.jp/activity/colum/" randURLs.Append "http://www.jimin.jp/activity/media/" randURLs.Append "http://www.jimin.jp/activity/conference/" randURLs.Append "http://www.jimin.jp/activity/discourse/" randURLs.Append "http://www.jimin.jp/activity/photography/" randURLs.Append "http://www.jimin.jp/member/member_list/" randURLs.Append "http://www.jimin.jp/member/officer/" randURLs.Append "http://www.jimin.jp/member/s_cabinet/" randURLs.Append "http://www.jimin.jp/member/branch_chief/" randURLs.Append "http://www.jimin.jp/member/association/" randURLs.Append "http://www.jimin.jp/member/organize/" randURLs.Append "http://www.jimin.jp/involved/facebook/" randURLs.Append "http://www.jimin.jp/involved/j_nsc/" randURLs.Append "http://www.jimin.jp/involved/paper/" randURLs.Append "http://www.jimin.jp/involved/mailmagazine/" randURLs.Append "http://www.jimin.jp/involved/campaign/" randURLs.Append "http://www.jimin.jp/election/candidate/" randURLs.Append "http://www.jimin.jp/election/results/" randURLs.Append "http://www.jimin.jp/aboutus/declaration/" randURLs.Append "http://www.jimin.jp/aboutus/organization/" randURLs.Append "http://www.jimin.jp/aboutus/history/" randURLs.Append "http://www.jimin.jp/aboutus/convention/" randURLs.Append "http://www.jimin.jp/aboutus/song_symbol/" randURLs.Append "http://www.jimin.jp/aboutus/access/" randURLs.Append "http://www.jimin.jp/aboutus/home/" randURLs.Append "https://ssl.jimin.jp/m/contact" randURLs.Append "https://ssl.jimin.jp/m/paper" URL = randURLs(RndNumber(0, randURLs.UBound)) useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-GB; rv:1.8.1.6) Gecko/20070725 Firefox/2.0.0.6" useragents.Append "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)" useragents.Append "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30)" useragents.Append "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)" useragents.Append "Mozilla/4.0 (compatible; MSIE 5.0; Windows NT 5.1; .NET CLR 1.1.4322)" useragents.Append "Googlebot/2.1 ( http://www.googlebot.com/bot.html) " useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 6.0; en-US) AppleWebKit/534.14 (KHTML, like Gecko) Chrome/9.0.601.0 Safari/534.14" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/534.14 (KHTML, like Gecko) Chrome/9.0.600.0 Safari/534.14" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/534.13 (KHTML, like Gecko) Chrome/9.0.597.0 Safari/534.13" useragents.Append "Mozilla/5.0 (X11; U; Linux x86_64; en-US) AppleWebKit/534.13 (KHTML, like Gecko) Ubuntu/10.04 Chromium/9.0.595.0 Chrome/9.0.595.0 Safari/534.13" useragents.Append "Mozilla/5.0 (compatible; MSIE 7.0; Windows NT 5.2; WOW64; .NET CLR 2.0.50727)" useragents.Append "Mozilla/5.0 (compatible; MSIE 8.0; Windows NT 5.2; Trident/4.0; Media Center PC 4.0; SLCC1; .NET CLR 3.0.04320)" useragents.Append "Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_5_8; zh-cn) AppleWebKit/533.18.1 (KHTML, like Gecko) Version/5.0.2 Safari/533.18.5" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 6.1; es-ES) AppleWebKit/533.18.1 (KHTML, like Gecko) Version/5.0 Safari/533.16" useragents.Append "Opera/9.80 (Windows NT 5.2; U; ru) Presto/2.5.22 Version/10.51" useragents.Append "Mozilla/5.0 (Windows NT 5.1; U; Firefox/5.0; en; rv:1.9.1.6) Gecko/20091201 Firefox/3.5.6 Opera 10.53" // populate referer list referers.Append "http://www.google.com/?q=mega+upload+closed" referers.Append "http://www.google.com/?q=opmegaupload+anonymous+hacker" referers.Append "http://www.google.com/?q=anonymous+hacker" referers.Append URL // Add random headers randheaders.Append "Cache-Control: no-cache" randheaders.Append "If-Modified-Since: Sat, 29 Oct 1994 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Sep 2002 10:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 12 Aug 2004 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2006 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Oct 2006 09:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 29 Oct 2001 05:17:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Apr 2003 12:54:49 GMT" randheaders.Append "If-Modified-Since: Sat, 18 Aug 2002 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Jun 2006 09:34:27 GMT" randheaders.Append "If-Modified-Since: Sun, 13 Oct 2007 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2003 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2002 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Oct 2008 09:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 29 Oct 2007 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2001 12:54:49 GMT" Headers.Append "Keep-Alive: 115" Headers.Append "Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7" Headers.Append "Connection: keep-alive" // ------------------ DO NOT EDIT BELOW THIS LINE // generate random referer Headers.Append "Referer: " + referers(RndNumber(0, referers.UBound)) // generate random user agent (DO NOT MODIFY THIS LINE) Headers.Append "User-Agent: " + useragents(RndNumber(0, useragents.UBound)) // Generate random headers Headers.Append randheaders(RndNumber(0, randheaders.UBound))