Vb2005 comment annuler une action

Version imprimable

Bonsoir à tous.
Je cherche à creer une action annulé la dernière action. d'après mes recherches sur le forum il semble que se soit l'instruction e.cancel qui le fasse mais le souci c'est que mon bouton ne me le propose pas voici mon code
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 Private Sub BindingNavigatorDeleteItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BindingNavigatorDeleteItem.Click Try Dim rep As Integer rep = MsgBox("Vous allez supprimer cette info. Confirmez-vous la suppression?", MsgBoxStyle.Critical + MsgBoxStyle.YesNo, "Suppression Enregistrement") If rep = vbYes Then 'on supprime else 'on ne supprime pas End If Catch ex As Exception MsgBox(ex.ToString) End Try End Sub
Seulement le hic c'est que je ne sais pas comment on dit "on supprime" et "on ne supprime pas".
Alors est ce quelqu'un aurait une idée?

27/04/2007, 23h15
hellspawn_ludo
Bonsoir Herlece,

Juste un petit truc concernant ton IF :
Code:

1 2 3 4 5 6 7 If rep = vbYes Then 'on supprime else 'on ne supprime pas End If
Si tu es dans le cas du ELSE cela veut dire que tu as répondu non à ta msgbox par concéquent il ne se passe rien. Donc pas besoin de code pour dire que tu ne supprime rien. :roll:
27/04/2007, 23h31
Herlece
Citation:
Envoyé par hellspawn_ludo

Bonsoir Herlece,

Juste un petit truc concernant ton IF :

Code:

1 2 3 4 5 6 7 If rep = vbYes Then 'on supprime else 'on ne supprime pas End If

Si tu es dans le cas du ELSE cela veut dire que tu as répondu non à ta msgbox par concéquent il ne se passe rien. Donc pas besoin de code pour dire que tu ne supprime rien. :roll:
Citation:

Beh malheureusement que je réponde oui ou non la suppression se fait quand même.
28/04/2007, 00h28
hellspawn_ludo

Je viens de regarder mais malheureusement je n'ai pas trouvé.

Effectivement les éléments s'effacent mais quand on ferme l'appli et qu'on la relance, ils sont toujours là. Rien à été supprimé.

Désolé.
28/04/2007, 00h39
Herlece

Citation:

Envoyé par hellspawn_ludo

Je viens de regarder mais malheureusement je n'ai pas trouvé.

Effectivement les éléments s'effacent mais quand on ferme l'appli et qu'on la relance, ils sont toujours là. Rien à été supprimé.

Désolé.

Citation:

Je continu de chercher sur MSDN ils parlent de la méthode UNDO mais je ne comprend pas vraiment comment l'utiliser
28/04/2007, 15h35
Herlece

Personne n'a d'idée????:cry:
02/01/2008, 04h16
Herlece

Bon je ne sais toujours pas comment on fait mais je cloture le post en résolu
03/01/2008, 13h26
zoaax

Bonjour,

si tu utilises un bindingnavigator, c'est que tu utilises un bindingsource.
Dans ce cas, tu peux faire:

Code:

tonBindingSource.CancelEdit()

Bye
03/01/2008, 14h51
mickmix69

Ca marche le Vbyes ?? ou le Vbno ?

D'apres mes souvenirs je crois qu il faut utiliser msgboxresult...du style :

Code:

If MsgBox("voulez vous continuer ?", MsgBoxStyle.YesNo) = MsgBoxResult.No then.....

Je peux me montrer et on peut peut etre utiliser les deux méthodes....

En fait quel que soit le méthode qu'on utilise le résultat est le même la l'enregistrement est effacé du form on ne peut la réafficher que si on ne fait pas un update. Lorsqu'on ferme le form et qu'on l'ouvre de nouveau on retrouve l'enregistrement.

Code:

