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 :

Mise à jour liste déroulante [AC-2003]


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de cluster26
    Profil pro
    Inscrit en
    Février 2010
    Messages
    296
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 296
    Par défaut Mise à jour liste déroulante
    Bonjour,

    J'ai un formulaire dans lequel un contrôle est alimenté par une zone déroulante avec la propriété "limiter à la liste".
    En l'occurrence, ce contrôle ne peut prendre que les valeurs a,b ou c.

    Dans un contexte particulier, il m'arrive de réinitialiser ce contrôle à "null".

    J'utilise donc lors de cette réinitialisation, le code suivant.

    Ce code ne fonctionne pas !.. Le contrôle est systématiquement régénéré à la valeur initiale, soit a, b ou c

    Avez-vous une solution SVP

    Merci à l'avance.

  2. #2
    Membre éclairé Avatar de cluster26
    Profil pro
    Inscrit en
    Février 2010
    Messages
    296
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 296
    Par défaut
    Je rectifie le message précédent !

    En effet, j'arrive bien à mettre à "null" le contrôle lorsque j'utilise le code
    Toutefois, lorsque j'exécute à la suite le code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    DoCmd.RunSQL "UPDATE  service set service.code_sortie= " & "'" & Me![code_sortie] & "'" & _
        " WHERE (((service.numero)= " & me![numer] & "));"
    le code_sortie est réinitialisé à la valeur d'origine.

    Avec mes excuses

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Mai 2010
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2010
    Messages : 70
    Par défaut
    Bonjour,

    Apparemment, il n'y a pas d'erreur dans ton code car chez moi cela fonctionne et tu peux légèrement raccourcir le code:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.RunSQL "UPDATE  service set service.code_sortie='" & Me![code_sortie] & "' WHERE service.numero= " & me![numer] & ";"
    Vérifies les propriétés de tes contrôles.

    Peux tu fournir le code complet ?

    Bonne journée.

  4. #4
    Membre éclairé Avatar de cluster26
    Profil pro
    Inscrit en
    Février 2010
    Messages
    296
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 296
    Par défaut
    Je dois avoir un problème avec les "'".

    En effet, si je lance ton code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.RunSQL "UPDATE  service set service.code_sortie='" & Me![code_sortie] & "' WHERE service.numero= " & me![numer] & ";"
    comme tu le préconises, cela fonctionne parfaitement.

    Cela coince lorsque que je veux ajouter dans ce code, la modification d'une autre donnée à savoir :
    service.date_sortie à partir du contrôle me![date_sortie]

    Pourrais-tu me fournir la syntaxe stp

    Merci à l'avance.

  5. #5
    Rédacteur/Modérateur

    Avatar de User
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Août 2004
    Messages
    8 605
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Août 2004
    Messages : 8 605
    Billets dans le blog
    67
    Par défaut
    Salut,

    Il te faut utiliser le format US dans l'expression du sql :

    http://access.developpez.com/faq/?pa...Convert_DateUS

    cette fonction est à mettre dans un module, et après dans le where :

    Code sql : Sélectionner tout - Visualiser dans une fenêtre à part
    WHERE service.numero= " & me![numer] & " and date_sortie=" & ap_SQLArgDate(me![date_sortie])

    Ou plus directement:

    Code sql : Sélectionner tout - Visualiser dans une fenêtre à part
    WHERE service.numero= " & me![numer] & " AND date_sortie=#" & Format(me![date_sortie], "mm/dd/yyyy") & "#"
    Vous trouverez dans la FAQ, les sources ou les tutoriels, de l'information accessible au plus grand nombre, plein de bonnes choses à consulter sans modération

    Des tutoriels pour apprendre à créer des formulaires de planning dans vos applications Access :
    Gestion sur un planning des présences et des absences des employés
    Gestion des rendez-vous sur un calendrier mensuel


    Importer un fichier JSON dans une base de données Access :
    Import Fichier JSON

  6. #6
    Membre éclairé Avatar de cluster26
    Profil pro
    Inscrit en
    Février 2010
    Messages
    296
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 296
    Par défaut
    Apparemment ce n'est pas un problème de format date, car lorsque je lance le code de domibigoudi en modifiant les zones de cette façon :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.RunSQL "UPDATE  service set service.date_sortie='" & Me![date_sortie] & "' WHERE service.numero= " & Me![ctr1] & ";"
    cela fonctionne parfaitement.

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

Discussions similaires

  1. [AC-2003] Mise à jour liste déroulante dans sous-formulaire
    Par jeanpierre78 dans le forum IHM
    Réponses: 2
    Dernier message: 01/04/2011, 21h36
  2. Mise à jour liste déroulante
    Par BiBloOo dans le forum Langage
    Réponses: 7
    Dernier message: 10/02/2009, 10h09
  3. [Dojo] Mise à jour liste déroulante, AJAX+Struits
    Par laurent_m dans le forum Bibliothèques & Frameworks
    Réponses: 3
    Dernier message: 20/08/2007, 20h21
  4. mise à jour liste déroulante
    Par stéphane_ais2 dans le forum Access
    Réponses: 32
    Dernier message: 09/11/2005, 16h12
  5. Mise à jour listes déroulantes
    Par mr.t dans le forum ASP
    Réponses: 2
    Dernier message: 20/06/2005, 10h02

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