Discussion :

[coyott]

bonjour je voudrai utiliser dans une fonction un control INET

la fonction est lançée par un autre formualaire que celui possédant le INET et je ne sais pas comment y faire référence voici ce que j'ai fait pour l'instant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Public Function existFileFtp(ByVal PassFtp, _
                             ByVal LogFtp, _
                             ByVal IpFtp, _
                             ByVal szDossier, _
                             ByVal szFile)
 
Dim dirtxt As String
Dim tform As scrutation
With tform.Inet1
.URL = IpFtp
.UserName = LogFtp
.password = PassFtp
.Execute , "dir " & szDossier 'lit le dossier
End With
 
Do Until tform.Inet1.StillExecuting = False 'boucle pendant inet actif
DoEvents
Loop

scrutation étant le nom du formulaire ayant le INet
pour l'instant ca ne fonctionne pas :-( une âme charitable pour m'aider ?

[jmfmarques]

1) ceci n'est pas une fonction (tu lui as donné le nom de fonction mais ce n'en est pas une, mais une simple procédure... à moins que le reste de ton code, invisible ici, ne permette de retourner la valeur de la fonction)
2) tu as le choix entre :
a) passer la form en paramètre de la procédure
b) utiliser directement le nom de la form dans ta procédure