Basic program style:
n = 0
for i = 0 To 26
For j = 0 To 26
For k = 0 To 26
a[n][1] = Text.GetCharacter(97+k)
a[n][2] = Text.GetCharacter(97+j)
a[n][3] = Text.GetCharacter(97+i)
TextWindow.WriteLine(a[n][1] + " " + a[n][2] + " " + a[n][3])
url = a[n][1] + a[n][2] + a[n][3]
TextWindow.WriteLine(url)
c[n] = Network.GetWebPageContents("http://"+url+".com")
TextWindow.WriteLine(c[n])
n = n + 1
EndFor
EndFor
EndFor
No comments:
Post a Comment