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

rafoulefou 5 Messages postés jeudi 27 juillet 2006Date d'inscription 7 août 2006 Dernière intervention - 4 août 2006 à 15:41 - Dernière réponse : rafoulefou 5 Messages postés jeudi 27 juillet 2006Date d'inscription 7 août 2006 Dernière intervention
- 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
jrivet 7401 Messages postés mercredi 23 avril 2003Date d'inscription 6 avril 2012 Dernière intervention - 4 août 2006 à 15:51
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>

Merci jrivet 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 124 internautes ce mois-ci

Commenter la réponse de jrivet
rafoulefou 5 Messages postés jeudi 27 juillet 2006Date d'inscription 7 août 2006 Dernière intervention - 4 août 2006 à 16:07
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
rafoulefou 5 Messages postés jeudi 27 juillet 2006Date d'inscription 7 août 2006 Dernière intervention - 7 août 2006 à 08:15
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.