Lecture d'une chaine de caractère dans un fichier texte
cs_dhodre
Messages postés2Date d'inscriptionmercredi 21 mai 2003StatutMembreDernière intervention 5 juin 2003
-
22 mai 2003 à 15:26
sylric
Messages postés91Date d'inscriptionmardi 21 janvier 2003StatutMembreDernière intervention22 août 2003
-
22 mai 2003 à 16:06
Je cherche à lire une partie d'un fichier texte jusqu'à un point d'arret identifié par le caractère "#".
Le problème c'est que mon texte comprend des virgules, donc je ne peux pas utiliser la fonction Input et que la partie à enregistrer comprend des retours à la ligne qu'il faut également identifier...
Le but étant au final de partir d'une extraction de base de données (au format txt) et de lire ce fichier pour rajouter des balises html afin de créer une page html qui présente les données...
Merci de votre aide,
David
A voir également:
Lecture d'une chaine de caractère dans un fichier texte
sylric
Messages postés91Date d'inscriptionmardi 21 janvier 2003StatutMembreDernière intervention22 août 2003 22 mai 2003 à 16:06
Cet algo devrait te permetre de faire ce que tu veux.
Il utilise la commande Line Input, et on remet à chaque ligne, le retour chariot qu'il faut identifier.
Quand le # est trouver on arrête
La partie récupérée est mise dans la variable "tmp"
Open "c:\Document Texte.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, a
For i = 1 To Len(a)
If Mid(a, i, 1) = "#" Then
tmp = tmp & Chr(13) & Chr(10) & Left(a, (i - 1))
Exit Do
End If
Next i
tmp = tmp & Chr(13) & Chr(10) & a
Loop
Close #1
tmp = Mid(tmp, 3)
MsgBox tmp