ASP.NET

''' <summary>
        ''' Convert the HTML code from the specified URL to a PDF document and send the 
        ''' document as an attachment to the browser
        ''' </summary>
        ''' <remarks></remarks>
        Private Sub ConvertURLToPDF(ByVal url As String)

            Dim urlToConvert As String = url
            Dim selectablePDF As Boolean = True

            ' Create the PDF converter. Optionally you can specify the virtual browser 
            ' width as parameter. 1024 pixels is default, 0 means autodetect
            Dim pdfConverter As PdfConverter = New PdfConverter()
            ' set the license key
            'pdfConverter.LicenseKey = "put your license key here"
            ' set the converter options
            pdfConverter.PdfDocumentOptions.PdfPageSize = PdfPageSize.A4
            pdfConverter.PdfDocumentOptions.PdfCompressionLevel = PdfCompressionLevel.Normal
            pdfConverter.PdfDocumentOptions.PdfPageOrientation = PDFPageOrientation.Portrait

            ' set if header and footer are shown in the PDF - optional - default is false 
            pdfConverter.PdfDocumentOptions.ShowHeader = False
            pdfConverter.PdfDocumentOptions.ShowFooter = False
            ' set to generate a pdf with selectable text or a pdf with embedded image - optional - default is true
            pdfConverter.PdfDocumentOptions.GenerateSelectablePdf = True
            ' set if the HTML content is resized if necessary to fit the PDF page width - optional - default is true
            pdfConverter.PdfDocumentOptions.FitWidth = True

            ' set the embedded fonts option - optional - default is false
            pdfConverter.PdfDocumentOptions.EmbedFonts = False
            ' set the live HTTP links option - optional - default is true
            pdfConverter.PdfDocumentOptions.LiveUrlsEnabled = True


            ' set if the JavaScript is enabled during conversion to a PDF with selectable text 
            ' - optional - default is false
            pdfConverter.ScriptsEnabled = False
            ' set if the ActiveX controls (like Flash player) are enabled during conversion 
            ' to a PDF with selectable text - optional - default is false
            pdfConverter.ActiveXEnabled = False


            ' set if the images in PDF are compressed with JPEG to reduce the PDF document size - optional - default is true
            pdfConverter.PdfDocumentOptions.JpegCompressionEnabled = True

            ' enable auto-generated bookmarks for a specified list of tags (e.g. H1 and H2)
            'If (cbBookmarks.Checked) Then
            '    pdfConverter.PdfBookmarkOptions.TagNames = New String() {"H1", "H2"}
            'End If

            ' set PDF security options - optional
            'pdfConverter.PdfSecurityOptions.CanPrint = True
            'pdfConverter.PdfSecurityOptions.CanEditContent = True
            'pdfConverter.PdfSecurityOptions.UserPassword = ""

            ' set PDF document description - optional
            pdfConverter.PdfDocumentInfo.AuthorName = "Winnovative HTML to PDF Converter"

            ' add HTML header
            'If (cbAddHeader.Checked) Then
            '    AddHeader(pdfConverter)
            'End If
            '' add HTML footer
            'If (cbAddFooter.Checked) Then
            '    AddFooter(pdfConverter)
            'End If

            ' Performs the conversion and get the pdf document bytes that you can further 
            ' save to a file or send as a browser response
            Dim pdfBytes As Byte() = pdfConverter.GetPdfBytesFromUrl(urlToConvert)

            ' send the PDF document as a response to the browser for download
            Dim Response As System.Web.HttpResponse = System.Web.HttpContext.Current.Response
            Response.Clear()
            Response.AddHeader("Content-Type", "binary/octet-stream")
            Response.AddHeader("Content-Disposition", "attachment; filename=ConversionResult.pdf; size=" & pdfBytes.Length.ToString())
            Response.Flush()
            Response.BinaryWrite(pdfBytes)
            Response.Flush()
            Response.End()
        End Sub

Member 3879881 wrote:

function test()
{
document.cookie="coktext=Hi~test"; window.location="testerpage.aspx";
}

document.cookie="coktext=Hi~test";

typepid = Request.Cookies["coktext"].Value;
            arrtypepid = typepid.Split('~');
if (arrtypepid[0].ToString().ToLower().Trim() == "markets")