Paokmania.Gr

Κώδικας: Επιλογή όλων

gademis_name	hits
Sera4	9
K_geo	8
Dinos_Liverpool	7
Ekatnetworkltd	7
obanebane	7
free4	5
john4serres	5
lefis	5
paok87	5
sn0ufel4	5
PARASANDALOS	4
xlebouras	4
Yiankos	4
Ζαντός	4
Τρόμος	4
gash04	3
Lord	3
Photis	3
sidpanos	3
angelheart	2
ARMY	2
axristeas	2
che4	2
DC	2
Dimg4	2
DON_DS	2
Kostas_Peraia4	2
Mario Jardel	2
moican4	2
novito	2
Odi	2
pgetsos	2
Santana4	2
Sladjan Spasić	2
slidar	2
sourmenetes	2
Steenage	2
teacher	2
vryzas4.	2
ace1979	1
aisiodoksos	1
aparadektos	1
arrwstos	1
BigBaby	1
charlie_pace	1
dimitris1408	1
diniko80	1
Falegkos	1
fidel	1
georgedoulk2008	1
gergeo4	1
gerrard	1
god4	1
guardian4	1
navigator11	1
nothu	1
olivares	1
paok4ever	1
paokaras_sindos	1
pilotos	1
Segreto	1
stelyk	1
theo G4	1
theoPAOK	1
trelogiatros	1
tzelas	1
ZamanFou	1
Χωρικός	1

Κώδικας: Επιλογή όλων

