Discussion :

[vazer7070]

Bonjour,

Voilà, je souhaites compter le nombre de fichiers contenu dans un dossier sur mon ftp et l'afficher sur un link label.
Le souci est que le string m'affiche toujours "4", quelque soit l'uri de destination, je ne comprend pas où il va me chercher ce chiffre.
Voici le code :

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
20
21
22
Sub invit()
        Dim url As String = "ftp://185.22.110.20/public_html/Friend/" & My.Settings.user & "_invit/"
        Try
            Dim nim As String
            Dim request As FtpWebRequest
            Dim response As FtpWebResponse
            request = CType(WebRequest.Create(url), WebRequest)
            request.Credentials = New NetworkCredential("user", "pass")
            request.Method = WebRequestMethods.Ftp.ListDirectory
            response = CType(request.GetResponse(), FtpWebResponse)
            nim = request.Method.Count
            If nim > "0" Then
                LinkLabel2.Enabled = True
                LinkLabel2.Text = "Vous avez " & nim & " nouvelle(s) invitation(s)."
            Else
                LinkLabel2.Enabled = False
                LinkLabel2.Text = "Pas de nouvelles invitations"
            End If
        Catch ex As Exception
            LinkLabel2.Text = ex.Message
        End Try
    End Sub

Ou se situe l'erreur SVP.?

Merci d'avance de votre aide.
Cordialement
Vazer7070

[Pol63]

= request.method.count

request.method, c'est la méthode à utiliser (list dans ton cas) c'est sur une enum, et listdirectory vaut 4 (car une enum ca permet de lier un string à une valeur pour une utilisation lisible)

c'est response qu'il faut lire et parser

[vazer7070]

D'accord, alors j'ai mis ça :

Code :

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

1
2
3
4
5
Dim readuser As StreamReader = New StreamReader(response.GetResponseStream)
            While (readuser.Peek() > -1)
                okuser = readuser.ReadLine
            End While
            nim = okuser.Count

mais sur le dernier "okuser", ça me met que aucune valeur ne lui est assigné, et même si je met cette ligne dans le "while"

[Pol63]

va lire quelques tutos sur c# avant de coder, parce que là tu improvises et ca se voit

[vazer7070]

tu en aurais en lien avec mon souci.?

[Pol63]

ton soucis c'est que tu ne connais pas le langage et son fonctionnement, et tu ne sais pas comment débugger
parce qu'avec un point d'arret et un peu de shift f9 en 2 minutes tu trouverais quoi écrire