OVH Cloud OVH Cloud

Pb sélection dans zone de liste

2 réponses
Avatar
Alain Teyssedre
Bonjour

Aprés avoir sélectionné un keyword dans une zone de liste lorsque j'execute
la commande supprimer enregistrement,
c'est le 1er keyword de ma liste qui est supprimé !

Si je re-sélectionne le même Keyword et que j'essaye de le modifier, j'ai un
message d'erreur :" erreur 3167 -
l'enregistrement est supprimé" et si je resélectionne un keyword la j'ai
carrément toute mon appli Access qui se ferme !!!

Merci pour votre aide



Infos complémentaires:
J'ai 2 tables liées Contact et Keyword Contact.

J'ai un formulaire "Keyword Contact" qui comprend:
- une zone de liste pour afficher tous les Keywords affectés à un
contact (qui est sélectionné dans le formulaire Contacts)
- 3 Boutons de commande "Ajouter", "Modifier", "Supprimer".
- Une zone de texte "Expr1" qui affiche le nom complet du contact en
cours de sélection.

Le formulaire Keyword Contact s'ouvre à partir du formulaire Contact (qui
affiche les contacts).
Ces 2 formulaires sont liés par les champs RéfContact

La requete source du formulaire keyword est :
SELECT [Keyword Contact].Keyword, [Keyword Contact].RéfContact AS Expr2,
[Contacts].[Salutation] & " " & [Prénom] & " " & [Nom] & " " & [Titre]
AS Expr1, Contacts.RéfContact
FROM Contacts LEFT JOIN [Keyword Contact] ON Contacts.RéfContact = [Keyword
Contact].RéfContact;


La requete source de ma zone de liste Keyword est :
SELECT [Keyword Contact].Keyword, [Keyword Contact].RéfContact
FROM [Keyword Contact]
WHERE ((([Keyword Contact].RéfContact)=[Contacts].[RéfContact]));
(avec colonne liée 1)

Voila j'espère avoir été clair si tu as des questions n'hesites pas

@+
Alain

2 réponses

Avatar
Daniel Carollo
Bonsoir Alain!

Les trois boutons, en particulier le bouton "supprimer", y font ca comment?
Et surtout, apres qu'ils aient fait leur boulot, le formulaire est-il
"requeried"?

A priori, le probleme viendrait de la plutot que des enonces des requetes
que vous nous avez fourni.

Abientot.

--
Daniel :-)

Computing Technologies International - www.computing-tech.com - We
provide solutions...

"Alain Teyssedre" wrote in message
news:
Bonjour

Aprés avoir sélectionné un keyword dans une zone de liste lorsque
j'execute

la commande supprimer enregistrement,
c'est le 1er keyword de ma liste qui est supprimé !

Si je re-sélectionne le même Keyword et que j'essaye de le modifier, j'ai
un

message d'erreur :" erreur 3167 -
l'enregistrement est supprimé" et si je resélectionne un keyword la j'ai
carrément toute mon appli Access qui se ferme !!!

Merci pour votre aide



Infos complémentaires:
J'ai 2 tables liées Contact et Keyword Contact.

J'ai un formulaire "Keyword Contact" qui comprend:
- une zone de liste pour afficher tous les Keywords affectés à un
contact (qui est sélectionné dans le formulaire Contacts)
- 3 Boutons de commande "Ajouter", "Modifier", "Supprimer".
- Une zone de texte "Expr1" qui affiche le nom complet du contact en
cours de sélection.

Le formulaire Keyword Contact s'ouvre à partir du formulaire Contact (qui
affiche les contacts).
Ces 2 formulaires sont liés par les champs RéfContact

La requete source du formulaire keyword est :
SELECT [Keyword Contact].Keyword, [Keyword Contact].RéfContact AS Expr2,
[Contacts].[Salutation] & " " & [Prénom] & " " & [Nom] & " " &
[Titre]

AS Expr1, Contacts.RéfContact
FROM Contacts LEFT JOIN [Keyword Contact] ON Contacts.RéfContact [Keyword
Contact].RéfContact;


La requete source de ma zone de liste Keyword est :
SELECT [Keyword Contact].Keyword, [Keyword Contact].RéfContact
FROM [Keyword Contact]
WHERE ((([Keyword Contact].RéfContact)=[Contacts].[RéfContact]));
(avec colonne liée 1)

Voila j'espère avoir été clair si tu as des questions n'hesites pas

@+
Alain




Avatar
Alain TEYSSEDRE
Bonjour Daniel

désolé pour le retard dans ma réponse mais j'ai du
reformater mon disque

la commande supprimer a le code suivant sur l'évènement
click:

DoCmd.RunSQL "DELETE FROM [Keyword Contact] WHERE
((Keyword = '" & Me.Keyword.Column(0) & _
"') AND (RéfContact = ' & Me.RéfContact & '))"

et j'ai essayé les commandes Me.requery er Me.refresh mais
ça ne résoud rien !

cdlt
Alain


-----Message d'origine-----
Bonsoir Alain!

Les trois boutons, en particulier le bouton "supprimer",
y font ca comment?

Et surtout, apres qu'ils aient fait leur boulot, le
formulaire est-il

"requeried"?

A priori, le probleme viendrait de la plutot que des
enonces des requetes

que vous nous avez fourni.

Abientot.

--
Daniel :-)

Computing Technologies International - www.computing-
tech.com - We

provide solutions...

"Alain Teyssedre" wrote
in message

news:
Bonjour

Aprés avoir sélectionné un keyword dans une zone de
liste lorsque


j'execute
la commande supprimer enregistrement,
c'est le 1er keyword de ma liste qui est supprimé !

Si je re-sélectionne le même Keyword et que j'essaye de
le modifier, j'ai


un
message d'erreur :" erreur 3167 -
l'enregistrement est supprimé" et si je resélectionne
un keyword la j'ai


carrément toute mon appli Access qui se ferme !!!

Merci pour votre aide



Infos complémentaires:
J'ai 2 tables liées Contact et Keyword Contact.

J'ai un formulaire "Keyword Contact" qui comprend:
- une zone de liste pour afficher tous les
Keywords affectés à un


contact (qui est sélectionné dans le formulaire
Contacts)


- 3 Boutons de
commande "Ajouter", "Modifier", "Supprimer".


- Une zone de texte "Expr1" qui affiche le nom
complet du contact en


cours de sélection.

Le formulaire Keyword Contact s'ouvre à partir du
formulaire Contact (qui


affiche les contacts).
Ces 2 formulaires sont liés par les champs RéfContact

La requete source du formulaire keyword est :
SELECT [Keyword Contact].Keyword, [Keyword
Contact].RéfContact AS Expr2,


[Contacts].[Salutation] & " " & [Prénom] & " " & [Nom]
& " " &


[Titre]
AS Expr1, Contacts.RéfContact
FROM Contacts LEFT JOIN [Keyword Contact] ON
Contacts.RéfContact =


[Keyword
Contact].RéfContact;


La requete source de ma zone de liste Keyword est :
SELECT [Keyword Contact].Keyword, [Keyword
Contact].RéfContact


FROM [Keyword Contact]
WHERE ((([Keyword Contact].RéfContact)=[Contacts].
[RéfContact]));


(avec colonne liée 1)

Voila j'espère avoir été clair si tu as des questions
n'hesites pas



@+
Alain





.