spørg på browsertype...

Hvis du bruger ASP er her en rigtig god en.:

Function CheckBrowserVersion(strUA)
'Control of the users browser version and type

    If (InStr(strUA, "MSIE")) AND (InStr(strUA, "Opera") = 0) Then  ' Jeg fandt en Internet Explorer
        intVersion = Trim(Mid(strUA, InStr(strUA, "MSIE") + 5, 4))
        If (Mid(intVersion, 4, 1) = ";") Then
            intVersion = Trim(Mid(intVersion, 1, 3)) + "0"
        End If
       
        If cint(intVersion)  < cint(RequiredVersion) Then
            Response.Write("<b>" & strSiteTitle & "</b><p>")
            Response.Write("<div class=""error"">Der kan ikke opnås adgang til webadministrationen.<br><br>")
            Response.Write("Der kræves en " & RequiredVersionName & " version: " & RequiredVersion & "<br>")
            Response.Write("Din browser er Internet Explorer, version: " & intVersion & "<p>")
            Response.Write("Kontakt venligst systemadministratoren:  <a href=""mailto:" & SuperAdministrator & "?Subject=Browser problemmer&body=Browser: Internet Explorer, version: " & intVersion & "  -  " & Request.ServerVariables("HTTP_USER_AGENT") & """ class=""error"">" & SuperAdministrator & "</a></div>")
            AccessNotGranted = True
        End IF
    Else 
        If InStr(strUA, "Mozilla") Then  ' Jeg fandt en Mozilla
       
            If InStr(strUA, "compatible;") = 0 _
            And InStr(strUA, "Opera") = 0 Then  ' Satser på det er en Netscape
                intVersion = Trim(Mid(strUA, InStr(strUA, "/") + 1, 4))
                ' Hvis der står Netscape 5.0 - så er det en version 6! Netscape er underlig!
                If(intVersion = "5.0") Then
                    intVersion = Trim(Mid(strUA, InStr(strUA, "6/") + 2, 4))
                End If
               
                If intVersion <> RequiredVersion Then
                    Response.Write("<b>" & strSiteTitle & "</b><p>")
                    Response.Write("<div class=""error"">Der kan ikke opnås adgang til webadministrationen.<br><br>")
                    Response.Write("Der kræves en " & RequiredVersionName & " version: " & RequiredVersion & "<br>")
                    Response.Write("Din browser er Netscape, version: " & intVersion & "<p>")
                    Response.Write("Kontakt venligst systemadministratoren:  <a href=""mailto:" & SuperAdministrator & "?Subject=Browser problemmer&body=Browser: Netscape, version: " & intVersion & "  -  " & Request.ServerVariables("HTTP_USER_AGENT") & """ class=""error"">" & SuperAdministrator & "</a></div>")
                    AccessNotGranted = True
                End IF
               
       
            Else  ' Ok, det var altså ikke en Netscape
       
                If InStr(strUA, "Opera") Then
                ' Mon ikke det er en Opera browser? :o)
                    intVersion = Trim(Mid(strUA, InStr(strUA, "Opera") + 5, 5))
                   
                    If intVersion <> RequiredVersion Then
                        Response.Write("<b>" & strSiteTitle & "</b><p>")
                        Response.Write("<div class=""error"">Der kan ikke opnås adgang til webadministrationen.<br><br>")
                        Response.Write("Der kræves en " & RequiredVersionName & " version: " & RequiredVersion & "<br>")
                        Response.Write("Din browser er en Opera, version: " & intVersion & "<p>")
                        Response.Write("Kontakt venligst systemadministratoren:  <a href=""mailto:" & SuperAdministrator & "?Subject=Browser problemmer&body=Browser: Opera, version: " & intVersion & " - " & Request.ServerVariables("HTTP_USER_AGENT") & """ class=""error"">" & SuperAdministrator & "</a></div>")               
                        AccessNotGranted = True
                    End IF
       
                Else
                    ' Underlig browser - jeg aner ikke hvilken en det er?!
                    Response.Write("<b>" & strSiteTitle & "</b><p>")
                    Response.Write("<div class=""error"">Der kan ikke opnås adgang til webadministrationen.<br><br>")
                    Response.Write("Der kræves en " & RequiredVersionName & " version " & RequiredVersion) & "<br>"
                    Response.Write("Din browsertype og version kan ikke fastslås!<p>")
                    Response.Write("Kontakt venligst systemadministratoren:  <a href=""mailto:" & SuperAdministrator & "?Subject=Browser problemmer&body=Ukendt browsertype og browserversion  -  " & Request.ServerVariables("HTTP_USER_AGENT") & """ class=""error"">" & SuperAdministrator & "</a></div>")
                    AccessNotGranted = True
                End If
            End If
        End If
    End If
   
    CheckBrowserVersion = AccessNotGranted
End Function

Ellers evt.  tjeck www.browserHawk.com

Funktionen kalder du på følgende måde:

testBRW = CheckBrowserVersion(Request.ServerVariables("HTTP_USER_AGENT"))

response.write testBRW

Funktionen kalder du på følgende måde:

testBRW = CheckBrowserVersion(Request.ServerVariables("HTTP_USER_AGENT"))

response.write testBRW

Sorry det er denne her du skal bruge:

<%
'Testet på følgende browsere:
'Internet Explorer 4.0, 5.01 & 5.5
'Netscape 2.02, 3.01, 4.78 & 6.01
'Opera 5.12


Function brw(strUA)
' Hvad skal regnes for, at være en gammel browser?
reqIE        = "4.00"    ' Skal være X.XX    Det er incl. og mindre end!
reqNet        = "4.00"    ' Skal være X.XX
reqOpera    = "4.00"    ' Skal være X.XX

    If (InStr(strUA, "MSIE")) AND (InStr(strUA, "Opera") = 0) Then  ' Jeg fandt en Internet Explorer
        intVersion = Trim(Mid(strUA, InStr(strUA, "MSIE") + 5, 4))
        If (Mid(intVersion, 4, 1) = ";") Then
            intVersion = Trim(Mid(intVersion, 1, 3)) + "0"
        End If
        Response.Write("Internet Explorer version " & intVersion)
        'If (intVersion <= reqIE) Then
        '    Response.Write(" som regnes for, at være en gammel version")
        'End If
    Else 
        If InStr(strUA, "Mozilla") Then  ' Jeg fandt en Mozilla

            If InStr(strUA, "compatible;") = 0 _
            And InStr(strUA, "Opera") = 0 Then  ' Satser på det er en Netscape
                intVersion = Trim(Mid(strUA, InStr(strUA, "/") + 1, 4))
                ' Hvis der står Netscape 5.0 - så er det en version 6! Netscape er underlig!
                If(intVersion = "5.0") Then
                    intVersion = Trim(Mid(strUA, InStr(strUA, "6/") + 2, 4))
                End If

                Response.Write("Netscape version " & intVersion)
                'If (intVersion <= reqNet) Then
                '    Response.Write(" som regnes for, at være en gammel version")   
                'End If

            Else  ' Ok, det var altså ikke en Netscape

                If InStr(strUA, "Opera") Then
                ' Mon ikke det er en Opera browser? :o)
                    intVersion = Trim(Mid(strUA, InStr(strUA, "Opera") + 5, 5))
                    Response.Write("Opera browser version " & intVersion)
                    'If (intVersion <= reqOpera) Then
                    '    Response.Write(" som regnes for, at være en gammel version")       
                    'End If
                Else
                    ' Underlig browser - jeg aner ikke hvilken en det er?! :o(
                    Response.Write("Browsertype og version kan ikke fastslås!")
                End If

            End If

        End If

    End If
End Function

testBRW = brw(Request.ServerVariables("HTTP_USER_AGENT"))


response.write testBRW
%>

se ellers her:

http://www.asp101.com/articles/wrox/3218/32180402.asp
http://www.15seconds.com/component/pg000461.htm

sorry det blev et lidt rodet svar.
HÅBER AT DUI KAN BRUGE DET

tak for hjælpen (:

INGEN ÅRSAG