Private Sub WebSocket_Connected (WebSocket1 As WebSocket)
...
...
...
If session.GetAttribute2("IsAuthorized", "") = "" Then
If Main.config.Get("demo") = "1" Then
page.InputBox("demo","The demo version is disabled","Loguj","Anuluj",True,ABM.INPUTBOX_QUESTIONTYPE_PASSWORD,ABM.INPUT_PASSWORD,"","","","Błąd",False,ABM.MSGBOX_POS_CENTER_CENTER,"")
End If
Return
End If
ABM.UpdateFromCache(Me, ABMShared.CachedPages, ABMPageId, ws)
If page.ComesFromPageCache Then
...
...
...
End Sub