Controle datatext

Description

Un controle qui permet de connecter un fichier .txt à un DataGrid.
Grace à cela adieu les bases de données encombrantes. Une base de donnée avec une compression grande car un .txt est infiniment plus compressé qu'un .mdb . Actuellement le test n'a fonctionné qu'avec un datagrid.

Source / Exemple :


Ce controle est fait pour les Datagrid.
Il permet d'afficher les données d'un fichier texte structuré ainsi :

Nombre d'enregistrements;Nombre de champs
Champ 1 ;Champ 2;
Enregistrement champ1;Enregistrement champ2;

Le fichier inclus "Data.txt" est un exemple.

Chaque enregistrement se profilera sur une ligne terminée par un ";"
La separation entre les donnée se fait par un ";"

Pour le codage :

Option Explicit
Dim da As New DataAdapter

Private Sub Form_Load()
    ' Affecte l'objet DataText à la propriété Object de l'objet DataAdapter.
    Set da.Object = DataText1
    
    ' Définit la propriété DataMember.
    DataGrid1.DataMember = App.Path & "\data.txt"
    ' Affecte l'objet DataAdapter à la propriété DataSource.
    Set DataGrid1.DataSource = da
End Sub

Donc pour l'execution des données il faut un data adapter.
Sa librairie est "Microsoft Data Adapter Library"

Conclusion :


Bonne Utilisation !

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.