FTP UPLOAD ET DOWNLOAD QUI MARCHE , UTILISATION DE INET , FICHIER ZIP !
skyghis
Messages postés
25
Date d'inscription
mardi 13 août 2002
Statut
Membre
Dernière intervention
26 septembre 2004
-
27 oct. 2002 à 02:09
cs_ym_trainz Messages postés 160 Date d'inscription vendredi 27 janvier 2006 Statut Membre Dernière intervention 21 avril 2015 - 6 déc. 2008 à 10:28
cs_ym_trainz Messages postés 160 Date d'inscription vendredi 27 janvier 2006 Statut Membre Dernière intervention 21 avril 2015 - 6 déc. 2008 à 10:28
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/4901-ftp-upload-et-download-qui-marche-utilisation-de-inet-fichier-zip
https://codes-sources.commentcamarche.net/source/4901-ftp-upload-et-download-qui-marche-utilisation-de-inet-fichier-zip
6 déc. 2008 à 10:28
J'ai ajouté un Inet1.Cancel à la fin de chaque UL / DL car si on ne réinitialise pas le inet, impossible de UL / DL à nouveau.
Donc, on peut insérer ce Inet1.Cancel dès que (.state)"Transfert : OK"
et ajouter un bouton pour réinitialiser.
En tous cas, simple et efface, merci ! 10
Cordialement,
ym_trainz
28 nov. 2007 à 14:27
A noté que pour le dossier du ftp, le signe de la racine n'est pas "" mais "/". DOnc pour uploader un fichier par exemple, il faut noté dans la destination "/nomdufichier"
2 mars 2007 à 12:35
16 août 2006 à 20:17
merci d avance
1 juin 2006 à 10:56
10/10 ;-)
4 avril 2006 à 19:41
erreur 35764 execute toujours la derniere requete. voici mon code
Public Sub send( _
Inet1 As Inet, _
url As String, _
user As String, _
password As String, _
source As String, _
destination As String _
)
With Inet1
.url = url
.UserName = user
.password = password
.Execute , "PUT " & source & " " & destination
End With
End Sub
Private Sub BtnPlacer_Click()
Dim destination As String
Dim Origine As String
Dim i As Integer
login = GestionDonnées.RécupérationCompteUtilisateur()
pass = GestionDonnées.RécupérationMotDePasse()
ftp = GestionDonnées.RécupérationAdresseFTP()
'pour chaque fichier transferer sur ftp
For i = 0 To File1.ListCount - 1
Origine = File1.Path & "" & File1.List(i)
destination = File1.List(i)
Call send(Inet1, ftp, login, pass, Origine, destination)
Next i
End Sub
la methode execute est elle approprié pour transferer plusieurs fichiers?
6 août 2004 à 16:44
6 août 2004 à 16:35
text7 sa sarai plutot le fichier de destinnation
6 août 2004 à 15:43
.URL = ("ftp://" & Text2 & ":" & Text3 & "@" & Text1)
.Execute , ("GET " & Text6 & " " & Text7)
End With
text2 => nom de l'user ( anonyme qlq a une idée ? )
text3 => password de l'user
text1 => nom du serveur ( ftp.bidulechouete.fr )
text6 => nom du fichier a recupere
text7 => aucune idée ( mais je suspecte un "HTTP 1.1/1" )
6 août 2004 à 15:32
6 août 2004 à 15:32
4 févr. 2004 à 13:51
Petit inconvénient, Lorsque j'active le partage de connexion Internet, ça ne marche plus , même en changeant la propriété inet1.AccessType
Est-ce que qqn s'est penché sur le problème ?
Pour la progressBar, on se débrouillera, t'inquiète...
SB
5 oct. 2003 à 17:11
Mais bon pour l'instant je cherche un code capable de controler le debit d'upload ou alors de calculer le debit.
5 mai 2003 à 00:04
16 févr. 2003 à 02:05
10 févr. 2003 à 00:47
26 déc. 2002 à 17:35
27 oct. 2002 à 18:52
27 oct. 2002 à 14:25
Upload PC------> SERVEUR
Download SERVEUR---------->PC
27 oct. 2002 à 10:34
sinon downloader=télécharger (transfert du serveur au pc) et uploader c'est l'inverse (transfert du pc au serveur)
27 oct. 2002 à 10:22
merci!!
megadebutant
27 oct. 2002 à 02:09
oula cela fai mal O yeux !!!!
uploader EST celui ci plz !!!!
sinon, code simple ki poura surement aider les débutants =)
perso, pas de Inet1 pour moi, Winsock powa =P