Probleme inet

dionysos6868 Messages postés 310 Date d'inscription jeudi 4 septembre 2003 Statut Membre Dernière intervention 9 juin 2005 - 7 mars 2004 à 18:30
dionysos6868 Messages postés 310 Date d'inscription jeudi 4 septembre 2003 Statut Membre Dernière intervention 9 juin 2005 - 9 mars 2004 à 14:06
voici mon code
Private Sub Form_Load()
With Inet1
   .Protocol = icFTP
   .URL = "ftp.membres.lycos.fr"
   .UserName = "******"
   .Password = "******"
   .Execute , "ls"   ' Renvoie le dossier.
End With
Dim dirtxt As String
Do Until Inet1.StillExecuting = False 'boucle pendant inet actif
DoEvents
Loop

dirtxt = Inet1.GetChunk(1024, 0) 'recupere la liste de fichier dans dirtxt
Do Until Inet1.StillExecuting = False 'boucle pendant inet actif
DoEvents
Loop
MsgBox dirtxt
End Sub

je souhaite juste fair un listing des repertoir et fichier qui sont sur mon ftp
mais la ca me renvois un blanc dans ma msgbox.
merci de votre aide

Dionysos

www.hackeinfo.net

2 réponses

dionysos6868 Messages postés 310 Date d'inscription jeudi 4 septembre 2003 Statut Membre Dernière intervention 9 juin 2005 1
7 mars 2004 à 18:30
j'ai essayer aussi execute, "DIR" c'est pareil
Dionysos

www.hackeinfo.net
0
dionysos6868 Messages postés 310 Date d'inscription jeudi 4 septembre 2003 Statut Membre Dernière intervention 9 juin 2005 1
9 mars 2004 à 14:06
Personne pour me repondre snifffffffff
Dionysos

www.hackeinfo.net
0