Discussion :

[ddove53]

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 CheminFichier As String = ""
        Dim m_sConn1 As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                    "Data Source=" & CheminFichier & " " & _
                    ";Extended Properties=""Excel 8.0;HDR=YES"""
        Dim conn1 As New System.Data.OleDb.OleDbConnection(m_sConn1)
        Dim objInfosListe As New BObject.oListeParam
        Dim dttRequete As DataTable = objInfosListe.mDttRequeteSql(sql)
        Response.Clear()
        Response.Buffer = True
        Response.Charset = ""
        Response.ContentEncoding = System.Text.Encoding.Default
        Response.Cache.SetCacheability(HttpCacheability.NoCache)
        Dim gdvEmplacement As GridView = New GridView()
        Dim NomFichier As String = libelle & "_" & Now.ToShortDateString.Replace("/", "_") & ".xls"
 
        gdvEmplacement.DataSource = dttRequete2
        gdvEmplacement.DataBind()
        'Dim ioWriter As New System.IO.StringWriter
        'Dim htmlWriter As New System.Web.UI.HtmlTextWriter(ioWriter)
        Dim htmlWriter As New System.Web.UI.HtmlTextWriter(Response.Output())
        gdvEmplacement.RenderControl(htmlWriter)
        Response.ContentType = "application/vnd.ms-excel"
        Response.AddHeader("content-disposition", "attachment;filename=" & NomFichier)
        'Response.Write(Replace(ioWriter.ToString(), "'", ""))
        'Response.Write(Replace(htmlWriter.ToString(), "'", ""))
        Response.End()

Bonjour, la génération marche bien mais ca prends beucoup de temps (plus de 10 mn pour 13144 lignes).
y a-t-il moyen de l'optimiser?
Merci.

[Skalp]

Y a-t-il une ligne particulière qui prend plus de temps que les autres ? Laquelle est-elle ?

[Sankasssss]

Hello,
dans une discussion, un membre donne une autre méthode : http://www.developpez.net/forums/d35...es-vers-excel/
a tester.

[ddove53]

C'est bien mais quand on n'a pas excel installé sur le serveur on ne peut pas utiliser cetrte méthode:
http://www.developpez.net/forums/d35...es-vers-excel/
y-a pas une autre manière de faire?
Merci.

[ddove53]

les fichiers extraits pèsent 73 Mo chacun !!! Alors que normalement ça pèse pas plus de 1,7 Mo

[Skalp]

Plusieurs méthodes qui ne nécessitent pas qu'Excel soit installé sur la machine sont expliquées dans cet article : Comment générer un fichier Excel en ASP.NET