cs_bidouille007
Messages postés257Date d'inscriptionjeudi 11 septembre 2008StatutMembreDernière intervention22 décembre 20121 7 déc. 2010 à 19:55
personne ne sait pour le n° de port et l'hote ?
cs_zozo14
Messages postés46Date d'inscriptionjeudi 2 novembre 2006StatutMembreDernière intervention 5 juin 2010 5 déc. 2010 à 22:42
En général le port n'est pas demandé. C'est le serveur FTP qui le définira.
L'appel du upload, pour répondre à ta question :
My.Computer.Network.UploadFile(fichlocal (c:/rep/tonfichier), fichdistant (ftp://ftpperso.free.fr/nomdistant) , identifiant, mot de pass, True (avec barre de progression visible) , 30000 (délai avant deconnexion en ms))
cs_bidouille007
Messages postés257Date d'inscriptionjeudi 11 septembre 2008StatutMembreDernière intervention22 décembre 20121 1 déc. 2010 à 12:05
bonjour zozo14
je me posais juste la question du port pour le ftp se définit où et l'hôte genre pour free ftpperso.free.fr on le met à quel endroit ?
sinon le code est suffisamment concis pour être compréhensible.
cs_zozo14
Messages postés46Date d'inscriptionjeudi 2 novembre 2006StatutMembreDernière intervention 5 juin 2010 30 nov. 2010 à 11:48
j'ai trouvé sur le net un test de connection trés fiable :
Private Function TestConnection() As Boolean
'à partir de Vista
Dim g As System.Guid = New System.Guid("{DCB00C01-570F-4A9B-8D69-199FDBA5723B}")
Dim networkListManager As Object = Activator.CreateInstance(Type.GetTypeFromCLSID(g))
Return networkListManager.IsConnectedToInternet()
End Function
7 déc. 2010 à 19:55
5 déc. 2010 à 22:42
L'appel du upload, pour répondre à ta question :
My.Computer.Network.UploadFile(fichlocal (c:/rep/tonfichier), fichdistant (ftp://ftpperso.free.fr/nomdistant) , identifiant, mot de pass, True (avec barre de progression visible) , 30000 (délai avant deconnexion en ms))
1 déc. 2010 à 12:05
je me posais juste la question du port pour le ftp se définit où et l'hôte genre pour free ftpperso.free.fr on le met à quel endroit ?
sinon le code est suffisamment concis pour être compréhensible.
30 nov. 2010 à 11:48
Private Function TestConnection() As Boolean
'à partir de Vista
Dim g As System.Guid = New System.Guid("{DCB00C01-570F-4A9B-8D69-199FDBA5723B}")
Dim networkListManager As Object = Activator.CreateInstance(Type.GetTypeFromCLSID(g))
Return networkListManager.IsConnectedToInternet()
End Function