Je cherche à convertir un fichier texte en table Access par l'intermédiaire de VB6...
Voici le code dont je me sert tiré d'un livre :
------------------------------------------------
Dim S As String
'j'ouvre le fichier en lecture
Open "D:\AAA.txt" For Input As #1
'j'ouvre le fichier en ajout
Open "D:\BBB.txt" For Append As #2
'tant que la fin du fichier n'est pas atteinte
Do While Not EOF(1)
'lit la ligne et passe à la suivante
Line Input #1, S
'si les 2 premiers caractères ne sont pas "SR" ou "NI"If (Left(S, 3) "SRV" Or Left(S, 3) "NI4") Then
Print #2, S
End If
'revient à la boucle
Loop
'ferme les fichiers
Close #1
Close #2
--------------------------------------------------
mais à la place de rechercher 2 caractères je voudrais rechercher un chaine de caractère hors je ne trouve pas de fonction ou de code le permettant.
Ça serait cool si quelqu'un avait une solution car j'en ai besoin assez vite ... :( c'est pour mon stage !
Merci
@+
Luun@
A voir également:
Rechercher une chaine de caractère dans un fichier texte...
voila j'esperes que ca t'aider il reste a tout mettre ensuite pour que ca marche et a trouver les bonne expression reguliere
cf. Internet MSDN ou des cours de perl ....