Bonjour ,
J'utilise le code suivant pour générer un fichier CSV à partir du résultat d'une requête.
L'idée est de parcourir le reader et écrire dans le fichier.
est ce que vous avez une idée plus optimale, car pour les fichiers de grandes tailles (49M), ça nécessite beaucoup de temps.
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26 Dim vTab As String vTab = vbTab Dim sw As StreamWriter sw = New StreamWriter(Server.MapPath("./TempReports/263.CSV"), False, System.Text.Encoding.Unicode) Dim Requete As String = "SELECT ...." comm = New OracleCommand(Requete, ConnExcel) vReader = comm.ExecuteReader ..... While vReader.Read For j = 1 To NombreColonnes - 1 If Not IsDBNull(vReader(j)) Then sw.Write(Trim(vReader(j)) & vTab) Else sw.Write("" & vTab) End If Next End While vReader.Close() sw.Close() ConnExcel.Close() ConnExcel.Dispose() End While
Partager