marty14
Messages postés104Date d'inscriptionlundi 21 août 2006StatutMembreDernière intervention29 mai 2011
-
30 juin 2009 à 04:13
marty14
Messages postés104Date d'inscriptionlundi 21 août 2006StatutMembreDernière intervention29 mai 2011
-
1 juil. 2009 à 15:08
Bonjour,
Est il possible de faire tourner ce code 10 fois d'affiler
tout en changeant le nombre de course d'inscrit
EX premiere execution scourse 1 Pcourse 2
EX deuxieme execution scourse 2 Pcourse 3
S = InStr(1502, gg, "Course 6 :")
P = InStr(1620, gg, "Course 7 :")
If P False Then P InStr(i + 1, gg, "Réunion 2")
Form1.Text11.Text = Mid(gg, S, P - (S + 5))
If InStr(1, Form1.Text11.Text, (" 1,1 ")) Then MsgBox "bravo"
If (Exists(" 14 partants ") Or Exists(" 15 partants ") Or Exists(" 16 partants ") Or Exists(" 17 partants ") Or Exists(" 18 partants ") Or Exists(" 19 partants ") Or Exists(" 20 partants ")) _
And _
(Exists(" 1,6 ") Or Exists(" 1,5 ") Or Exists(" 1,4 ") Or Exists(" 1,3 ") Or Exists(" 1,2 ") Or Exists(" 1,1 ")) Then
MsgBox "bravo"
Beep
End If
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 1 juil. 2009 à 14:17
concernant le code depuis l'URL, a toi de jouer, visiblement, tu as déjà le code pour récupérer le code source d'une page.
mon code va analyser le contenu HTML (réunions, courses et participants) afin de remplir un tableau de structures, nommé mxtReunions qui te permet d'accéder à tout ce petit monde.
une RegExp ? voir le code de ce genre:
"Course \d+ : (.+?)\r[\s\S]*?(\d+H\d+),[\s\S]*?(<table[\s\S]+?</table>)[\s\S]+?(\d+:\d+)"
ca permet d'extraire rapidement et efficacement du code.
plus besoin de Instr, donc. j'ignore ce que tu souhaites faire de ces résultats, mais bon....
ajoutes 'Stop' après l'appel à LoadPage, ajoutes mxtReunions dans les espions et observe son contenu...
marty14
Messages postés104Date d'inscriptionlundi 21 août 2006StatutMembreDernière intervention29 mai 2011 1 juil. 2009 à 14:18
pcpt
j'ai fait un copier coller du code recu, tout dans une form, le programme demare bien mais j'ai form vierge sans tableau sans rien!
dois je ajouter des objets sur ma form ?
marty14
Messages postés104Date d'inscriptionlundi 21 août 2006StatutMembreDernière intervention29 mai 2011 1 juil. 2009 à 14:33
houlaaa !! bon j'ai compris que mxtReunions recolte certaines informations.
Admettons que je souhaite afficher les informations dans un textbox, je fais comment ?
En tout cas merci beaucoup rendfield pour ce code.
Est ce que mxtReunions contient les cotes aussi ?