PROBLEME VISUAL BASIC 5.0

PROBLEME VISUAL BASIC 5.0 - Programmation

Marsh Posté le 13-03-2002 à 14:45:05    

bon voilà, g crée une form
j'y ai inséré a l'intérieur une rich text box,
et un internet tranfert control
g ensuite double cliké sur la form et j'y é copié ce code
 
Private Sub Form_DblClick()
Inet1.AccessType = icUseDefault
RichTextBox1.Text = Inet1.OpenURL _
(InputBox("URL", , "ftp://ftp.membres.lycos.fr/" ))
 
comme indiké ds l'exemple
---------------------------
The example uses the OpenURL method to retrieve the directory of an FTP server. To try the example, place an Internet Transfer control and a RichTextBox control on a form. Paste the code into the Declarations section. Press F5 to run the example, and double-click on the form.
 
Private Sub Form_DblClick()
Inet1.AccessType = icUseDefault
RichTextBox1.Text = Inet1.OpenURL _
(InputBox("URL", , "ftp://ftp.microsoft.com" ))
End Sub
 
 
------------------------
 
 
une fois le programme démarré en faisant un double click sur la form il me vient une fetre en me confirment l'adresse a l'aquelle il va se coneter, apres avoir fait ok , la rich text box se vide et rien ne s'affiche.(alors kil devrai y avoir mes fichiers)
 
je aussi pris soin de mettre mon login et mot de passe du ftp ds les propriétés du Internet Transfer control..
 
Avez vous une idée de comment résoudre ce problème ?

Reply

Marsh Posté le 13-03-2002 à 14:45:05   

Reply

Marsh Posté le 13-03-2002 à 16:11:56    

svp...

Reply

Marsh Posté le 13-03-2002 à 18:22:54    

personne peut m'aider

Reply

Marsh Posté le 13-03-2002 à 19:16:49    

pour le FTP, ne passe pas par inet qui esrt un controle synchrone (il bloque l'appli pendant qu'il fait ses fonctions).
Utilise k-ftp qu iest gratuit et asynchrone (dispo sur mon site)

Reply

Marsh Posté le 13-03-2002 à 19:21:05    

william10 a écrit a écrit :

bon voilà, g crée une form
j'y ai inséré a l'intérieur une rich text box,
et un internet tranfert control
g ensuite double cliké sur la form et j'y é copié ce code
 
Private Sub Form_DblClick()
Inet1.AccessType = icUseDefault
RichTextBox1.Text = Inet1.OpenURL _
(InputBox("URL", , "ftp://ftp.membres.lycos.fr/" ))




Pourquoi plusieurs topics avec la même question  :??:  
Y a déjà assez à lire sans faire tout 3 fois  :(

 

[jfdsdjhfuetppo]--Message édité par AlainTech--[/jfdsdjhfuetppo]

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed