rp's Blog

A meatball's guide to living with .NET

Tuesday, August 15, 2006

Hello this is my first post

Hmmm. Does this work.


BegFunc IsSessionExpired Type( *Boolean ) Access( *Protected )
DclFld CookieHeader Type( *String )
DclFld Expired Type( *Boolean ) Inz( *False )

If ( Context.Session <> *Nothing )
If ( Session.IsNewSession )
CookieHeader = Request.Headers[ "Cookie" ]
If ( CookieHeader <> *Nothing ) AND ( CookieHeader.IndexOf( "ASP.NET_SessionId" ) > -1 )
Expired = *True
EndIf
EndIf
EndIf

LeaveSr Expired
EndFunc