Discussion :

[calison3]

Bonjour à tous

J'ai une page aspx et quand je clique sur un bouton, ça généère un fichier excel sur le serveur et après je donne le lien au client pour qu'il puisse le sauver sur son pc! Cela marche bien.

Mais quand j'ai commençé à faire plusieurs boucles imbriquées, à l'exécution, il faut 2 minutes si pas plus!!!! Est-ce normal??? Le résultat sort mais c'est très lent :-(

Voici mon code: (C'est cette partie là qui provoque la lenteur de l'exécution.)

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
 
            Dim k As Integer = 3, l As Integer = 0
            Dim i As Integer = 0, j As Integer = 0
            Dim Fct As New Fonctions
            For i = 1 To Fct.DaysInMonth(Mois - 1, Date.Now.Year)
                oSheet.Cells(1, i + 5) = Mois - 1 & "/" & i
            Next
 
            Dim TabType() As String = New String(16) {"LEG", "REC", "FER",
 "ANC", "RHS", "PRA", "PRP", "DEM", "SSS", "DIV", "MAL", "EDU", "COM",
 "MAR", "MOR", "MAT", "PAR"}
 
            For i = 0 To NbEmploye - 1
                For j = 0 To 16
                    oSheet.Cells(k, 1) = DSET.Logon(i).LastName & " " &
 DSET.Logon(i).FirstName
                    oSheet.Cells(k, 5) = TabType(j)
                    For l = 1 To Fct.DaysInMonth(Mois - 1, Date.Now.Year)
                        oSheet.Cells(k, l + 5) = "blabla"
                    Next
                    k = k + 1
                Next
            Next

Et je suis encore sensée écrire autre chose à la place de "blabla" --> aller dans mon DataSet et vérifier si la personne a prit congé ce jour là et écrire 1 dans la cellule si c'est le cas ou 0.5.


Deuxième question: pour le filtrage des données, je connais pas grand chose:
Ca doit être un genre à ça je pense:

Code :

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

1
2
 
Dim ROWArray As Array = DSET.JOURS.Select("Jour='01/02/2006'")

Je voudrais récupérer le record correspondant à:

Code :

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

1
2
3
4
5
 
SELECT J.partie_jour 
FROM JOURS J, CONGES C, Logon L
WHERE J.id_conge=C.ID AND C.Employe=L.ID
AND J.jour='01/01/2006' AND L.Log='EBEACOLQ01'

Merci

[stephane eyskens]

Pour la lenteur, ceci dépend du nombre d'employés que tu as mais bon, en admettant que tu aies 1000 employés, et que tu fasses tourner ta procédure en janvier, tu obtiendras 527 000 itérations, ce qui n'est quand même pas mal. Et encore, tu ne montres pas tout ton code donc peut-être y a-t-il d'autres boucles? (k=k+1 à quoi sert-il?)

Ensuite pour les filtres, tu utilises la bonne méthode. Il faut en effet mettre par ex: MyDataTable.Select("column <operator> value....");

[neguib]

Mmmh, comme tu travailles sous ASP.Net, je me demande s'il ne serait pas plus judicieux d'utiliser directement l'exportation native vers le format .xls
via par exemple :

System.Web.HttpContext.Current.Response.ContentType = "application/vnd.ms-excel";

Bon il est vrai que çà nécessite une nouvelle fonctionnalité du site qui identifierait le client, lui afficherait son DataSet dans un DataGrid exporté au format .xls, il n'aurait plus qu'à faire un enregistrer sous...
çà s'éloigne evidemment peut être de ta problématique mais çà résoud je crois les histoires de lenteur et d'implémentations de boucles gourmandes par choix incertain d'un type de programmation