API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jul 21st, 2012
1,104
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.28 KB | None | 0 0
raw download clone embed print report
  1. Dim useragents() as String
  2. Dim referers() as String
  3. Dim randheaders() as String
  4. Dim randURLs() as String
  5.  
  6. randURLs.Append "http://www.london2012.com/cookies-policy/"
  7. randURLs.Append "http://www.london2012.com/bsl/"
  8. randURLs.Append "http://www.london2012.com/easyread/"
  9. randURLs.Append "http://fr.london2012.com/fr/"
  10. randURLs.Append "http://www.london2012.com/schedule-and-results/"
  11. randURLs.Append "http://www.london2012.com/schedule-and-results/index.html"
  12. randURLs.Append "http://www.london2012.com/schedule-and-results/day=25-july/"
  13. randURLs.Append "http://www.london2012.com/schedule-and-results/day=25-july/list.html/"
  14. randURLs.Append "http://www.london2012.com/medals/"
  15. randURLs.Append "http://www.london2012.com/torch-relay/"
  16. randURLs.Append "http://www.london2012.com/sports/"
  17. randURLs.Append "http://www.london2012.com/athletics/"
  18. randURLs.Append "http://www.london2012.com/athletics/event/men-shot-put/phase=atm051900/index.html"
  19. randURLs.Append "http://www.london2012.com/news/articles/athletics-competition-promises-light-the-olympic-stadium.html"
  20. randURLs.Append "http://www.london2012.com/badminton/"
  21. randURLs.Append "http://www.london2012.com/athlete/culson-javier-1101337/"
  22. randURLs.Append "http://www.london2012.com/fencing/"
  23. randURLs.Append "http://www.london2012.com/gymnastics-rhythmic/"
  24. randURLs.Append "http://www.london2012.com/modern-pentathlon/"
  25. randURLs.Append "http://www.london2012.com/hockey/"
  26. randURLs.Append "http://www.london2012.com/judo/"
  27. randURLs.Append "http://www.london2012.com/rowing/"
  28. randURLs.Append "http://www.london2012.com/swimming/"
  29. randURLs.Append "http://www.london2012.com/join-in/"
  30. randURLs.Append "http://www.london2012.com/join-in/whats-on/"
  31. randURLs.Append "http://www.london2012.com/join-in/live-sites/"
  32. randURLs.Append "http://www.london2012.com/join-in/live-sites/site=birmingham/"
  33. randURLs.Append "http://www.london2012.com/join-in/live-sites/site=bradford/"
  34. randURLs.Append "http://www.london2012.com/volleyball/"
  35. randURLs.Append "http://www.london2012.com/volleyball/photos/"
  36. randURLs.Append "http://www.london2012.com/media-centre/latest/"
  37. randURLs.Append "http://www.london2012.com/media-centre/article=day-gymnast-nadia-comaneci-and-former-basketball-player-john-amaechi-take-the-olympic-flame-the-roof-the-north-greenwich-arena.html"
  38. randURLs.Append "http://www.london2012.com/media-centre/torch-accreditation/"
  39. randURLs.Append "http://www.london2012.com/media-centre/torch-accreditation/article=torch-accreditation-week.html"
  40. randURLs.Append "http://www.london2012.com/spectators/"
  41. randURLs.Append "http://www.london2012.com/handball/"
  42. randURLs.Append "http://www.london2012.com/photos/sport-galleries/discipline=diving/pictures.html#action-from-the-diving-test-event"
  43. randURLs.Append "http://www.london2012.com/cycling-mountain-bike/index.html"
  44. randURLs.Append "http://www.london2012.com/cycling-mountain-bike/about/index.html"
  45. randURLs.Append "http://www.london2012.com/beach-volleyball/index.html"
  46. randURLs.Append "http://www.london2012.com/terms-of-use/"
  47. randURLs.Append "http://www.london2012.com/privacy-policy/"
  48. randURLs.Append "http://www.london2012.com/about-us/inspire/inspire-programme/"
  49. randURLs.Append "http://www.london2012.com/synchronized-swimming/index.html"
  50. randURLs.Append "http://www.london2012.com/synchronized-swimming/news/"
  51. randURLs.Append "http://www.london2012.com/wrestling/index.html"
  52. randURLs.Append "http://www.london2012.com/wrestling/event/men-greco-roman-74kg/phase=wrm174500/index.html"
  53. randURLs.Append "http://www.london2012.com/wrestling/event/men-greco-roman-74kg/phase=wrm174250/index.html"
  54. randURLs.Append "http://www.london2012.com/badminton/"
  55. randURLs.Append "http://www.london2012.com/badminton/"
  56.  
  57.  
  58.  
  59. URL = randURLs(RndNumber(0, randURLs.UBound))
  60.  
  61.  
  62. 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"
  63. useragents.Append "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)"
  64. 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)"
  65. useragents.Append "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)"
  66. useragents.Append "Mozilla/4.0 (compatible; MSIE 5.0; Windows NT 5.1; .NET CLR 1.1.4322)"
  67. useragents.Append "Googlebot/2.1 ( http://www.googlebot.com/bot.html) "
  68. 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"
  69. 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"
  70. 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"
  71. 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"
  72. useragents.Append "Mozilla/5.0 (compatible; MSIE 7.0; Windows NT 5.2; WOW64; .NET CLR 2.0.50727)"
  73. 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)"
  74. 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"
  75. 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"
  76. useragents.Append "Opera/9.80 (Windows NT 5.2; U; ru) Presto/2.5.22 Version/10.51"
  77. 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"
  78.  
  79. // populate referer list
  80.  
  81. referers.Append "http://www.google.com/?q=mega+upload+closed"
  82. referers.Append "http://www.google.com/?q=opmegaupload+anonymous+hacker"
  83. referers.Append "http://www.google.com/?q=anonymous+hacker"
  84. referers.Append URL
  85.  
  86. randURLs.Append "http://www.london2012.com/cookies-policy/"
  87. randURLs.Append "http://www.london2012.com/bsl/"
  88. randURLs.Append "http://www.london2012.com/easyread/"
  89. randURLs.Append "http://fr.london2012.com/fr/"
  90. randURLs.Append "http://www.london2012.com/schedule-and-results/"
  91. randURLs.Append "http://www.london2012.com/schedule-and-results/index.html"
  92. randURLs.Append "http://www.london2012.com/schedule-and-results/day=25-july/"
  93. randURLs.Append "http://www.london2012.com/schedule-and-results/day=25-july/list.html/"
  94. randURLs.Append "http://www.london2012.com/medals/"
  95. randURLs.Append "http://www.london2012.com/torch-relay/"
  96. randURLs.Append "http://www.london2012.com/sports/"
  97. randURLs.Append "http://www.london2012.com/athletics/"
  98. randURLs.Append "http://www.london2012.com/athletics/event/men-shot-put/phase=atm051900/index.html"
  99. randURLs.Append "http://www.london2012.com/news/articles/athletics-competition-promises-light-the-olympic-stadium.html"
  100. randURLs.Append "http://www.london2012.com/badminton/"
  101. randURLs.Append "http://www.london2012.com/athlete/culson-javier-1101337/"
  102. randURLs.Append "http://www.london2012.com/fencing/"
  103. randURLs.Append "http://www.london2012.com/gymnastics-rhythmic/"
  104. randURLs.Append "http://www.london2012.com/modern-pentathlon/"
  105. randURLs.Append "http://www.london2012.com/hockey/"
  106. randURLs.Append "http://www.london2012.com/judo/"
  107. randURLs.Append "http://www.london2012.com/rowing/"
  108. randURLs.Append "http://www.london2012.com/swimming/"
  109. randURLs.Append "http://www.london2012.com/join-in/"
  110. randURLs.Append "http://www.london2012.com/join-in/whats-on/"
  111. randURLs.Append "http://www.london2012.com/join-in/live-sites/"
  112. randURLs.Append "http://www.london2012.com/join-in/live-sites/site=birmingham/"
  113. randURLs.Append "http://www.london2012.com/join-in/live-sites/site=bradford/"
  114. randURLs.Append "http://www.london2012.com/volleyball/"
  115. randURLs.Append "http://www.london2012.com/volleyball/photos/"
  116. randURLs.Append "http://www.london2012.com/media-centre/latest/"
  117. randURLs.Append "http://www.london2012.com/media-centre/article=day-gymnast-nadia-comaneci-and-former-basketball-player-john-amaechi-take-the-olympic-flame-the-roof-the-north-greenwich-arena.html"
  118. randURLs.Append "http://www.london2012.com/media-centre/torch-accreditation/"
  119. randURLs.Append "http://www.london2012.com/media-centre/torch-accreditation/article=torch-accreditation-week.html"
  120. randURLs.Append "http://www.london2012.com/spectators/"
  121. randURLs.Append "http://www.london2012.com/handball/"
  122. randURLs.Append "http://www.london2012.com/photos/sport-galleries/discipline=diving/pictures.html#action-from-the-diving-test-event"
  123. randURLs.Append "http://www.london2012.com/cycling-mountain-bike/index.html"
  124. randURLs.Append "http://www.london2012.com/cycling-mountain-bike/about/index.html"
  125. randURLs.Append "http://www.london2012.com/beach-volleyball/index.html"
  126. randURLs.Append "http://www.london2012.com/terms-of-use/"
  127. randURLs.Append "http://www.london2012.com/privacy-policy/"
  128. randURLs.Append "http://www.london2012.com/about-us/inspire/inspire-programme/"
  129. randURLs.Append "http://www.london2012.com/synchronized-swimming/index.html"
  130. randURLs.Append "http://www.london2012.com/synchronized-swimming/news/"
  131. randURLs.Append "http://www.london2012.com/wrestling/index.html"
  132. randURLs.Append "http://www.london2012.com/wrestling/event/men-greco-roman-74kg/phase=wrm174500/index.html"
  133. randURLs.Append "http://www.london2012.com/wrestling/event/men-greco-roman-74kg/phase=wrm174250/index.html"
  134. randURLs.Append "http://www.london2012.com/badminton/"
  135. randURLs.Append "http://www.london2012.com/badminton/"
  136.  
  137. // Add random headers
  138. randheaders.Append "Cache-Control: no-cache"
  139. randheaders.Append "If-Modified-Since: Sat, 29 Oct 1994 11:59:59 GMT"
  140. randheaders.Append "If-Modified-Since: Tue, 18 Sep 2002 10:34:27 GMT"
  141. randheaders.Append "If-Modified-Since: Mon, 12 Aug 2004 12:54:49 GMT"
  142. randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT"
  143. randheaders.Append "If-Modified-Since: Tue, 18 Aug 2006 08:49:15 GMT"
  144. randheaders.Append "If-Modified-Since: Fri, 20 Oct 2006 09:34:27 GMT"
  145. randheaders.Append "If-Modified-Since: Mon, 29 Oct 2001 05:17:09 GMT"
  146. randheaders.Append "If-Modified-Since: Tue, 18 Apr 2003 12:54:49 GMT"
  147. randheaders.Append "If-Modified-Since: Sat, 18 Aug 2002 12:54:49 GMT"
  148. randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT"
  149. randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT"
  150. randheaders.Append "If-Modified-Since: Fri, 20 Jun 2006 09:34:27 GMT"
  151. randheaders.Append "If-Modified-Since: Sun, 13 Oct 2007 11:59:59 GMT"
  152. randheaders.Append "If-Modified-Since: Tue, 18 Aug 2003 12:54:49 GMT"
  153. randheaders.Append "If-Modified-Since: Wed, 30 Jan 2002 01:21:09 GMT"
  154. randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT"
  155. randheaders.Append "If-Modified-Since: Fri, 20 Oct 2008 09:34:27 GMT"
  156. randheaders.Append "If-Modified-Since: Mon, 29 Oct 2007 11:59:59 GMT"
  157. randheaders.Append "If-Modified-Since: Tue, 18 Aug 2001 12:54:49 GMT"
  158.  
  159. Headers.Append "Keep-Alive: 115"
  160. Headers.Append "Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7"
  161. Headers.Append "Connection: keep-alive"
  162.  
  163. // ------------------ DO NOT EDIT BELOW THIS LINE
  164.  
  165. // generate random referer
  166. Headers.Append "Referer: " + referers(RndNumber(0, referers.UBound))
  167. // generate random user agent (DO NOT MODIFY THIS LINE)
  168. Headers.Append "User-Agent: " + useragents(RndNumber(0, useragents.UBound))
  169. // Generate random headers
  170. Headers.Append randheaders(RndNumber(0, randheaders.UBound))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!