
Partial Class order_centre_process_document
    Inherits System.Web.UI.Page

    Private _webAdapter As New WebWS()

    Public ReadOnly Property WebAdapter() As WebWS
        Get
            Return _webAdapter
        End Get
    End Property

    Public ReadOnly Property BaseImageURL() As String
        Get
            If Not Session("BaseImageURL") Is Nothing Then
                Return Session("BaseImageURL")
            Else
                Return "themes/orange/"
            End If
        End Get
    End Property

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If (Not System.Web.HttpContext.Current.User.Identity.IsAuthenticated()) Then
            Response.Redirect("~/order_centre/login.aspx")
        End If

        Response.Write(Session("ThankYou"))

        If Session("ThankYou") = "true" Then
            Response.Redirect("~/order_centre/job_options.aspx")
        End If

        ' Disable Language Panel.
        Dim _languagesPanel As Web.UI.WebControls.Panel = Me.Master.FindControl("LanguagesPanel")
        Dim _languagesSpacer As Web.UI.HtmlControls.HtmlGenericControl = Me.Master.FindControl("LanguagesSpacerLabel")
        _languagesPanel.Visible = False
        _languagesSpacer.InnerHtml = "<br /><br />"

        Dim _activationId As String = _webAdapter.GetActivationIdByStoreId(Session("StoreId"))
        Dim _lang As String = "en"
        If Not Request.Cookies.Item("lang") Is Nothing Then
            _lang = Request.Cookies.Item("lang").Value
        Else
            If Not Session("lang") Is Nothing Then
                _lang = Session("lang").ToString()
            End If
        End If

        If Session("ConvertToPdf") Then
            Dim _redirectPage As String = "convert_to_pdf_step1.aspx"
            IFrame1.Attributes("src") = _redirectPage
        Else
            Dim script As String = "<SCRIPT LANGUAGE='JavaScript'>window.onload=top.location.href = 'thank_you.aspx';</SCRIPT>"
            ClientScript.RegisterClientScriptBlock(Me.GetType(), "ClientScript", script)
        End If

    End Sub

End Class
