Bonjour,

Je veux surveiller le trafique de fichier sur un serveur ftp. J'ai un script qui me liste les fichiers sur ce serveur puis qui se met en pause 10 minutes, liste de nouveau les fichiers, se met en pause, etc. Le problème c'est que la méthode que j'utilise me renvoie toujours la même liste de fichier, même si celle-ci a effectivement changé.

Voici la fonction qui me renvoie la liste de fichiers :
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
 
Private Function ftpList(strFTPlocation, strUser, strPassword)
    Dim myShell
    Dim strConnect
 
    set ftpList = nothing
 
    Set myShell = CreateObject("Shell.Application")
    If strUser <> "" Then strConnect = strUser & ":" & strPassword & "@"
    Set ftpList = myShell.Namespace("FTP://" & strConnect & strFTPlocation).Items
	'''''
	debugFileList ftpList
	'''''
	set myShell = Nothing
 
End Function
Pour voir la mise à jour de cette liste, il faut que j'arrete mon script puis que je le relance... Ne voulant pas utiliser de planificateur de tâche pour lancer régulièrement ce script, je suis un peu coincé.

Une idée ?