% @ LANGUAGE=VBSCRIPT CODEPAGE = 1252 %> <% SendHeader 0, 1 %> <% ' ' On Error Resume Next CheckSession bstrVirtRoot + "/forms/srvrmsg/frmroot.asp", "self" bstrError = "" Set objChatService = Session(bstrChatService) If objChatService Is Nothing Then bstrError = L_errFailToCreateChatService_ErrorMessage End If %>