AppState Object is Blank

[Anthony C]

I'm setting a couple of appstate objects with the
following code... when I go to access them later, i'm not
getting any data.. please help

CODE IN GLOBAL.ASAX:
================================================== ======
Sub Application_Start(ByVal sender As Object, ByVal e As
EventArgs)
' Fires when the application is started
Dim aImpactUniverseArray() As ftImpactOutRecord
Dim hImpactUniverseHash As Hashtable = New
Hashtable()
Dim lCount As Long

ReDim aImpactUniverseArray(0)
' Read in Universe & Universe Hashtable
lCount = ReadftImpact(aImpactUniverseArray,
hImpactUniverseHash)
Application("ftImpactUniverse") =
aImpactUniverseArray ' Structure
Application("ftImpactUniverseHash") =
hImpactUniverseHash ' Hashtable
' Read in pricing & hash
End Sub

CODE IN ASPX PAGE ACCESSING AT RUNTIME:
================================================== =======

Private Sub Page_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles MyBase.Load
'/ Get Impact Universe
ftImpUniverse = Application("ftImpactUniverse")
hImpHash = Application("ftImpactUniverseHash")
End Sub

[Anthony C]

Never Mind - internal bug

-----Original Message-----
I'm setting a couple of appstate objects with the
following code... when I go to access them later, i'm notgetting any data.. please help

CODE IN GLOBAL.ASAX:
================================================= =======
Sub Application_Start(ByVal sender As Object, ByVal e As
EventArgs)
' Fires when the application is started
Dim aImpactUniverseArray() As ftImpactOutRecord
Dim hImpactUniverseHash As Hashtable = New
Hashtable()
Dim lCount As Long

ReDim aImpactUniverseArray(0)
' Read in Universe & Universe Hashtable
lCount = ReadftImpact(aImpactUniverseArray,
hImpactUniverseHash)
Application("ftImpactUniverse") =
aImpactUniverseArray ' Structure
Application("ftImpactUniverseHash") =
hImpactUniverseHash ' Hashtable
' Read in pricing & hash
End Sub

CODE IN ASPX PAGE ACCESSING AT RUNTIME:
================================================= ========

Private Sub Page_Load(ByVal sender As System.Object, ByVale As System.EventArgs) Handles MyBase.Load
'/ Get Impact Universe
ftImpUniverse = Application("ftImpactUniverse")
hImpHash = Application("ftImpactUniverseHash")
End Sub
.