Récupérer les statistiques de Fdjeux.com
cs_bricoleu
Messages postés
6
Date d'inscription
mardi 30 septembre 2003
Statut
Membre
Dernière intervention
14 octobre 2005
-
12 oct. 2005 à 22:19
cs_bricoleu Messages postés 6 Date d'inscription mardi 30 septembre 2003 Statut Membre Dernière intervention 14 octobre 2005 - 14 oct. 2005 à 21:20
cs_bricoleu Messages postés 6 Date d'inscription mardi 30 septembre 2003 Statut Membre Dernière intervention 14 octobre 2005 - 14 oct. 2005 à 21:20
A voir également:
- Statistique loto fdj
- Statistiques loto fdj - Meilleures réponses
- Fdj statistiques loto - Meilleures réponses
- Tableau de loto turbo 2 - Forum VB.NET
- Application de loto turbo 2 - Forum Visual Basic 6
- Turbo assembleur 5.0 - Forum ASM
- TURBO C++ et blocks que choisir ✓ - Forum C
- Systeme reducteur loto foot ✓ - Forum Visual Basic
4 réponses
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
21
13 oct. 2005 à 00:18
13 oct. 2005 à 00:18
Salut, le rapport avec vb ?
Demande à la fdj de te donner un accès direct en live.
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
Demande à la fdj de te donner un accès direct en live.
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
promethee2003
Messages postés
38
Date d'inscription
lundi 8 novembre 2004
Statut
Membre
Dernière intervention
10 décembre 2006
13 oct. 2005 à 06:25
13 oct. 2005 à 06:25
personelement je telecharge le fichier a partire de l'adresse :
http://www.fdjeux.com/generated/dyn/loto/loto.zip
en utilisant un controle "inet". ca marche trés bien (encore je veut dire).
je recupere bien le fichier zip et le decompresse avec zlib.dll.
j'utilise cette methode depuis au moins 6 mois et rien n'à changer.
petit extrait pour le fun :
Dim b() As Byte
Dim strURL As String
strURL = "http://www.fdjeux.com/generated/dyn/loto/loto.zip"
b() = Form1.Inet1.OpenURL(strURL, icByteArray)
Open App.Path & "\loto.zip" For Binary Access Write As #1
Put #1, , b()
Close #1
Set MonZip = New ZipExtractionClass
MonZip.ZipOpen (App.Path & "\loto.zip")
Call MonZip.ExtractAllFiles(App.Path & "", True, False)
Set MonZip = Nothing
Voila !
Bien sur il faut avoir la dll et le .cls qui va avec pour la decompression. Ensuite il reste plus qu'à lire le fichier pour accéder au données ou faire une ouverture avec excel.
http://www.fdjeux.com/generated/dyn/loto/loto.zip
en utilisant un controle "inet". ca marche trés bien (encore je veut dire).
je recupere bien le fichier zip et le decompresse avec zlib.dll.
j'utilise cette methode depuis au moins 6 mois et rien n'à changer.
petit extrait pour le fun :
Dim b() As Byte
Dim strURL As String
strURL = "http://www.fdjeux.com/generated/dyn/loto/loto.zip"
b() = Form1.Inet1.OpenURL(strURL, icByteArray)
Open App.Path & "\loto.zip" For Binary Access Write As #1
Put #1, , b()
Close #1
Set MonZip = New ZipExtractionClass
MonZip.ZipOpen (App.Path & "\loto.zip")
Call MonZip.ExtractAllFiles(App.Path & "", True, False)
Set MonZip = Nothing
Voila !
Bien sur il faut avoir la dll et le .cls qui va avec pour la decompression. Ensuite il reste plus qu'à lire le fichier pour accéder au données ou faire une ouverture avec excel.
cs_bricoleu
Messages postés
6
Date d'inscription
mardi 30 septembre 2003
Statut
Membre
Dernière intervention
14 octobre 2005
13 oct. 2005 à 21:47
13 oct. 2005 à 21:47
Merci à tous,
CanisLupus: j'ai demandé un accés FTP à FDJ. La réponse a été non
Promethee2003 : Je connais ce controle, il me semblait avoir essayé.
Je vais retenter.
Je vous tiens au courant...
Bricoleu reconnaissant...
CanisLupus: j'ai demandé un accés FTP à FDJ. La réponse a été non
Promethee2003 : Je connais ce controle, il me semblait avoir essayé.
Je vais retenter.
Je vous tiens au courant...
Bricoleu reconnaissant...
cs_bricoleu
Messages postés
6
Date d'inscription
mardi 30 septembre 2003
Statut
Membre
Dernière intervention
14 octobre 2005
14 oct. 2005 à 21:20
14 oct. 2005 à 21:20
Bon ca fonctionne. Merci à V et aux autres.
A+
Bricoleu heureux
A+
Bricoleu heureux
