VB6:

Fermé
minoula2006 - 13 oct. 2009 à 10:53
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 13 oct. 2009 à 17:31
Bonjour,
j'ai un pg en vb6 quii gere le parck informatique de notre administration:
quand je veut faire l'ajout d'un matériel mais je ne fé pas la saisie les champs texte son vide et je click sur sortir(c a dire unload)un msg d'erreur:impossible d'inserer une ligne vide elle doit au moins comporter une valeur de colonne .

Private Sub Form_Unload(Cancel As Integer)
If indic = 1 Then
   Enregistrer RsMat
   indic = 0
Else
   If VarMAJ = "A" Then
      RsMat.UpdateBatch
      RsMat.Delete
   End If
End If
End Sub


j'ai changer mon code :
Private Sub Form_Unload(Cancel As Integer)
If indic = 1 Then
   Enregistrer RsMat
   indic = 0
Else
   If VarMAJ = "A" Then
      Text1.Text = 0
      Text2.Text = 0
      RsMat.UpdateBatch
      RsMat.Delete
   End If
End If
End Sub

ca na pa marcher car j'ai ajouter une valeur nul en bouble (clé primaaire)
????
aidez moi plzz
A voir également:

7 réponses

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
13 oct. 2009 à 11:40
Bonjour,

Je ne comprends pas pourquoi il y a un Update ou un Delete dans un Form_Unload().

Le Form_Unload() gère le clic sur la croix en haut à droite d'un formulaire.

Bref, il faut mettre une condition :
If VarMAJ = "A" Then
      If Text1.Text = "" Then Exit Sub
         '...
         RsMat.UpdateBatch
         RsMat.Delete
   End If


;o)
0
minoula2006
13 oct. 2009 à 11:56
unlod c une commande que j'ai crée pour sortir de cette form ;)
j'ai mis comme tu ma dit
Private Sub Form_Unload(Cancel As Integer)

If indic = 1 Then
Enregistrer RsMat
indic = 0
Else
If VarMAJ = "A" Then
If Text1.Text = "" And Text2.Text = "" Then Exit Sub

RsMat.UpdateBatch
RsMat.Delete
End If
End If
End Sub
a mon premier essai ca marché mé quand je repete la mm action il me dit impossible d'insere un ligne vide
???
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
13 oct. 2009 à 12:16
Comment peux-tu répéter la même action ? ta form n'est plus en mémoire ?

0
minoula2006
13 oct. 2009 à 12:22
excuse moi j'ai pas compris que veut tu dire de ta form n'est plus en mémoire
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
13 oct. 2009 à 15:50
tu cliques sur la croix pour fermer ton formulaire ?

Je ne comprends pas "quand je répète la meme action ..."
0
minoula2006
13 oct. 2009 à 16:42
non j'ai pas un croix pour quitter j'ai une commande sortir
je veux dire par répéter la mm action c quand je veux ajouter une chose je clic sur la forme qui fé l'ajout mé je n'insert rien ensuite je clik sur sortir jusqu ici c bon et si je repete la mm action c a dire j'ouvre la forme d'ajout sans que la forme s'ouvre un msg d'erreur qui dit impossible d'inserer une ligne vide elle doit au moin comporter une valeur de colonne
????
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
13 oct. 2009 à 17:31
Alors, tu n'as pas du bien me lire: Form_Unload() gère le click sur la croix en haut à droite de la Form. Pour faire simple, c'est une méthode appartenant à Form.

j'ai une commande sortir Tu veux dire que tu as un CommandButton (un bouton) nommé "Sortir" ?

0