Discussion :

[cladchildren]

Bonjour alors voila j'ai un problème :
je veux créer une page d'identification en Vb.net (2010) :
j'ai une textbox(txtID) ou l'on doit rentrer son identifiant
j'ai ensuite une page inscription ou un client s'inscrit entre ses infos perso et ensuite son identifiant ( sur la page inscription et enregistrement tous va bien )

Le problème est comment réaliser une égalité entre le contenu de la textbox et le contenu du fichier xml

Comme il y a plusieurs clients j'ai penser faire un "For each " pour parcourir tous les elements du fichiers xml et de faire une reconnaissance entre le contenu entrer par le client dans Identifiant avec le contenu xml

ps: il en va de même pour le mot de passe


Merci pour l'aide

[franticfranz]

Comme il y a plusieurs clients j'ai penser faire un "For each " pour parcourir tous les elements du fichiers xml et de faire une reconnaissance entre le contenu entrer par le client dans Identifiant avec le contenu xml

Je ne suis pas sûr que ça réponde au problème (je ne le décrypte pas bien) : Le plus simple est peut-être de lire le fichier XML avec un dataset et la méthode readxml(), puis de parcourir la datatable "ID" pour vérifier si un login correspond...

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
        Dim ds As DataSet
        Dim dt As DataTable
        Dim i As Integer
 
        ds.ReadXml("clients.xml")
        dt = ds.Tables("Client")
        If Not dt Is Nothing Then
            For i = 0 To dt.Rows.Count - 1
                If (dt.Rows(i).Item("ID") = txtID.Text) Then
                    If (dt.Rows(i).Item("Pass") = txtMDP.Text) Then
                        MsgBox("Bingo ! L'utilisateur est authentifié !")
                    End If
                End If
            Next i
        End If

[cladchildren]

Tout d'abord merci pour ta réponse rapide.
Mais un problème intervient ^^' :

Avertissement 1 La variable 'ds' est utilisée avant qu'une valeur ne lui ait été assignée. Une exception de référence null peut se produire au moment de l'exécution. C:\****\*****\*****\visual studio 2010\Projects\PtiEvenemmentielle\Identification.vb 10 9 PtiEvenemmentielle

Voici l'erreur , sinon le code a l'air correct, sais-tu comment la resoudre ?

[franticfranz]

Oups! Toutes mes excuses... Remplacer la première ligne

Code :

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

        Dim ds As DataSet

par

Code :

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

       Dim ds As DataSet = new Dataset()

[cladchildren]

On y est presque =)
j'ai essayer quelques truc mais ça marche pas et maintenant l'erreur est celle -ci :/

Merci encore pour l'aide !

[chrismonoye]

Bonsoir,
et en essayant (problème de Cast) :

Code :

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

If (dt.Rows(i).Item("ID").ToString = txtID.Text) Then

[cladchildren]

Un très grand MERCI !! a vous 2
j'ai rajouter le .Tostring a textID et txtPass et ça marche !