1
2
3
4
5
6
7
8
9
10
11
Dim Rep As Windows.Forms.DialogResult
        RowNumber = Me.FournisseursBindingSource.Position
        Rep = MessageBox.Show("ANNULER", "SUPPRIMER", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If Rep = Windows.Forms.DialogResult.No Then
            Me.FournisseursBindingSource.CancelEdit()
            Me.OsteriaDataSet.Clear()
            Filldata()
            Me.FournisseursBindingSource.Position = RowNumber
        Else
            Me.FournisseursBindingSource.EndEdit()
        End If

03/01/2008, 18h49
Totanne

Je débute en .net et la databinding est pour moi aussi exotique qu' un plat chinois ... aussi ne m'en veut pas si je dis une connerie !
pour annuler l'évenement as tu essayé ceci ?

Code:

e = System.EventArgs.Empty

Si c'est une connerie, les explications ne sont pas de refus...
03/01/2008, 18h59
Herlece

Beh je viens d'essayer et c'est pareil qu'avant merci quand même.
03/01/2008, 18h59
Bluedeep

Citation:

Envoyé par Totanne

Si c'est une connerie, les explications ne sont pas de refus...

C'en est une ;), et pour deux raisons (qui n'ont rien à voir avec le DataBinding d'ailleurs) :

- e n'est pas passé par référence mais par valeur, donc modifier localement sa référence revient à pisser dans un violon.

- certains évènements ont en effet, comme paramètre "e", une classe héritée d'EventArgs avec une propriété Cancel qui peut être mise à true, pour annuler certaines action(c'est souvent le cas des events BeforeKelkchoz) ce n'est pas le cas de celui-ci, qui utilise la classe EventArgs "de base".

J'avai mis cette discussion en résolu mais maintenant j'ai trouvé la solution alors je la met au cas ou sa peut servir à quelqu'un
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Dim Rep As Windows.Forms.DialogResult RowNumber = Me.CompoMenuBindingSource.Position Rep = MessageBox.Show("ETES-VOUS CERTAIN DE VOULOIR SUPPRIMER CET ENREGISTREMENT?", "SUPPRIMER", MessageBoxButtons.YesNo, MessageBoxIcon.Question) If Rep = Windows.Forms.DialogResult.No Then Me.CompoMenuBindingSource.CancelEdit() Me.OsteriaDataSet.Clear() FillData() Me.CompoMenuBindingSource.Position = RowNumber Else Me.CompoMenuBindingSource.EndEdit() End If
En fait rien de bien particulier sur le code mais c'est l'endroit ou le mettre qui compte à savoir sur la propriété MouseUp du BindingNavigatorDeleteItem.:)

15/01/2008, 08h51
zoaax

Et pourquoi pas sur le click du bouton ?
Et à quoi ça sert

Code:

RowNumber = Me.CompoMenuBindingSource.Position

Bye
15/01/2008, 09h47
Herlece

Parce que sur le clic l'enregidtrement disparaît quand même donc sa ne sert à rien de demander confirmation.

Code:

RowNumber = Me.CompoMenuBindingSource.Position

c'est une variable qui garde la position de l'enregistrement pour se repositionner dessus si on est sur l'enregistrement 4 par exemple on revient dessus mais sa ne fonctionne pas dans ce context j'ai oublié de le supprimmer.
15/01/2008, 09h51
zoaax

Citation:

Parce que sur le clic l'enregidtrement disparaît quand même donc sa ne sert à rien de demander confirmation

Tu as retiré le toolstripitem delete du bindingnavigator ?

Bye
16/01/2008, 09h55
Herlece

Non je n'ai rien retiré mais pourquoi?
16/01/2008, 13h27
zoaax

Bonjour,

le bindingnavigator possède plusieurs boutons dont un bouton delete. Par défaut lorsque l'utilisateur clique sur ce bouton la méthode RemoveCurrent du bindingsource associé est automatiquement exécuté.
Vu que toi tu souhaites personnaliser l'evenement click de ce bouton, tu dois supprimer le bouton delete de la propriété deleteitem du bindingnavigator. Apparemment tu ne l'as pas fait puisque tu dis que sur l'evenement click l'élément courant est supprimé.

Bye