Imports AppCommon
Imports AppVariable

Public Class logout
    Inherits System.Web.UI.Page

#Region "******************** ページイベント ********************"

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        '2020/6/22 ADD START モバイル版実装
        'セッションを削除する前、現在の表示モードを取得 /Liu
        Dim strMode As String = ""
        If Session(S_COM_DisplayMode) = "mobile" Then
            strMode = "mobile"
        End If
        '2020/6/22 ADD END /Liu

        Com_Del_Cookies()
        Session.Clear()

        '2020/6/22 MOD START モバイル版実装
        'Response.Redirect(Request.ApplicationPath & Logout_FilePath)
        If strMode = "mobile" Then
            Response.Redirect(Request.ApplicationPath & Logout_FilePath_Mobile)
        Else
            Response.Redirect(Request.ApplicationPath & Logout_FilePath)
        End If
        '2020/6/22 MOD END /Liu
    End Sub

#End Region

End Class