Problème insert into ... SQL Access
Résolu
medbo
Messages postés
570
Statut
Membre
-
medbo Messages postés 570 Statut Membre -
medbo Messages postés 570 Statut Membre -
Bonjour,
j'ai un formulaire Access 2007 qui contient deux textbox "leNom" et "lePrenom" et un boton de validation "valider"
ce formulaire alimente une table "A" qui contient deux champs "Nom" et "Prénom" grâce au code VBA suivent :
Private Sub valider_Click()
Dim mySQL As String
mySQL = "INSERT INTO a (Nom, Prénom)"
mySQL = mySQL & "VALUES('" & lenom & "', '" & leprenom & "')"
DoCmd.RunSQL mySQL
la table "A" s'alimente mais non pas avec les valeurs saisies dans les textbox mais
avec la balise <div></div> qui entoure les valeurs saisies dans les textbox
comme : <div>valeursaisie</div>
c'est due à quoi ?
y a t-il erreur dans le code VBA ?
comment le résoudre ?
<config>Windows 7 / Firefox 11.0</config>
--
c'est en s'entre-aidons que nous réussirons
j'ai un formulaire Access 2007 qui contient deux textbox "leNom" et "lePrenom" et un boton de validation "valider"
ce formulaire alimente une table "A" qui contient deux champs "Nom" et "Prénom" grâce au code VBA suivent :
Private Sub valider_Click()
Dim mySQL As String
mySQL = "INSERT INTO a (Nom, Prénom)"
mySQL = mySQL & "VALUES('" & lenom & "', '" & leprenom & "')"
DoCmd.RunSQL mySQL
la table "A" s'alimente mais non pas avec les valeurs saisies dans les textbox mais
avec la balise <div></div> qui entoure les valeurs saisies dans les textbox
comme : <div>valeursaisie</div>
c'est due à quoi ?
y a t-il erreur dans le code VBA ?
comment le résoudre ?
<config>Windows 7 / Firefox 11.0</config>
--
c'est en s'entre-aidons que nous réussirons
2 réponses
-
Salut,
un msgbox donne quoi ?
-
c'est une message de confirmation d'insertion des données dans la table qui dit :
Vous allez ajouter 1 ligne(s)
Dès que vous aurez cliqué sur Oui, il ne vous sera pas possible d'utiliser la commande Annuler pour supprimer les modifications. Êtes-vous sûr de vouloir ajouter les lignes sélectionnés ?
quand je clic sur oui l'entrée s'ajoute dans la table avec le problème cité. et quand je clic sur non il y a le mode débogage avec la ligne "DoCmd.RunSQL mySQL" du code VBA qui est srlignée en jaune -
-
-
-
voici le code VBA que j'utilise et qui est attribuer au bouton VALIDER du formulaire :
Private Sub valider_Click()
Dim db As Database
Dim rs As Recordset
Dim a As String
Dim b As String
Dim mySQL As String
a = Me.lenom.Value
b = Me.leprenom.Value
mySQL = "INSERT INTO a (nom, prénom)"
mySQL = mySQL & "VALUES ('" & a & "', '" & b & "')"
Set db = CurrentDb
DoCmd.RunSQL (mySQL)
Me.Form.Refresh
End Sub
-
-
ça y est c'est résolu.
j'ai modifié le format de texte dans les propriétés des textbox du formulaire qui était "texte enrichi" en "texte brut"
merci blux pour votre aide.
