document.write('
');
document.write(' Public Class SessionHelper(Of T)
');
document.write('
');
document.write('#Region "External Methods"
');
document.write(' Public Shared Function ReadSessionItem(ByVal name As String) As T
');
document.write(' Dim value As T = Nothing
');
document.write('
');
document.write(' value = CType(System.Web.HttpContext.Current.Session(name), T)
');
document.write('
');
document.write(' Return value
');
document.write(' End Function
');
document.write('
');
document.write(' Public Shared Sub WriteSessionItem(ByVal name As String, ByVal value As T)
');
document.write(' Dim item As Object = System.Web.HttpContext.Current.Session(name)
');
document.write('
');
document.write(' If item Is Nothing Then
');
document.write(' System.Web.HttpContext.Current.Session.Add(name, value)
');
document.write(' Else
');
document.write(' System.Web.HttpContext.Current.Session(name) = value
');
document.write(' End If
');
document.write(' End Sub
');
document.write('#End Region
');
document.write('
');
document.write(' End Class
');
document.write('
');
document.write('
');