<script runat="server">
    Public loaderName As String

    Protected Overloads Overrides Sub OnInit(ByVal e As EventArgs)
        MyBase.OnInit(e)
        Dim browser As System.Web.HttpBrowserCapabilities = Request.Browser
        Dim browserName As String = browser.Browser
   
        Select Case browserName
            Case "IE"
                loaderName = "IE_Loader"
                Exit Select
            Case "Firefox"
                loaderName = "Gecko_Loader"
                Exit Select
            Case "AppleMAC-Safari"
                loaderName = "Safari_Loader"
                Exit Select
            Case "Opera"
                loaderName = "Opera_Loader"
                Exit Select
            Case Else
                Exit Select
        End Select
   
    End Sub
</script>