Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 05 19:25:14

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : UN MYSTèRE DE VB ET DIRECTX !? par Nowid50

RE : TRACER UNE FONCTION par jack

RE : SIMULER CTRL+A PUIS CTRL+C NE MARCHE PAS TOUT LE TEMPS .. POURQUOI ? par jeremiesauve

TRACER UNE FONCTION par salih180

+ de logiciels à télécharger

1 464 798 membres
293 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 095 codes, 1 302 984 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CONTROLE DATATEXT

Information sur la source

Catégorie :Control Classé sous : controle, text, datatext, donnée, leger Niveau : Débutant Date de création : 13/03/2008 Date de mise à jour : 14/03/2008 17:24:44 Vu / téléchargé: 3 523 / 358

Auteur : moipaci

Site perso

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (7)

Ajouter un commentaire et/ou une note

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

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"

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 !

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

data.txt 10 512 octets
help.txt 961 octets
MyData.ctl 1 758 octets
MyDataco.ocx53 248 octets
MyDataco.vbp 1 546 octets
MYDATAS.CLS 956 octets
MYOSPOBJ.CLS 12 539 octets

Télécharger le zip

Historique

13 mars 2008 23:05:10 :: Ajout du fichier help.txt et data.txt
14 mars 2008 17:24:44 :: Ajout du source

Sources de la même categorie

LABEL ET IMAGE DANS TEXTBOX par gillardg

GRADIENTDIALOG - SÉLECTION DE DÉGRADÉS LINÉAIRES par Mayzz

EXLISTVIEW- LISTVIEW PERSONNALISÉ par Mayzz

VB6-INNO-WIZARD par cdbi

BOUTON SOUS PLUSIEURS FORME par noah56

Toutes les sources de la catégorie Control

Sources en rapport avec celle ci

TEXTSTYLE, EDITOR HTML par jupevi

CONTROLE UTILISATEUR IPBOX POUR LA SAISIE D'ADRESSE IP par foliv57

FAVORITE LIST CONTROL par werdDomain

CONTRÔLE TREEXML par simo5963

BASE DE DONNEES PERSO SOUS FORMAT TXT par kakenette

Commentaires et avis

Commentaire de bouv le 14/03/2008 12:17:32

1° - Un fichier TXT n'a rien de compressé. Ce qui coute de la place dans une base de donnée c'est la structure, et là, la perte est infime. Par contre quand il s'agit de rechercher, trier, supprimer des données... les requetes SQL te feront gagner un temps CONSIDERABLE.

2° - Je ne vois pas de source dans ce zip, juste un ocx. Voir la chartre de bonne conduite qui dit :
"On ne fourni pas un programme ou une ressource compilée. Une source sans code n'est pas une source! "

++

Commentaire de asimengo le 14/03/2008 13:32:27

@moipaci: fouilles la dedans http://www.vbfrance.com/codes/IMPLEMENTATION-AUTOMATIQUE-RECORDSET-TOUS-PROVIDERS-PASSER-RECORDSET-PARAMETRE_33090.aspx, tu veras cmt on attaque un fichier texte pour un datagrid. il suffit de bien structurer le fichier Schema.ini

Commentaire de moipaci le 14/03/2008 17:31:31

Reponse à BOUV :

1. Lorsque je dis compressé c'est que si tu consideres un fichier de base de donnée access(par exemple) d'un grand volume, en prenant tout simplement un fichier .txt avec 2 ko de memoire on pourrait conserver le triple de la base de donnée .mdb. Bien sûr j'exagere un p' tit peu.

2. Tu as tout à fait raison, je me suis trompé betement de Zip.

Reponse à ASIMENGO:

Je comprends parfaitement ce que tu veux dire. Mais je ne propose pas seulement d'ataquer le fichier txt, mais aussi de le farfouiller, de le modifierà travers un controle, d'ailleurs je l'ameliore pour creer une nouveau genre de sgbd.

Conclusion :

Soyez indulgent c'est mon premier source.

Commentaire de asimengo le 14/03/2008 19:50:18

@MOIPACI: ah non je ne critique pas ton bon travail, juste un tuyau de plus si ca peut t'aider.

Commentaire de BruNews le 14/03/2008 20:49:12 administrateur CS

Justement parce que c'est ta 1ere source, écoute bien ce qui t'est dit en commentaires.

Un txt standard ne pourra jamais être substitué à un BDD, il manquera le système d'indexation et les relations qui font une base de données.
Dès que ton txt prendra un peu de volume, les temps de manipulation deviendront très rapidement rédhibitoires.

Commentaire de moipaci le 14/03/2008 22:27:45

Ok, il est evident qu' un .txt ne remplacera jamais(ou pas prochainement) un sgbd, donc actuellement l'ensemble de mes travaux sont concentrés sur l'acceleration et sur la compression .

Merci pour vos conseils !

Commentaire de BruNews le 14/03/2008 22:31:52 administrateur CS

En ce cas, il faudra t'orienter sur un langage de bas niveau.

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

liste box [ par Wind ] J'aimerais lier une listbox avec un fichier de données (pas de basse de donnée mais genre fichier .ini ou txt).et en plus je voudrais que quand je cli le SendData du controle WinSock BRIDE? [ par Karfyn ] Donc j'envois des données de plusieurs disaine de Kilo octets avec le controle Winsowk et sa methode send data!!!Ben on dirait qu'avant d'envoyer la d AIDEZ MOI !! SVP §§ [ par julian ] Est-il possible d'écrire du texte dans un controle rich text box à la fin ou apres le texte qui est déja dans le controle.il faudrait un truc comme E Bouton dans Text Box [ par Vortex2002 ] Je vous remercie pour la premiere réponse, mais en fait je me suis mal expliqué.Je recherche un controle ou un moyen d'avoir un controle de type texte ==URGENT== Retranscription Base de donnée vers text URGENT [ par Lexounet ] COmment puis je faire en vbs pour retranscrire des données présente dans une base de donnée vers un fichier texte ? par exemple copier la 1° ligne d u jy arrive pas : verif lors d'un recordset que donnée existe ou pas [ par Fredo25 ] Merci pour la reponse mais je n'y arrive vraiment pasComment l'inserer dans mon code :sachant que c'est sur saisi_np_employeur que je voudrais tester Les donnée d'une base de donné d'un combobox vers une base de donnée access [ par cricri_b34 ] J'ai créer un petit programme qui enregistre les donné qui sont dans un textbox vers un fichier access.Maintenant j'aimerais ajouter un controle combo Controle Text [ par mltgn ] Salut,J'ai un ensemble de controle Text (Text1, Text2, Text3, ..., TextN) sur une Form. Je souhaite mettre leur propriété Enable à False mais pas un à Modifier une BDD via un true DBGrid [ par Nicos77 ] Alors j'ai une base de donnée qui s'affcihe dans un TDBGrid !!!Ensuite en cliquant sur un bouton j'autorise l'ajout de ligne (enfin je crois)TDBGrid1. Probleme d'enregistrement de donnée [ par codry ] Bonjour j'ai un petit probleme d'enregistrement de donnée dans un base de donnée access pour eviter toutes question j'ai mi en haut de mon