要記得加入【Imports System.Web.HttpContext】

Imports Microsoft.VisualBasic  
Imports System.Web.HttpContext  
 
Public Class objTSession  
    Private m_SData As String 
 
    Public ReadOnly Property SData() As String 
        Get 
            Return "從Class中讀出的Session:" + m_SData  
        End Get 
    End Property 
 
    Public Sub New()  
        If Current.Session("txt") IsNot Nothing Then 
            m_SData = Current.Session("txt").ToString  
        Else 
            m_SData = "" 
        End If 
    End Sub 
 
End Class 


arrow
arrow
    全站熱搜

    Roger 發表在 痞客邦 留言(0) 人氣()