Lecture d'un fichier .DAT [Résolu]

Messages postés
5
Date d'inscription
jeudi 27 juillet 2006
Dernière intervention
7 août 2006
- - Dernière réponse : rafoulefou
Messages postés
5
Date d'inscription
jeudi 27 juillet 2006
Dernière intervention
7 août 2006
- 7 août 2006 à 08:15
Bonjour,

J'ai un fichier .DAT avec plusieurs enregistrement dedans.

Voici a quoi ca ressemble pour un enregistrement:

MALVACEAE                     Abutilon                      megapotamicum                                               Abutilon                      Brésil                        A cultiver sous climat doux, ou bien abriter en hiver.Peut être palissée:Trés longue floraison.    D:1/m².   Série de prix: D.                                                                                                                            4 4 1 6 1 -1-1-11 0 0 1 000001111110100001000000000011000000000001000000000001000010000<hr align="left" size="1" />
description :
Les premieres informations font 30 caracteres au maximum
puis une ou plusieurs phrases 250 caractéres au maximum puis une série de chiffres qui correspondent à différente caractéristiques

J'arrive à l'ouvrir mais je n'arrive pas à récupérer 1 à 1 les informations ( récuperer les 30 premiers caractéres puis les 30 suivantes puis ainsi de suites)

Voilà si vous avez deux ou trois commandes à me donner,
merci d'avance
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Dernière intervention
6 avril 2012
47
3
Merci
Salut,

Essaie de te creer un Type representant tes donnee
d'apres ce que tu as dit le Type pourrait être

Private Type InfoDat 
    Info1 As String * 30 
    Info2 As String * 30 
    Info3 As String * 30 
    Info4 As String * 30 
    Info5 As String * 30 
    Phrase As String * 250 
End Type 

Ensuite pour le recuperer tu fais

Dim Info As InfoDat 
Open "C:\MonFichier.txt" For Binary As #1 
    Get #1, , Info 
Close #1 

@+ ,Julien
Pensez: Règlement/STRONG>

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 120 internautes nous ont dit merci ce mois-ci

Commenter la réponse de jrivet
Messages postés
5
Date d'inscription
jeudi 27 juillet 2006
Dernière intervention
7 août 2006
0
Merci
merci pour cette solution j'essayerais ca quand je serais rentré chez moi.
Mais comme j'ai pas Internet à la maison je ne pourrais valider ou non cette solution que lundi matin
Commenter la réponse de rafoulefou
Messages postés
5
Date d'inscription
jeudi 27 juillet 2006
Dernière intervention
7 août 2006
0
Merci
c'est bon ca marche merci beaucoup
Commenter la réponse de rafoulefou

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.