Imports System
Imports System.Web
Imports System.Web.Caching
Imports System.Data
Imports System.Configuration
Imports System.Runtime



Partial Class AdminLeftBanner
    Inherits System.Web.UI.UserControl

    'Private Sub callpage(ByVal formname As String)
    '    If Not Session("ProductID") Is Nothing Then
    '        Response.Redirect(formname)
    '    Else
    '        Response.Redirect("partners.aspx")
    '    End If
    'End Sub

    'Protected Sub lnkbtnBI_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnBI.Click
    '    Response.Redirect("SupplierRegistration1.aspx")
    'End Sub

    'Protected Sub lnkbtnAI_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnAI.Click
    '    If Not Session("SupplierID") Is Nothing Then
    '        Response.Redirect("SupplierRegistration1.aspx")
    '    Else
    '        Response.Redirect("Supplier_Login.aspx")
    '    End If
    'End Sub

    'Protected Sub lnkbtnMCA_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnMCA.Click
    '    If Not Session("SupplierID") Is Nothing Then
    '        Response.Redirect("MediaAdvertising.aspx")
    '    Else
    '        Response.Redirect("Supplier_Login.aspx")
    '    End If
    'End Sub

    'Protected Sub lnkbtnFDC_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnFDC.Click
    '    If Not Session("SupplierID") Is Nothing Then
    '        Response.Redirect("Factory_Details.aspx")
    '    Else
    '        Response.Redirect("Supplier_Login.aspx")
    '    End If
    'End Sub

    'Protected Sub lnkbtnPI_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnPI.Click

    'End Sub

    'Protected Sub lnkbtnSP_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnSP.Click

    'End Sub

    'Protected Sub lnkbtnPtach_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnPtach.Click

    'End Sub

    'Protected Sub lnkbtnASS_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnASS.Click

    'End Sub

    'Protected Sub lnkbtnFD_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnFD.Click

    'End Sub

    'Protected Sub lnkbtnBN_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnBN.Click

    'End Sub

    'Protected Sub lnkbtnBD_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnBD.Click

    'End Sub

    'Protected Sub lnkbtnKC_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnKC.Click

    'End Sub

    'Protected Sub lnkbtnWoodDF_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnWoodDF.Click

    'End Sub

    'Protected Sub lnkbtnMOPD_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lnkbtnMOPD.Click

    'End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then

            ' tr1.Attributes.Add("onmouseover", "alert('asdasdasdasd')")
        End If
        'Response.Expires = -1
    End Sub
End Class