Discussion :

[babylonsurfer]

Bonsoir,

je me reprend doucement VB apres une longue pause dans le developpement...

Mon code presente une erreur sur la mise a jour d'une table.

L'extrait du code qui me pose probleme :

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
23
24
25
26
27
28
29
30
31
Private Sub Bt_Create_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bt_Create.Click
        UserName = Tx_UserName.Text
        UserFirstName = Tx_UserFirstName.Text
        a = Rb_Group1.Checked
        b = Rb_Group2.Checked
        c = Rb_Group3.Checked
 
        UserId = UserFirstName & "." & UserName
        UserMdp = UserId
        UserGroup = 0
 
        While UserGroup = 0
            If a Then
                UserGroup = "1"
            ElseIf b Then
                UserGroup = "2"
            ElseIf c Then
                UserGroup = "3"
            Else
                UserGroup = "2"
                'Fo_Group.Show()
            End If
        End While
 
        Cmd.Connection = Cnx
        Cnx.Open()
        Cmd.CommandText = "INSERT INTO [User] (UserId, UserName, UserFirstName, UserMdp, UserGroup) VALUES ('" & apos(UserId) & "', '" & apos(UserName) & "', '" & apos(UserFirstName) & "', '" & apos(UserMdp) & "', '" & apos(UserGroup) & "')"
        Cmd.ExecuteNonQuery()
        Cnx.Close()
 
    End Sub

C'est apparemment Cmd.ExecuteNonQuery() qui bloque (renvoi d'une exception, mais je ne les gere pas)

Je ne suis pas sur que le message soit place au bon endroit mais bon...

Je vous remercie tres vivement de votre aide pour ce soucis !

[babylonsurfer]

C'est bon : l'exception retourne venez de la longueur de la clef primaire UserId...

Solve.

[babylonsurfer]

Bonjour,

je reviens a la charge avec un autre probleme.

Le clic sur bouton doit creer une entree dans une table (cf le code ci-dessus).

Si tout est bien renseigne, la table est mise a jour.

Mais si aucun bouton radio n'est selectionne, je souhaite qu'un autre formulaire s'ouvre avec l'obligation de la selection du group (choix entre 3 bouton radion).

Lorsque je lance le debug et que l'on arrive sur cette partie du code (le Else du While, pour lequel j'ai enleve le commentaire), ca plante, il m'ouvre 2 fois le formulaire Fo_Group, pas de reponse, et le contenu du formulaire ne s'affiche pas (un peu comme si il n'arrivait pas a entrer dedans) pourtant le contenu n'est pas extraordinaire (de toute facon meme vide ca plante...).

Je vous remercie d'avance de vos remarques et pistes de reflexion !

[babylonsurfer]

Un ptit up !

A votre bonté !

[babylonsurfer]

Bon !

Voila un deuxieme probleme resolu !

Ca aide vraiment de laisser des messages sur un forum : ca permet de reflechir lorsque l'on a pas de reponse !

Pour la petite histoire ca boucle a mort avec ce code, mais apres quelques modif, ca ne boucle plus !

Je vous remercie de votre aide precieuse ! Un message, meme compatissant, aurait ete le bienvenu !

Bon debug et bonne nuit a tous !