cs_ocealand
Messages postés6Date d'inscriptionvendredi 29 août 2008StatutMembreDernière intervention24 septembre 2008
-
5 sept. 2008 à 09:46
cs_ocealand
Messages postés6Date d'inscriptionvendredi 29 août 2008StatutMembreDernière intervention24 septembre 2008
-
23 sept. 2008 à 14:25
Bonjour,
J'ia une textebox et un controle INET.
j'arrive bien a me connecter(ouvrir ma session) et donc me situer par défaut à la racine de mon FTP. mais 'arrive pas a ouvrir un sous dossier et me positionner dedans :
voici mon code pour lire qd je suis donc a la racine
------------------------------
Public Sub netFTP_StateChanged(ByVal state As Integer)
Dim vntDonnées As Variant
Dim strDonnées As String
Select Case state
Case icError
txtDonnées.Text = "Erreur : " & netFTP.ResponseInfo
Case icResponseCompleted
vntDonnées = netFTP.GetChunk(1024, 0)
Do Until Len(vntDonnées) = 0
strDonnées = strDonnées & vntDonnées
vntDonnées = netFTP.GetChunk(1024, 0)
DoEvents
Loop
txtDonnées.Text = strDonnées
End Select
End Sub
-------------------------
et je rajoute un bouton pôur changer mon sous dossier :
'j'essaye de changer de dossier
NetFTP.Execute , "cd toto" 'lit la racine du ftp dans le sous dossier toto
Do Until netFTP.StillExecuting = False 'boucle pendant inet actif
DoEvents
Loop
Ca me met a chaque fois erreur : execution de la derniere requete. j'arrive donc pas ea me deplacer ds un sous repertoire et a l'afficher ds ma textbox .
Comment faire ? comment s'utilise la fonction CD exactement( avec un exemple précis) comment faire opour afficher les ficheirs ?
j'ai beau tout essayer j'y arrive pas . quelqu'un peut m'aider ?