Imports System.Data
Imports System.Data.SqlClient
Partial Class BrandSearch_Buyer
    Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            link_load("All")
            'loadcategory()
        End If
    End Sub
    Private Sub loadcategory()
        Try

            '===============================1/11/2008
            If IsNothing(Session("BrandTable")) Then
                Dim dt As New DataTable
                Dim ds As New DataSet
                Dim con As New SqlConnection
                con.ConnectionString = System.Configuration.ConfigurationManager.AppSettings("ConnectionString")
                Dim Str As String
                Str = "Select Brand_Distinct.* from Brand_Distinct order by Brand_Name"
                If con.State = Data.ConnectionState.Open Then
                    con.Close()
                End If
                da = New SqlDataAdapter(Str, con)
                da.Fill(ds, "Brand")
                dt = ds.Tables("Brand")
                Session("BrandTable") = dt
            End If
            Dim dt1 As DataTable

            dt1 = CType(Session("BrandTable"), DataTable).DefaultView.ToTable
            gvbrandsearch.DataSource = dt1
            gvbrandsearch.DataBind()
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub
    Private Sub link_load(ByVal qstr As String)
        Try
            Dim str As String = ""

            If IsNothing(Session("BrandTable")) Then
                Dim dt As New DataTable
                Dim ds As New DataSet
                Dim con As New SqlConnection
                con.ConnectionString = System.Configuration.ConfigurationManager.AppSettings("ConnectionString")
                Dim Str1 As String
                Str1 = "Select Brand_Distinct.* from Brand_Distinct order by Brand_Name"
                If con.State = Data.ConnectionState.Open Then
                    con.Close()
                End If
                da = New SqlDataAdapter(Str1, con)
                da.Fill(ds, "Brand")
                dt = ds.Tables("Brand")
                Session("BrandTable") = dt

            End If


            Select Case qstr.ToString
                Case "All"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = ""

                Case "A"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'A%' or Brand_Name LIKE 'B%' or Brand_Name LIKE 'C%' or Brand_Name LIKE 'D%' or Brand_Name LIKE 'E%' or Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%'or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "B"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'B%' or Brand_Name LIKE 'C%' or Brand_Name LIKE 'D%' or Brand_Name LIKE 'E%' or Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "C"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'C%' or Brand_Name LIKE 'D%' or Brand_Name LIKE 'E%' or Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "D"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'D%' or Brand_Name LIKE 'E%' or Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "E"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'E%' or Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "F"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'F%' or Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "G"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'G%' or Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "H"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'H%' or Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "I"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'I%' or Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "J"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'J%' or Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "K"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'K%' or Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "L"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'L%' or Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "M"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'M%' or Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "N"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'N%' or Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "O"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'O%' or Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "P"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'P%' or Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "Q"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'Q%' or Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "R"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'R%' or Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "S"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'S%' or Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "T"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'T%' or Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "U"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'U%' or Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "V"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'V%' or Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "W"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'W%' or Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "X"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'X%' or Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "Y"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'Y%' or Brand_Name LIKE 'Z%'"

                Case "Z"
                    CType(Session("BrandTable"), DataTable).DefaultView.RowFilter = "Brand_Name LIKE 'Z%'"

            End Select
            gvbrandsearch.DataSource = CType(Session("BrandTable"), DataTable).DefaultView.ToTable
            gvbrandsearch.DataBind()
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub LinkButton1(ByVal sender As Object, ByVal e As EventArgs)
        Dim i As New LinkButton()
        i = CType(sender, LinkButton)
        Dim Brandid As String
        Brandid = i.CommandArgument
        Session("HLabel") = ""
        If Session("ID") = "Buyer" Then

            Response.Redirect("BuyerProdSearch.aspx?Brand_KId=" & EncodeURL(Brandid))
        Else
            '    Response.Redirect("SearchProduct.aspx?Brand_KId=" & Brandid)
            CreateMessageUCAlert(Me, "Your Session has been expiered. Please Login Again.", "strkeyval")
        End If
    End Sub

    Protected Sub Abtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Abtn.Click
        Try
            link_load("A")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Bbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Bbtn.Click
        Try
            link_load("B")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Cbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Cbtn.Click
        Try
            link_load("C")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Dbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Dbtn.Click
        Try
            link_load("D")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Ebtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Ebtn.Click
        Try
            link_load("E")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Fbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Fbtn.Click
        Try
            link_load("F")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Gbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Gbtn.Click
        Try
            link_load("G")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Hbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Hbtn.Click
        Try
            link_load("H")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Ibtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Ibtn.Click
        Try
            link_load("I")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Jbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Jbtn.Click
        Try
            link_load("J")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Kbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Kbtn.Click
        Try
            link_load("K")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Lbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Lbtn.Click
        Try
            link_load("L")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Mbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Mbtn.Click
        Try
            link_load("M")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Nbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Nbtn.Click
        Try
            link_load("N")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Obtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Obtn.Click
        Try
            link_load("O")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Pbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Pbtn.Click
        Try
            link_load("P")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Qbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Qbtn.Click
        Try
            link_load("Q")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Rbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Rbtn.Click
        Try
            link_load("R")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Sbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Sbtn.Click
        Try
            link_load("S")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Tbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Tbtn.Click
        Try
            link_load("T")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Ubtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Ubtn.Click
        Try
            link_load("U")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Vbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Vbtn.Click
        Try
            link_load("V")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Wbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Wbtn.Click
        Try
            link_load("W")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Xbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Xbtn.Click
        Try
            link_load("X")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Ybtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Ybtn.Click
        Try
            link_load("Y")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub Zbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Zbtn.Click
        Try
            link_load("Z")
        Catch ex As Exception
            ex.Message.ToString()
        End Try
    End Sub

    Protected Sub gvbrandsearch_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles gvbrandsearch.PageIndexChanging
        gvbrandsearch.PageIndex = e.NewPageIndex
        loadcategory()
    End Sub
End Class