Petit soucis avec manipulation fichier + chaine de caractères - VB

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Petit soucis avec manipulation fichier + chaine de caractères - VB

waterbro

Voilà j'ai un petit souci. Ca ne m'a pas l'air ultra compliqué mais pourtant je n'y arrive pas...

En fait j'obtient ça dans un fichier:

10101011100070 PERFUSION, DIFFUSEUR
101020100000000000AO00000

Et j'aimerai obtenir ça:

10101011100070 PERFUSION, DIFFUSEUR 101020100000000000AO00000

Don réunir les deux lignes (mon fichier contenant énormément de lignes)

Merci d'avance

Message édité par waterbro le 23-04-2004 à 11:54:12

Publicité

phenxdesign

hum, kan tu les ecris, mets

print #1, "10100101000" & " " & deuxiemeLigne

si tu fais deja

print #1, "10100101000"
print #1, deuxiemeLigne

voila, jespere tavoir aidé

Message édité par phenxdesign le 23-04-2004 à 12:45:39

waterbro

Oui mais non car le tout est dans une variable donc j'affiche tout d'un coup.
Voilà en gros mon code :

For v = 0 To UBound(Li)
If (Left(LTrim(Li(v)), 3) = "101" ) Then
If (Left(LTrim(Li(v)), 5) = "10101" ) Then
Print #2, LTrim(Li(v))
ElseIf (Left(LTrim(Li(v)), 5) = "10102" ) Then
Print #2, LTrim(Li(v))
End If
End If
Next

La variable ou est contenu ce que j'écris par la suite est Li. Voilà

JihemAir

Je sais pas

Dim strTemp as string

For v = 0 To UBound(Li)
If (Left(LTrim(Li(v)), 3) = "101" ) Then
If (Left(LTrim(Li(v)), 5) = "10101" ) Then
strTemp = LTrim(Li(v))
ElseIf (Left(LTrim(Li(v)), 5) = "10102" ) Then
Print #2, strTemp & " " & LTrim(Li(v))
End If
End If
Next

Et ça, ça marcherait ?

---------------
J'ai un message.."Cliquez OK pour continuer."...Qu'est ce que je fais ?

waterbro

OUI ça marche !!!

Merci beaucoup !! :jap:

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Petit soucis avec manipulation fichier + chaine de caractères - VB

Sujets relatifs
[VBA] 3 fichier Excel dans un seul !?	comparaison de chaine mais de nombre :-/
[C++]Port Serie -> Envoi d'un fichier texte...	Petit probleme :/
Extraction et conversion d'un fichier xml en fichier image	programmation de l'exécution d'un fichier batch avec la schtasks
Enregistrer et lire une structure dans un fichier	[PHP] Changer localement le niveau d'erreur dans un fichier
[Java] parser fichier CSV... JDBC ?	[JS] Petit pb ! mémorisation d'une variable => RESOLU
Plus de sujets relatifs à : Petit soucis avec manipulation fichier + chaine de caractères - VB

Page générée en 0.031 secondes