Récuperer des données d'un fichier avec separateur ";"

Question

Bonjour,
j'aimerai SVP recuperer des champs d'un fichier texte separ&#233;s par des ";" pour chaque ligne 
et les stoquer dans des varibles pour les ins&#233;rer apres dans une base Oracle.
voila la format du fichier :
ex:
0013; 04/09/2004 ;16;2;0;0;0;2
0023; 04/09/2004 ;16;2;1;0;0;2
0027; 04/09/2004 ;16;3;0;0;0;2

Merci d'avance

jhary69 · Answer

salut,

0/ tu cr&#233;es un tableau de string non dimensionn&#233; (Dim strTab( ) as string)
1/ tu lis 1 ligne (stock&#233; dans une chaine ex :strTemp)
2/ tu fais un strtab = Split(strTemp,";") 
2'/ tu as maintenant un tableau contenant : 
     Element 0 = 0013
     Element 1 = 04/09/2004
     Element 2 = 16
     Element 3 = 2
     Element 4 = 0
     Element 5 = 0
     Element 6 = 0
     Element 7 = 2

3/ tu lis la ligne suivante ...

A+

Christophe.

cs_69chris · Answer

Salut,



Tu peux aussi essay&#233; de te connecter sur le fichier avec une connection OleDB et l'utiliser comme une base de donn&#233;es.



Un petit exemple en VB.NET



Dim adp As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("Select
* from MonFic.csv", "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\MonChemin\;Extended Properties='text;HDR=Yes;FMT=Delimited'")
Dim dst As DataSet = New DataSet

adp.Fill(dst)



Tu as le contenu du fichier dans un DataTable.

C'est un peu plus "lourd" que le parsing de fichier mais &#231;a tourne
aussi. Seul probl&#232;me aussi, il faut un acc&#232;s exclusif au fichier....



Chris


N'oubliez pas de cloturer votre post.

Récuperer des données d'un fichier avec separateur ";"

2 réponses

Discussions similaires