Problème avec une requête sql dans VBA

Résolu
MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention   -  
MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai un formulaire avec des zones de texte et un bouton modifier.
Lorsque je clique sur modifier, je souhaite mettre à jour une table avec les données inscrites dans les zones de texte.
Voici mon code simplifié :

Private Sub Cmd_Modifier_Click()

Dim T_Stagiaire As Database
Dim SQL As String

SQL = "UPDATE T_Stagiaire " & _
"SET T_Stagiaire.[Nom_JeuneFille] = Nom_JeuneFille" & _
"WHERE T_Stagiaire.[ID_Stagiaire] = ID_Stagiaire"

DoCmd.RunSQL SQL

End Sub


Le champs de la table reste le même. ça ne modifie rien du tout.
Savez-vous pourquoi, s'il vous plait ?
Merci d'avance.
A voir également:

1 réponse

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour,
n'as-tu aucun message d'erreur?
que sont "Nom_JeuneFille" et "ID_Stagiaire"? peux-tu montrer ton code non simplifié?
ne devrais-tu pas utiliser des zones de ton formulaire?
0
MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour et merci pour la réponse.

T_Stagiaire est ma table
T_Stagiaire.[Nom_JeuneFille] et T_Stagiaire.[ID_Stagiaire] sont des champs de la table
Nom_JeuneFille et ID_Stagiaire sont des zones de texte dans mon formulaire.

Dans la table, ID_Stagiaire est la clé primaire en NuméroAuto et Nom_JeuneFille est juste en texte court.

Le problème de la requête complète est qu'elle est énorme. Du coup, je l'ai mise en commentaire pour l'instant. J'essai déjà de faire marcher cette partie.
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
Ta requête n'utilise pas les zones de ton formulaire.
Tu n'as pas de message d'erreur parce que tu utilises les mêmes noms pour tes champs et pour tes zones.
Cependant, ta requête ne fait pas ce que tu crois.
suggestion:
SQL = "UPDATE T_Stagiaire " & _ 
" SET T_Stagiaire.[Nom_JeuneFille] = '" & Me.Nom_JeuneFille & "' " & _ 
" WHERE T_Stagiaire.[ID_Stagiaire] = " & Me.ID_Stagiaire 
0
MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
ça marche !
0
MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
MERCI beaucoup
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > MHahiko Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
avec plaisir!
0