Discussion :

[3alit]

Bonjour.

J'ai un champ table alimenté par programmation qui contient 2 colonnes col_corp et col_desi.

Dans ma fenêtre il existe un champ table + 2 champ text de saisie (sai_corp et sai_desi) 4 boutons (nouveau, modifier, valider, supprimer).

Mon problème c'est que si je clique sur bouton valider l'ajout, ça marche bien mais lorsque je sélectionne 1 ligne de table pour modification il m'ajoute d'autres lignes.

Peut être il y a une modification dans mon code pour qu'il marche :

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
//bouton valider
 
EcranVersFichier(FEN_modf,Corps)
 
 HLitRecherchePremier(Corps,corp,SAI_corp)    
 
SI HTrouve()
Info("Votre enregistrement est en double","Veuillez modifier vos données")
 
SINON
SI HTrouve(Corps)=Faux ALORS
 
	Corps.corp=SAI_corp
	Corps.desc=SAI_des
		HAjoute(Corps)
 
SINON
HLitRecherchePremier(Corps,IDCORP,COL_Corp)   
 	SI HTrouve(Corps) ALORS
		EcranVersFichier() 
 
	HModifie(Corps,hNumEnrEnCours, Options)
	FIN
FIN
FIN

corps.fic c'est mon fichier bd HF
IDcorp identifiant unique

Merci.

[aurabarth]

Ton problème est simple à résoudre mais je trouve que ton code n'est pas ordonné.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Bouton Modifier
hlitpremier(Corps,IDcorp)
si htrouve(Corps) alors
tantque pas hendehors(Corps)
si Corps.corps=sai_corp Alors
     corps.corp=<Nouvelle Valeur>
     corps.XXXX=<Nouvelle valeur>
     hmodifie(Corps)
Fin
hlitsuivant(Corps,IDCorps)
fin
 
// 
Fin

Si ça marche pas alors soit plus explicite dans ton message. Par exemple, ton Identifiant est-il automatique ou manuel? Est-ce la ligne sélectionnée dans la table qui doit être modifiée? ... Explique bien ton mécanisme
Merci

[3alit]

Si ça marche pas alors soit plus explicite dans ton message. Par exemple, ton Identifiant est-il automatique ou manuel? Est-ce la ligne sélectionnée dans la table qui doit être modifiée? ... Explique bien ton mécanisme
Merci

ça ne marche pas :

- idcorp identifiant automatique
- oui je veux modifier une ligne de champ table (les champs de saisie et table existe dans même fenêtre =fen_modif)

Je veux que mon bouton valider contient l'ajout et modification d'une ligne sélectionner de table avec info (éliminer saisie des doublon).

[Guardian]

Je veux que mon bouton valider contient l'ajout et modification d'une ligne sélectionner de table avec info (éliminer saisie des doublon).

Ça c'est ce que tu souhaites, on est d'accord.
Mais sur quoi butes-tu ?
Quel est ton problème précis ?

"Ça ne marche pas" n'est pas une indication valide. Sois plus précis, message d'erreur, résultat obtenu vs résultat attendu, etc.

Dans ton code du premier post, il y a redondance de tests inutiles.

Si tu veux "ajouter si l'enregistrement n'existe pas et modifier dans le cas contraire", un test de présence suffit.
Si présent ==> Modifie
Sinon ==> Ajoute

[mnw.william]

Salut,
J'ai regardé ton code :

Quand tu fais :

Code :

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

EcranVersFichier(FEN_modf,Corps)

ça signifie que tu charges les informations de la table vers la fenêtre. Donc forcément tu auras toujours les données qui seront trouvées.

Donc concoit le code simplement, ne complique rien.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
//effectue la recherche pour voit si l'enregistrement existe
HLitRecherchePremier(Corps,corp,SAI_corp)
//Si on trouve
SI HTrouve() Alors
        Info("Votre enregistrement est en double","Veuillez modifier vos données")
SINON
//l'enregistrement n'existe pas
	Corps.corp=SAI_corp
	Corps.desc=SAI_des
	HAjoute(Corps)
        Infos("Enregistrement effectué.....")
FIN

A mon avis tu devrais mettre ton code modifier dans un autre bouton. Regarde ton code

Code :

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

HLitRecherchePremier(Corps,IDCORP,COL_Corp)

le COL_Corp tu le parcourt comment c'est une colonne de la table tu dois partir sur une TableOccurence.

Créer un bouton <Modifier> et sur le code d'Affichage d'une ligne de la table tu as

Code :

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

EcranVersFichiers()

Et sur ke bouton <Modifier>, tu as

Code :

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

1
2
FichierVersEcran()
HModifie(Corps)

N'oublie pas de lier les champs de saisie avec les rubriques de ton HF.

Tu dois revoir un peu tes notions de programmations, si tu peux.... Si avoir aidé

[digbeuson]

bonjours chez collègues développeurs, j'ai un soucis à savoir le code du clic bouton valider en tenant en compte le login et le mot de passe. A la suite, de cette fenêtre doit accéder la fenêtre principale qui englobe le menu de l'application.Cette application se fait sous windev 17.
Merci de bien vouloir m'aider. http://www.developpez.net/forums/ima...on_redface.gif