Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1258 connectés 

  FORUM HardWare.fr
  Programmation
  SQL/NoSQL

  [Access97] Recherche avec l'option "tous" (zone de liste modifiable)

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Access97] Recherche avec l'option "tous" (zone de liste modifiable)

n°699003
salimh
Posté le 14-04-2004 à 12:17:49  profilanswer
 

Bonjour, je suis actuellement en traind e crée une bdd sous Access 97 et je débute. J'ai un petit souci sur une partie de ma base et je voudrais savoir si l'un d'entre vous pourrais m'aider.
 
Je souhaite créer un formulaire qui me permet de modifier une requête à partir d'une zone de liste modifiable qui va chercher ces valeurs dans une autre requête.
 
Cependant dans cette zone de liste modifiable, je souhaiterais inclure l'option "Tous" pour permettre l'affichage de toutes les données présente dans la requête.
 
Voici ce que j'ai essayé pour le moment:
Dans ma requête qui doit être modifié (Req2), j'ai mi le critère suivant pour un des champs:
[Formulaires]![Form1]![txt2]
Form1 est le formulaire qui me permet de modifier ma requete
txt2 est le controle qui va me permettre de changer le critère
 
Donc dans Form1, j'ai crée une zone de liste modifiable ZdL1 dans laquelle je vais chercher des valeur provenant d'une autre requete (Req1), et en plus des valeurs provenant de cette requête, je voudrais rajouté "Tous", pour cela j'ai mis comme contenu de ZdL1 la ligne suivante:
SELECT DISTINCT [Req1].[txt1] FROM [Req1] union select "<<Tous>>"as [txt1] From [Req1]
Req1 est la requête dans laquelle ZdL1 va chercher ces valeurs
txt1 est le champ de Req1 ou je vais chercher mes valeurs
 
Ensuite dans Form1, j'ai créé une zone de txt (txt2) qui contient les valeurs qui vont me permettre de modifier Req2. Pour txt2, j'ai mis le code suivant:

Code :
  1. Private Sub ZdL1_AfterUpdate()
  2. If ZDL1 = "<<Tous>>" Then
  3. txt2 = "Is Not Null"
  4. Else
  5. txt2 = ZdL1
  6. End If
  7. End Sub


 
Le problème c'est que le "Is Not Null" ne passe pas. J'ai donc essayé de le remplacer par "Like "*"", mais Like est une fonction de VB, donc ca marche pas non plus. Donc si vous savez comment ecrire cette ligne de code pour que Req2 affiche tout les enregistrements, merci.
 
P.S: Après relecture, je sais pas si mon message est bien clair. Mais si vous souhaitez des précisions, il n'y a pas de problème.

mood
Publicité
Posté le 14-04-2004 à 12:17:49  profilanswer
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  SQL/NoSQL

  [Access97] Recherche avec l'option "tous" (zone de liste modifiable)

 

Sujets relatifs
[ACCESS] Liste déroulante dans formulairerecherche d'une fonction ou d'un mini prog sur excel!
Operation Suicide [Recherche Dev PHP inside]Algorithme de recherche dans une base de données
ZOPE / Plone recherche d'infos/tutorielsListe des fichiers d'un repertoire
[css] liste décalée[PHP] Liste des variables globales.
[ASP] Recherche de tutoListe déroulante et valeur renvoyée
Plus de sujets relatifs à : [Access97] Recherche avec l'option "tous" (zone de liste modifiable)


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR