IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Enregistrement de valeurs décimales [AC-2003]


Sujet :

VBA Access

  1. #1
    Membre actif
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    206
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 206
    Points : 243
    Points
    243
    Par défaut Enregistrement de valeurs décimales
    Bonjour à tous,

    Je souhaite pouvoir enregistrer des valeurs décimales dans ma base de données.

    J'ai donc une zone de saisie Me.txtTonnage, mais je ne parviens pas à écrire le code me permettant d'enregistrer les valeurs décimales.

    Pour l'instant j'ai ceci :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    strSQL = " INSERT INTO Activites (IDActivite, Tonnage) " &  _
                 " VALUES ( " & IntID & "," & Me.txtTonnage & ");"
    DoCmd.RunSQL strSQL
    Ca fonctionne bien, mais lorsque je saisie une valeur décimale, la virgule entraine une erreur. (logique, vu qu'elle entraine le decoupage du paramètre en 2 dans le requête SQL)

    Je me demandais donc, comment faire pour résoudre mon problème?

    Merci de bien vouloir me donner un petit coup de pouce.

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Développeur VBA/C#/VB.Net/Power Platform
    Inscrit en
    Juillet 2007
    Messages
    14 598
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur VBA/C#/VB.Net/Power Platform
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 598
    Points : 34 286
    Points
    34 286
    Par défaut
    salut,
    tu peux forcer la syntaxe en utilisant Replace()
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    strSQL = " INSERT INTO Activites (IDActivite, Tonnage) " &  _
                 " VALUES ( " & IntID & "," & Replace(Me.txtTonnage,",",".") & ");"
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre actif
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    206
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 206
    Points : 243
    Points
    243
    Par défaut
    Merci pour la réponse rapide. Ca fonctionne à merveille.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Obtenir valeur décimale d'un caractère
    Par Onil_ dans le forum C++
    Réponses: 4
    Dernier message: 04/06/2006, 15h56
  2. Comparaison valeurs décimales
    Par Mvu dans le forum ASP
    Réponses: 1
    Dernier message: 21/03/2006, 17h23
  3. [Sql] susbstr et valeur décimale
    Par arezki76 dans le forum Oracle
    Réponses: 1
    Dernier message: 26/12/2005, 11h16
  4. saisie d'une valeur décimale dans un CSpinEdit
    Par Milowen dans le forum C++Builder
    Réponses: 3
    Dernier message: 12/10/2005, 09h57
  5. Réponses: 4
    Dernier message: 20/06/2005, 14h57

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo