COLLECTION GÉNÉRIQUE

Commentaire de BnJ99 le 12/04/2007 11:09:07

Bonjour,
d'après ce que je crois comprendre, c'est le source de ta bibliotheque, mais peux t'on avoir une petite appli de démonstration qui nous montrerait les possibilités de ta bibliotheque (ajout, suppression, accès avec les clef, etc.)

J'aurais 2 petites remarques après avoir lu le code :

- 1. Y'a des lignes de code mise en commentaire, il aurait été préférable de les supprimer (là je chipote)
- 2. Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code, Commente ton code,
Tu fais un nouvelle classe ? Commente ton code pour dire à quoi elle sert.
Tu fais une nouvelle fonction un peu touffue ? Commente ton code pour dire ce qu'elle va faire.
Tu viens de finir un bout de code sortie de ton imagination délirante (si si, avoue) ? Commente ton code pour expliquer ce que ça fait et comment ça le fait.

C'est hyper important de commenter, d'une part pour nous qui lisons le code d'un autre, et d'autre pour toi. Car dans 6 mois quand tu auras besoin de remettre le nez dedans pour faire une modif' ou une amélioration...ben tu seras dans les pixels jusqu'au cou et tu perdras un temps fou à recomprendre ton propre travail.

Commentaire de id2006 le 13/04/2007 11:58:11

bonjour,
désolé pour les commentaires, pas le temps, pourtant je preche pour ça, mais là je suis
en phase de découverte de VB.NET

Pour mes devs. en vb6 j'utilisais la méthode qui consiste à créer des collections d'objets calqués sur la db, en fait un 3-tiers réduis à 2-tiers. (couche métier et acces donnée regroupees)
ex: si j'ai une table Users -> j'ai une classe cUsers(la collection) et une classe cUser
cUsers hérite de la collection "Inherits IGenericObject(Of Integer, cUser, cUsers)"
cUsers contient les méthodes Load (depuis la base) add, remove, item, etc...
cUser contient les propriétés tel que Prenom,nom, etc...
cUser contient Update

dans add,remove et update on
je mettrais un petit projet en ligne des que j'aurais un instant. désolé je fais pas le gars overbooké, mais là j'ai vraiment pas le temps

ex du ADD dans la collection

'OVERLOADS PAR CE QUE ADD EST DANS LA COLLECTION
Public Overloads Sub Add(ByRef User As cUser)

        Try

            Dim i As Integer

            Dim SQL_Cnx As New SQLServer
            SQL_Cnx.Connect("sa", "DAMO", "POR-ALEX\PORDAMO", "DAMO_PARAMS")

            Dim SqlCmd As SqlCommand = New SqlCommand("INSERT INTO Users" & _
                               "(TypeUser, Civilite,Prenom,Nom,Login,Password)" & _
                                "Values(" & User.TypeUser & ", " & _
                                User.Civilite & ", " & _
                                User.Prenom & ", " & _
                                User.Nom & ", " & _
                                User.Login & ", " & _
                                User.Password & ")
            'C'EST ICI QU ON SE SERT DE LA COLLECTION GENERIQUE
            MyBase.Add(i, User)

        Catch ex As Exception
            MsgBox(ex.InnerException.Message)
        End Try

    End Sub

dans l'interface on peut ecrire

        Private Sub LoadDataGrid()
            Dim oUsers As cUsers
            Dim oUser as cUser


            Users.AutoSort=False
            Users.load 'dans le load il y a la requete qui charge la collection
            'ici on trie sur deux champs
            Users.SortExpression = "Nom ASC, Prenom ASC"
            Users.Sort()

            For Each oUser In DADParams.Users
                With oUser
                    dagUsers.Rows.Add(oUser.Key, _
                                        oUser.Login, _
                                        oUser.Prenom, _
                                        oUser.Nom, _
                                        oUser.DateNaissance, _
                                        oUser.NumSS)
                End With
            Next

        End Sub

voila si ça peut aider, désolé je ferais de mon mieux pour fournir un projet
clair, ceux qui ont le temps d'étudier la question me diront ce qu'ils en pensent.
Je dev. sur VB.NET depuis une mois et les limitations que j'avais avec VB6 se sont envolées.