Discussion :

[itokia]

Bonjour

Je souhaiterais charger un fichier csv dans un datagridview à partir de jet.oledb.
Le chargement s'effectue correctement mais la délimitation par ";" n'est pas pris en compte.
Tout est stocké dans une seul colonne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
        Dim CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & repImpDest & ";Extended Properties=""text;HDR=Yes;FMT=Delimited"";"
 
        Dim nomFichier As String = maDate.ToString("yyyyMMdd") & "-VER.csv"
        Dim dataTable As DataTable = New DataTable("dataTableVer")
        Using Adp As New OleDbDataAdapter("select * from [" & nomFichier & "]", CnStr)
            Adp.Fill(dataTable)
        End Using
 
 
        'Affichage
        DataGridView1.DataSource = dataTable

Mon fichier csv est séparé par des ; et les champs ne sont pas délimité par des double cote.

Avez vous une idée du pourquoi?

Merci

[Mario Rousson]

Salut
Moi je m'y prend d'une autre façon pour lire un csv voici ce que je fais ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Imports System.IO
'Pour la lecture du fichier csv
Dim Chem As String = My.Settings.Chemin & "Symbole\" & Lst & "\EtatsFin\" & RapTyp & Prd & ".csv"
Dim StrRap() As String = File.ReadAllLines(Chem)
For y As Integer = 0 To StrRap.Count - 1
 
Dim StrDat() As String = StrRap(y).Split(";"c)
 
etc.
.....
Next

j'espère que ça peut aider
ciao

[itokia]

Salut,

Merci pour ta réponse.
Le hic c'est que mon fichier fait plus de 300 000 lignes et que seulement 20 000 me sont utiles.
Du coup j'aurais aimé récupérer juste une partie du fichier par requete et non devoir lire toutes les lignes.

Pour l'instant c'est ce que je fais mais je ne trouve pas cela très optimisé