[Access] [Résolu ]Probleme Requete sql DELETE

Probleme Requete sql DELETE [Access] [Résolu ] - VB/VBA/VBS - Programmation

Marsh Posté le 04-03-2005 à 08:29:05    

Bonjour à tous,
 
J'ai un formulaire avec deux zones de listes permettant de remplir une troisième zone de liste en passant par une table de travail.
Sur clic sur un bouton enlever, je veux enlever une ou plusieurs lignes sélectionnées dans cette troisième liste
je passe par une requete sql DELETE
le problème c'est que lorsque access fait le DoCmd.RunSQL (strSql)
il me met une fenetre me demandant de taper ConIdFilsO et ConIdFilsD ???
 
voici le contenu de strSql au débogage :
 

Citation :

?strsql
DELETE FROM TabTravailConversion WHERE (ConIdFilsO = 14 and ConIdFilsD = 499) OR (ConIdFilsO = 499 and ConIdFilsD = 14)


 
j'ai beau le tourner dans tout les sens je ne vois pas ce qui ne fonctionne pas
 
 
 
Voici mon code
 

Citation :

'ENLEVER ------------------------------------------------------------
Private Sub btnSupprimer_Click()
 
'Enleve une ou plusieurs conversions de la table de travail
 
Dim varElt As Variant
Dim myId1, myId2, a As Integer
 
For Each varElt In ListeCreationConversion.ItemsSelected
         
'Récupération des ID
myId1 = ListeCreationConversion.Column(0, varElt)
myId2 = ListeCreationConversion.Column(2, varElt)
 
'Construction SQL
strSql = "DELETE FROM TabTravailConversion" & _
" WHERE (ConIdFilsO = " & myId1 & " and ConIdFilsD = " & myId2 & " )" & _
" OR (ConIdFilsO = " & myId2 & " and ConIdFilsD = " & myId1 & " )"
 
'Exécution Sql
DoCmd.RunSQL (strSql)
         
Next varElt
 
'Rafraichissement des listes
ListeCreationConversion.Requery
 
End Sub


 
Est ce que vous auriez des pistes ??
 
D'avance merci
Suzan


Message édité par sdean le 04-03-2005 à 22:20:05
Reply

Marsh Posté le 04-03-2005 à 08:29:05   

Reply

Marsh Posté le 04-03-2005 à 09:08:40    

Et si tu lances cette requête directement (création requête) sous Access
=>
DELETE FROM TabTravailConversion WHERE (ConIdFilsO = 14 and ConIdFilsD = 499) OR (ConIdFilsO = 499 and ConIdFilsD = 14)
Tu as le même message ?

Reply

Marsh Posté le 04-03-2005 à 22:05:21    

Bonsoir,
 
oui, j'ai le même message avec cette manip
 
dubitative, dubitative, je suis...
 
je nage
 
Amicalement
Suzan

Reply

Marsh Posté le 04-03-2005 à 22:14:29    

j'ai trouvé !
 
l'erreur très con....  :fou:  :fou:  
je me suis trompé de nom de champ..... :pt1cable:  
 
la bonne requete c'est :

Citation :

strSql = "DELETE FROM TabTravailConversion" & _
" WHERE (TravailIdOrigine = " & myId1 & " and TravailIDDestinataire = " & myId2 & " )" & _
" OR (TravailIdOrigine = " & myId2 & " and TravailIDDestinaire = " & myId1 & " )"


 
des fois a force d'avoir le nez dedans on voit plus rien....
 
Excuse moi pour le dérangement pour rien
en tout cas merci beaucoup pour ton aide
 
Amicalement
Suzan


Message édité par sdean le 04-03-2005 à 23:09:36
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed