Posted on: 7/29/2015 4:08:11 PM | Views : 766

Public Sub CheckSessionTimedOut() 'message to user stating Current.Session has expired If bDisplayTimeout = True Then If (Current.Session.IsNewSession) And (Current.Request.Cookies("ASP.NET_SessionId") IsNot Nothing) Then Dim QUOT = Chr(34) Dim timeoutMessage As String = "" timeoutMessage &= Translate("You have been inactive for too long and your Current.Session has expired!") SendToScreen("<SCRIPT TYPE=" & QUOT & "text/javascript" & QUOT & " LANGUAGE=" & QUOT & "javascript" & QUOT & ">" & vbCrLf) SendToScreen("var themessage = " & QUOT & timeoutMessage & QUOT & ";" & vbCrLf) SendToScreen("alert(themessage);" & vbCrLf) SendToScreen(&q ...

Go to the complete details ...