gademosaura	victim
ace1979	1.Rodrigo Rey
aisiodoksos	10.Dimitar Berbatov
angelheart	Βαγγέλης Μαργαρίτης
angelheart	96. Στέλιος Πόζογλου
aparadektos	Χουσεΐν Μουμίν
ARMY	28.Κώστας Κατσουράνης
ARMY	20.Ευθύμης Κουλούρης
arrwstos	30. Νίκος Μελίσσας
axristeas	61. Κώστας Δημητρίου
axristeas	7.Omar El Kaddouri
BigBaby	2.Carlos Zambrano
charlie_pace	7.Eyal Golasa
che4	1. Μάρκος Βελλίδης
che4	31.Αλέξανδρος Πασχαλάκης
DC	14.Δημήτρης Σαλπιγγίδης
DC	20.Liam Lawrence
Dimg4	21.Νίκος Σπυρόπουλος
Dimg4	88. Adelino André Vieira Freitas "Vieirinha"
dimitris1408	4.Γιώργος Κατσικάς
diniko80	14.Αθανάσιος Παπάζογλου
Dinos_Liverpool	37. Kristi Qose
Dinos_Liverpool	Nemanja Kartal
Dinos_Liverpool	88. Κυριάκος Σαββίδης
Dinos_Liverpool	Κώστας Παναγιωτούδης
Dinos_Liverpool	Κωστής Δεμηρτζόγλου
Dinos_Liverpool	32.Θεοφάνης Τζανδάρης
Dinos_Liverpool	24.Στέλιος Ποζατζίδης
DON_DS	25. Costin Lazăr
DON_DS	20. Danny Hoesen
Ekatnetworkltd	9.Δημήτρης Παπαδόπουλος
Ekatnetworkltd	14.Facundo Abel Pereyra
Ekatnetworkltd	27.Γιάννης Μυστακίδης
Ekatnetworkltd	4.Marin Leovac
Ekatnetworkltd	20.Ricardo Costa
Ekatnetworkltd	5.Răzvan Dincă Raţ
Ekatnetworkltd	13.Σωτήρης Παπαγιαννόπουλος
Falegkos	13. Στέλιος Μαλεζάς
fidel	Paolo Artico - Γυμναστής Α Ομαδας
free4	36. Mirko Savini
free4	31. Νικόλαος Σκέμπης
free4	16. Dorvalino Alves Maciel "Lino"
free4	71. Παναγιώτης Γλύκος
free4	95.Δημήτρης Πόποβιτς
gash04	7. Nabil El Zhar
gash04	42. Francisco Zuela
gash04	9. Δημήτρης Σαλπιγγίδης
georgedoulk2008	52.Erik Sabo
gergeo4	Răzvan Lucescu
gerrard	27. Mirosław Sznaucner
god4	15. Pablo Andrés Contreras Fica
guardian4	Vladan Ivic
john4serres	80. Τάσος Δημητριάδης
john4serres	60. Γεώργιος Κάκκο
john4serres	Τίμος Τσελεπίδης
john4serres	99. Μάριος Σιαμπάνης
john4serres	44. Αχιλλέας Πούγγουρας
K_geo	10.Djalma Campos
K_geo	21. Χάρης Χαρίσης
K_geo	16. Gojko Cimirot
K_geo	34.Νίκος Κοροβέσης
K_geo	25.Robin Olsen
K_geo	Igor Tudor
K_geo	21. Diego Biseswar
K_geo	18. Δημήτρης Λημνιός
Kostas_Peraia4	5.Fernando Lopes dos Santos Varela
Kostas_Peraia4	6. Dorian Leveque
lefis	21. Vladimir Ivić
lefis	13.Gordon Schildenfeld
lefis	13.Íñigo López Montaña
lefis	81.Μikael Gspurning
lefis	15.Miguel Angelo Leonardo Vitor
Lord	91. Dario Krešić
Lord	2. Αλέξης Αποστολόπουλος
Lord	99.Απόστολος Γιάννου
Mario Jardel	6.Aλέξανδρος Τζιόλης
Mario Jardel	2.Γιάννης Σκόνδρας
moican4	9.Zvonimir Vukić
moican4	99.Sekou Jabateh Oliseh
navigator11	6. Victor José Añino Bermúdez "Vitolo"
nothu	7.Amr Warda
novito	30. Φώτης Κουτζαβασίλης
novito	31. Lucio Filomeno
obanebane	77.Oélilton Araújo dos Santos "Etto"
obanebane	29.Juan Manuel Insaurralde
obanebane	11.Róbert Mak
obanebane	5. Δημήτρης Χατζηισαΐας
obanebane	24. Garry Rodrigues
obanebane	16.Cristhian Noboa
obanebane	11.Pedro Henrique Konzen Medina da Silva
Odi	Igor Tudor II
Odi	18. Δημήτρης Γιαννούλης
olivares	13.Στέλιος Μαλεζάς
paok4ever	8. Bruno Cirillo
paok87	85. Diego Alejandro Arias Hincapié
paok87	11.Miroslav Stoch
paok87	61.Tomáš Necid
paok87	3.Léo Matos
paok87	31.Γιώργος Τζαβέλλας
paokaras_sindos	11. Zlatan Muslimović
PARASANDALOS	7. Γιώργος Γεωργιάδης
PARASANDALOS	10.Juliano Gonçalves Spadacio
PARASANDALOS	60.Leonardo de Jesus Geraldo
PARASANDALOS	7.Γιώργος Γεωργιάδης
pgetsos	7. Mame Baba Thiam
pgetsos	15. José Ángel Crespo
Photis	18. Γιώργος Φωτάκης
Photis	10.Δημήτρης Πέλκας
Photis	77.Δημήτρης Πέλκας
pilotos	9.Aleksandar Prijovic
Santana4	44.Matheus Coradini Vivian
Santana4	10.Lucas Pérez Martínez
Segreto	80. Cristiano Moraes Oliveira
Sera4	Παναγιώτης Κουρδάκης
Sera4	3. Κώστας Σταφυλίδης
Sera4	11. Bertrand Robert
Sera4	6.Δημήτρης Στάμου
Sera4	26. Ergys Kace
Sera4	Χρήστος Ιντζίδης
Sera4	Βασίλης Παπαδόπουλος
Sera4	70.Στέλιος Κίτσιου
Sera4	9.Jairo De Macedo da Silva
sidpanos	3. Anis Boussaidi
sidpanos	22. Αστέριος Γιακουμής
sidpanos	23. Λευτέρης Σακελλαρίου
Sladjan Spasić	1.Jacobo Sanz Ovejero
Sladjan Spasić	96.Παναγιώτης Δεληγιαννίδης
slidar	40.Maarten Martens
slidar	77.Σωτήρης Νίνης
sn0ufel4	28.Evgen Shakhov
sn0ufel4	Vladan Ivic II
sn0ufel4	8.Maurício José da Silveira Júnior
sn0ufel4	Λάζαρος Λάμπρου
sn0ufel4	Aleksandar Stanojevic
sourmenetes	Άγγελος Χαρμάνας
sourmenetes	22.Δημήτρης Κωνσταντινίδης
Steenage	19. Βασίλης Κουτσιανικούλης
Steenage	Abubakari Mohammed
stelyk	Miroslaw Sznaucner - Βοηθός Προπονητή
teacher	93.Terry Antonis
teacher	87.José Alberto Cañas
theo G4	50.Κώστας Παναγιωτούδης
theoPAOK	88.Frédéric Koutou Nimani N'Galou
trelogiatros	33.Στέφανος-Κλάους Αθανασιάδης
tzelas	Μανώλης Πατράλης
vryzas4.	34. Βαγγέλης Γεωργίου
vryzas4.	Λάζαρος Μωυσιάδης
xlebouras	28. Σταύρος Τσουκαλάς
xlebouras	27.Charles Itandje
xlebouras	90.Abdoul Razzagui Camara
xlebouras	66.Bibras Natcho
Yiankos	10. Olivier Sorlin
Yiankos	4. Σωτήρης Μπαλάφας
Yiankos	5. Pablo Gabriel García Pérez
Yiankos	Adelino André Vieira Freitas "Vieirinha"
ZamanFou	Michael Gspurning
Ζαντός	33. Στέφανος - Κλάους Αθανασιάδης ΙΙ
Ζαντός	23. Željko Brkić
Ζαντός	Νικόλας Ματθαίου
Ζαντός	Αντώνης Σταθόπουλος
Τρόμος	39.Χρήστος Ιντζίδης
Τρόμος	30.Bongani Sandile Khumalo
Τρόμος	Στέλιος Λαμπάκης
Τρόμος	50.Sambégou Bangoura
Χωρικός	8.Hedwiges Maduro

Κώδικας: Επιλογή όλων

Dim rp As Integer

Public Sub findgadem(str As String, row_pos As Integer)
Dim http As Object, html As New HTMLDocument, topics As Object, topic As Object
Dim player As String, opener As String, i As Integer
Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "GET", str, False
http.send
html.body.innerHTML = http.responseText
Set topics = html.getElementsByClassName("topictitle")
i = 1 + row_pos
For Each topic In topics
player = topic.innerText
opener = topic.parentElement.LastChild.PreviousSibling.innerText
'Debug.Print player; "-"; opener
Sheets(2).Cells(i, 1).Value = player
Sheets(2).Cells(i, 2).Value = opener
i = i + 1
Next
rp = i
End Sub

Public Sub parsepages()
Dim j As Integer, url As String
rp = 0
For j = 2 To 12
url = Sheets(1).Cells(j, 2).Value
Call findgadem(url, rp)
Next j
End Sub

Κώδικας: Επιλογή όλων

Χωρικός	8.Hedwiges Maduro