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

IHM Discussion :

Actualiser sous formulaire [AC-2007]


Sujet :

IHM

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 2
    Par défaut Actualiser sous formulaire
    Bonjour,
    J'ai cherché pendant plusieurs heures, essayé plusieurs solutions, mais je n'arrive pas à résoudre mon problème !

    Je cherche à faire une application permettant de gérer une Vidéothèque.
    J'ai un formulaire frm_location qui contient une combobox permettant le choix d'un client et un contrôle sub_frm_location contenant un sous formulaire ss_frm_location.
    Le sous formulaire me permet d'obtenir les différentes locations.
    Je veux donc mettre à jour mon sous formulaire avec les locations propre au client sélectionné dans le combobox.
    Pour cela j'utilise l'événement afterUpdate sur ma liste avec le code VBA suivant :

    Private Sub cb_lstClients_AfterUpdate()

    Dim idClient As String
    Dim sqlLstLocations As String

    idClient = Me!cb_lstClients.Value 'on récupère l'identifiant du client sélectionné

    'on met à jour en calculant en fonction du choix du client
    sqlLstLocations = "SELECT LOCATION.ID_LOCATION, LOCATION.DATE_LOCATION, LOCATION.MONTANT_TOTAL " _
    & "FROM LOCATION " _
    & "WHERE ID_CLIENT =" & idClient & " " _
    & "ORDER BY DATE_LOCATION DESC"

    Forms!ss_frm_location.RecordSource = sqlLstLocations 'on met le sous formulaire à jour
    Forms!frm_location!sub_frm_location.Requery

    End Sub
    Le sous formulaire en lui même se met à jour, mais celui intégré à frm_location ne bouge pas d'un poil
    Qu'est ce que j'oublie de faire ??

    Merci d'avance !

    Cordialement

  2. #2
    Rédacteur/Modérateur

    Avatar de User
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Août 2004
    Messages
    8 584
    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 584
    Billets dans le blog
    67
    Par défaut
    Salut,

    si ton idclient est un string il faut mettre les quotes (') de chaque coté dans le sql:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    Private Sub cb_lstClients_AfterUpdate()
     
    Dim idClient As String
    Dim sqlLstLocations As String
     
    idClient = Me!cb_lstClients.Value 'on récupère l'identifiant du client sélectionné
     
    'on met à jour en calculant en fonction du choix du client
    sqlLstLocations = "SELECT LOCATION.ID_LOCATION, LOCATION.DATE_LOCATION, LOCATION.MONTANT_TOTAL " _
    & "FROM LOCATION " _
    & "WHERE ID_CLIENT ='" & idClient & "' " _
    & "ORDER BY DATE_LOCATION DESC"
     
    Forms!ss_frm_location.RecordSource = sqlLstLocations 'on met le sous formulaire à jour
    Forms!frm_location!sub_frm_location.Requery
     
    End Sub

    Autrement tu peux mettre les champs père et fils à ID_CLIENT

    A+
    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

  3. #3
    Candidat au Club
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 2
    Par défaut
    ID_CLIENT est un entier.
    Mais j'ai suivi votre conseil et utilisé le champs père fils, et ça marche, merci beaucoup !

  4. #4
    Rédacteur/Modérateur

    Avatar de User
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Août 2004
    Messages
    8 584
    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 584
    Billets dans le blog
    67
    Par défaut
    Salut,

    Penses au tag
    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

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

Discussions similaires

  1. actualisation sous formulaire
    Par malabar92 dans le forum IHM
    Réponses: 13
    Dernier message: 01/06/2007, 00h50
  2. Réponses: 3
    Dernier message: 10/05/2007, 13h21
  3. Actualisation sous formulaire
    Par Mus30 dans le forum IHM
    Réponses: 2
    Dernier message: 21/12/2006, 17h31
  4. Réponses: 8
    Dernier message: 24/11/2006, 15h06
  5. actualisation sous formulaire
    Par nicolovitch dans le forum Access
    Réponses: 2
    Dernier message: 26/07/2006, 12h41

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