cs_Luuna
Messages postés8Date d'inscriptionsamedi 22 mars 2003StatutMembreDernière intervention15 juillet 2004
-
10 juil. 2003 à 20:31
cs_menix
Messages postés3Date d'inscriptiondimanche 13 juillet 2003StatutMembreDernière intervention14 juillet 2003
-
13 juil. 2003 à 15:52
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 !
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 ....