Action Boutton

[John36mx]

Bonjour,

J'aimerais savoir si il est possible de donner un moyen de telechargeent quand on clique sur le bouton.

Par exemple je met un bouton et je veut que quand on clique dessus, on télécharge le dossier.

Merci

[gnozal]

En appliquant le principe expliqué dans ton post précédent, lorsqu'on clique sur le bouton, utilise les fonctions de la bibliothèque HTTP comme ReceiveHTTPFile ou de la bibliothèque FTP.

[John36mx]

Pourrai tu me donner un exemple de CODE stp

[SpaceMan]

Pourrai tu me donner un exemple de CODE stp

exemple fait à la va vite... à tester

Code : Tout sélectionner

Enumeration 
#fenetre 
#Web_Gadget 
#telecharger 
EndEnumeration 

If OpenWindow(#fenetre,0,0,800,450,"WebGadget",#PB_Window_SystemMenu|#PB_Window_ScreenCentered) 
  WebGadget(#Web_Gadget,10,10,780,380,"http://www.purebasic.com") 
  ButtonGadget(#telecharger,300,400,130,25,"Télécharger Office.png") 
  ; Note: si vous désirez utiliser un fichier local, changez le dernier paramètre en "file://" + chemin + nomdufichier 
  InitNetwork()
  
  Repeat 
     
    Event = WaitWindowEvent()  
    GadgetID = EventGadget() 
    If Event = #PB_Event_Gadget 
      If GadgetID = #telecharger 
          NomDeFichier$ = SaveFileRequester("Enregistrer sous", "Office.png", "Image|*.png", 0) 
        If ReceiveHTTPFile("http://hashdesign.freehostia.com/Downloads/Office.png", NomDeFichier$) 
            Debug "Succès" 
            SetGadgetText(#telecharger,"Téléchargement en cours")
          Else 
            Debug "Erreur" 
        EndIf 
            SetGadgetText(#telecharger,"Téléchargement terminé")
      EndIf 
    EndIf 
  Until Event = #PB_Event_CloseWindow 
EndIf

[John36mx]

Non lol cela ne marche pas

[John36mx]

Lol non cela ne marche pas et j'ai essayer de bidouiller mais rien

[Backup]

oula !!

Code : Tout sélectionner

Repeat
    InitNetwork() 

un init dans la boucle ???

[poshu]

De toutes façons, laissez le se sortir un peu les doigts du cul: il ne fait aucun effort pour le moment; il est pire que moi qui n'utilise pas la fonction search du forum >.<;

[MetalOS]

Moi qui trouve que j'en demande trop dé fois sur le forum je vois qu'il y à pire que moi

[SpaceMan]

C'est vrai qu'au début on a tendance à tout demander, mettons lui de l'au à la bouche et il verra qu'ici on fait d'abord des efforts ensuite on pose des questions...

Maintemant ça devrait marcher !
Remarque que si tu essaies de télécharger depuis un site redirectionné ça ne marchera pas.
Voir mon poste précédent