Problème insert into ... SQL Access

Résolu/Fermé

medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 - 24 févr. 2012 à 12:02
medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 - 24 févr. 2012 à 21:51

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>

A voir également:

Vba access insert into
Touche insert - Guide
Disk boot failure insert system disk and press enter - Guide
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
Insert boot media in selected boot device and press a key ✓ - Forum Windows 10
Find vba - Astuces et Solutions

2 réponses

Réponse 1 / 2

blux Messages postés 26534 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 19 décembre 2024 3 317
24 févr. 2012 à 12:49

Salut,

un msgbox donne quoi ?

medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 29
24 févr. 2012 à 13:10

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

blux Messages postés 26534 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 19 décembre 2024 3 317
24 févr. 2012 à 13:28

Je parlais d'un msgbox des valeurs à insérer...
Mais pour l'autre problème, il y a fort à parier que mysql doive être mis entre parenthèses dans le runsql...

medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 29
24 févr. 2012 à 13:49

quel msgbox ? il y a un formulaire qui content deux textbox à remplir avec du texte

nom : jack
prénom : jacko

le résultat dans les champs de la table :

nom : <div>jack</div>
prénom : <div>jacko</div>

je ne comprend pas de quel msgbox vous parlez

blux Messages postés 26534 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 19 décembre 2024 3 317
24 févr. 2012 à 14:25

afficher le contenu des variables AVANT de faire le sql, pour voir si les données sont cohérentes et savoir à quel moment sont ajoutées les balises...

medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 29
24 févr. 2012 à 19:24

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

Réponse 2 / 2

medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 29
24 févr. 2012 à 21:51

ç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.

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Page bleue : your PC ran into a problem and needs to restart

Exemple de base de données access

Erreur d'exécution 13 Incompatibilité de type

manque touche insert sur clavier