Lecture d'un fichier .DATRésolu

Question

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

jrivet · Accepted Answer

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>

rafoulefou · Answer

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

rafoulefou · Answer

c'est bon ca marche merci beaucoup

Lecture d'un fichier .DAT

3 réponses

Votre réponse

Discussions similaires