
Partial Class articles_print_to_pdf_driver
    Inherits System.Web.UI.Page
    Public _selectedLanguage As String = ""

    Protected Overrides Sub InitializeCulture()

        If Request.QueryString("lang") IsNot Nothing Then
            _selectedLanguage = Request.QueryString("lang").ToString
        Else
            If Session("lang") IsNot Nothing Then
                _selectedLanguage = Session("lang").ToString
            Else
                If Request.Cookies("lang") IsNot Nothing Then
                    _selectedLanguage = Request.Cookies("lang").Value.ToString
                End If
            End If
        End If

        Session("lang") = _selectedLanguage

        If String.IsNullOrEmpty(_selectedLanguage) = False Then
            Me.UICulture = _selectedLanguage
            Me.Culture = Global.Resources.Resource.ResourceManager.GetString(_selectedLanguage)

            System.Threading.Thread.CurrentThread.CurrentUICulture = New System.Globalization.CultureInfo(_selectedLanguage)
            System.Threading.Thread.CurrentThread.CurrentCulture = System.Globalization.CultureInfo.CreateSpecificCulture(Global.Resources.Resource.ResourceManager.GetString(_selectedLanguage))
        End If

        MyBase.InitializeCulture()
    End Sub
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim metaDescriptionControl As Web.UI.HtmlControls.HtmlMeta = Me.Master.FindControl("MetaDescription")
        If Not (DBNull.Value.Equals(metaDescriptionControl)) Then
            metaDescriptionControl.Content = "GoPrint2.com has developed the next generation of PDF print software. GoPrint2.com's unique products liberate small businesses from the costly up-front fees and monthly charges of major providers, offering comparable pay-per-use technologies."
        End If
        Dim metaKeyControl As Web.UI.HtmlControls.HtmlMeta = Me.Master.FindControl("MetaKey")
        If Not (DBNull.Value.Equals(metaDescriptionControl)) Then
            metaKeyControl.Content = "pdf driver, print to PDF driver, print pdf, pdf print software, PDF document conversions, free print software, pdf conversion,free PDF conversion , GoPrint2, effective pdf print software"
        End If

        Dim _editUserControl As Control = LoadControl("~/articles/articles_list.ascx")
        EditUserDiv.Controls.Add(_editUserControl)
    End Sub
End Class
