Bonjour,
J’ai une base de données qui est composé de deux parties :
a) la partie applicative (installé sur 5 postes clients)
b) Les données dans le fichier .mdb qui lui est placée sur un "serveur" dans un réseau local qui et composé de 5 postes.
La base contient environ 25000 enregistrements clients avec des nombreuses tables, etc.....
Le formulaire de recherche client "FrmRechercheDossier" nous relentie énormement le réseau, car mal conçu par une société tiers, et je souhaite apporter une modification pour accellerer notre travail.
Voici le code du "Sub Form_Open(Cancel As Integer)"
puis le code de la comboBox qui nous sert d'entrée de clavier ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub Form_Open(Cancel As Integer) cboDossier.RowSource = "SELECT [DOSSIER].[DOS_ID], [DOSSIER].[DOS_EMPR_NOM], [DOSSIER].[DOS_EMPR_PRENOM]," _ & " [DOSSIER].[DOS_VILLE],[DOSSIER].[DOS_ID],[DOSSIER].[DOS_DATE_PHASE1]" _ & " FROM DOSSIER ORDER BY [DOSSIER].[DOS_EMPR_NOM], [DOSSIER].[DOS_EMPR_PRENOM]" End Sub
Combo Box
Raw source Type : Table/Query
Raw Source:
Ma question, il y à t'il un moyen de booster la recherche en modifiant le code, et si oui, par quel moyen?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 SELECT DOSSIER.DOS_ID, DOSSIER.DOS_EMPR_NOM, DOSSIER.DOS_EMPR_PRENOM, DOSSIER.DOS_VILLE, DOSSIER.DOS_DATE_PHASE1 FROM DOSSIER ORDER BY DOSSIER.DOS_EMPR_NOM;
Eventuellement par cette méthode : http://access.developpez.com/faq/?page=Concept#ReqLimit ?
Remarque, je ne suis pas un pro du vba!
Merci d'avance pour votre aide.
Partager