Control pour afficher, modifier, filtrer... une base access

Soyez le premier à donner votre avis sur cette source.

Vue 13 036 fois - Téléchargée 3 271 fois

Description

Ce control utilisateur utilise une FlexGrid.

Il suffit de passer à la grille les nom des champs, le chemin de la base et 1 ou 2 paramètres et vous obtenez une grille qui affiche les données voulues.

Possibilités :
- Filtre par parametre SQL
- Tri des données avec paramatre SQL
- Possibilité de modifier les champs que l'on veut (les autres sont bloqués)
- Ajout d'un enregistrement
- Affichage des données selon leur type (Bool, String, Number...)

J'ai également mis dans le zip, un ocx compilé pour ceux qui préfère.

J'ai passé pas mal de temps sur cette source, mais je pense en gagner encore plus.
Merci de laisser vos commentaire et de noter. Cela fait toujours plaisir quand on partage une source.

Bonne prog
++

Source / Exemple :


'POUR INITIALISER LA GRILLE
Call Grille.DataBase (AppPath & "BDD.mdb")
Call Grille.Reinitialiser_Champs
Call Grille.Ajouter_Champs("Num Devis", "RefDevis", Number_, False)
Call Grille.Ajouter_Champs("Date", "DateDevis", Date_, True)
Call Grille.Ajouter_Champs("Client", "NomClient", String_, False)
Call Grille.Ajouter_Champs("Montant", "Total", Currency_, True)
Call Grille.Ajouter_Champs("Accepté", "Accepte", Boolean_, True)
Grille.Table = "TAB_DEVIS"
Call Grille.KeyField("RefDevis", Number_, 0)
Call Grille.Data("", "ORDER BY RefDevis")

'POUR AJOUTER UNE LIGNE A LA GRILLE
Call Grille.Ajouter_Ligne

'RIE DE PLUS

Conclusion :


PS : J'ai mis initié car même si le code ne présente aucune technique vraiment compliquée, sa mise en oeuvre est quand même dans l'ensemble l'est un peu.

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.