Problème avec une requête sql dans VBA
Résolu
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.
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.
1 réponse
-
Contributeurbonjour,
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?-
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. -
Contributeur@MHahikoTa 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
-
-
-
Contributeur@MHahikoavec plaisir!
-
