Session et classe

Comment faire pour tester si un session est créé en sachant que celle-ci si elle est créé contient une class.

Si la session n'est pas créé mon test marche
Session.Contents("MonPanier") = ""
par contre si la session est créé et que je retest ca me met ça comme erreur.

Dans ma session je met ça si elle est pas créé :

Session.Contents("MonPanier") = Panier()

Panier() c'est ma class

Operator is not valid for type 'Panier' and string ""

Merci de me répondre ++

On a rien sans rienf

Salut

Ton 'Panier' te renvoie quoi comme type de données ? Une variable ?
Parce que là on dirait qu'il renvoie un événement...

En gros, dans ta classe, 'Panier' c'est quoi, une Property, un Sub...?



Nurgle
C'est une grande folie que de vouloir être sage tout seul !

Ben il a une méthode ki me renvoi des articles mes à la base le panier renvoi rien du tout.

On a rien sans rien

    Class Panier
        Private _iIDUser As Integer
        Private _iArticle() As Integer
        Private _iNBArticle() As Integer
        Private _iPosition As Integer
   
        ' Constructeurs
        Public Sub New()
            _iIDUser = 0
            _iPosition = 0
            reDim _iArticle(100)
            reDim _iNBArticle(100)
        End Sub
   
        ' Propriétés
        Public Property User As Integer
            Get
                Return _iIDUser
            End Get
            Set (ByVal Value As Integer)
                _iIDUser = value
            End Set
        End Property
   
        Public Property Article(ByVal Position As Integer) As Integer
            Get
                Return _iArticle(Position)
            End Get
            Set (ByVal Value As Integer)
                _iArticle(Position) = value
            End Set
        End Property
       
        Public Property NBArticle(ByVal Position As Integer) As Integer
            Get
                Return _iNBArticle(Position)
            End Get
            Set (ByVal Value As Integer)
                _iNBArticle(Position) = value
            End Set
        End Property
       
        Public Property Position As Integer
            Get
                Return _iPosition
            End Get
            Set (ByVal Value As Integer)
                _iPosition = value
            End Set
        End Property
   
        ' Méthodes
        Public Function fnAjout(ByVal Article As Integer, NBArticle As Integer)
            _iArticle(_iPosition) = Article
            _iNBArticle(_iPosition) = NBArticle
            _iPosition = _iPosition + 1
        End Function
End Class

voilé ma class

On a rien sans rien

Dans ce cas c'est une méthode,  et tu ne peux pas stoquer une méthode dans une variable de Session ! Tu peux y stocker uniquement une variable (comme son nom l'indique...)!

Mais je comprends pas ce que tu fait avec les Sessions : le principe d'une classe étant d'éviter d'avoir des fonctions et des variables de sessions...

Si j'ai bien compris tu veux tester si la classe a été lancée ou si elle ne l'a pas été ?



Nurgle
C'est une grande folie que de vouloir être sage tout seul !

Salut,

Tu ne peux pas mettre une classe dans une session, mais uniquement un objet (une instance de ta classe):

Dim monPanier as Panier
monPanier = New Panier()

Session.Contents("MonPanier") = monPanier


Apparemment (je me trompe ?) c'est de l'ASP et pas de l'ASP.NET
...
en asp tu ne peux pas mettre d'objet en session.

yopyop

Oui c possible mais je ne veut pas instancier ma class à chaque chargement de la page c pour cette raison que je test si ma session contien déjà quelque chose.

On a rien sans rien

Tu es obligé de l'instancier à chaque chargement de la page...

Ou tu peux peut être le faire dans le global.asa ?
(ça marche bien pour des objets comme les bases de données, alors pourquoi pas pour une classe dans ce genre là...)
Tu pourrais l'instancier dans le Application_OnStart comme ça ta classe 'Panier' est accessible depuis toutes tes pages (enfin, je crois...).



Nurgle
C'est une grande folie que de vouloir être sage tout seul !

Ok,

Au risque de me répéter un peu, en ASP 3.0 tu ne peux pas mettre une classe en session...(en fait dans uncun language que je connaisse)... tu ne peux pas non plus y charge une instance d'une classe...

En effet, les classes que tu crées ASP ne sont pas des "vrais" objets (pas comme une connection ou un recordset, ...)..
Lorsque tu mets ta connection en mémoire, tu ne mets pas un objet vbs (ASP) mais un objet issu d'une dll (Server.CreateObject(".....")).

Ce que tu peux faire, c'est ajouter une méthode à ton objet qui se sauve et se retrouve dans la variable session. Pour cela tu dois transformer toutes tes données en string.

Public Function SaveToSession()
Dim strValues
  strValue = Cstr(_IDUser) & "#" & Join(_iArticle,"**") & "#" Join(_iNBArticle,"**") & "#" & CStr(_iPosition)
  Session("monPanier") = strValues
End Function

Public Function LoadFromSession()
Dim strValues()
If Trim("" & Session("monPanier"))<>"" Then
  strValues = Split(Session("Panier"),"#")
  _IDUser = strValues(0)
  _iArticles = Split(strValues(1),"**")
  _iNBArticle = Split(strValues(2),"**")
  _iPosition = strValues(3)
End If
End Fucnction

Ou alors tu crées une dll pour ton objet et là tu pourras le mettre directement dans la variable session (tout comme une connection, un recordset, ...)

PS:
je suis pas sûr à 100% du code mais il devrait fonctionner.

yopyop

strValue = Cstr(_IDUser) & "#" & Join(_iArticle,"**") & "#" Join(_iNBArticle,"**") & "#" & CStr(_iPosition)

strValues = Cstr(_IDUser) & "#" & Join(_iArticle,"**") & "#" Join(_iNBArticle,"**") & "#" & CStr(_iPosition)

mfff

yopyop