handling alt efter Browser

Se her: http://www.html.dk/scripts/asp/00001/

Jeg havde egentlig også et scipt der kunne finde ud af hvilken browser det var, jeg mangler blot en funktion der kan sætte enten span eller layer ind i de lag der bruges på side.

<%
\' ****************************************************************
\' Dette script er beskyttet efter gældende dansk lov om ophavsret
\' Kan benyttes frit - men må ikke distribueres fra andre sites end html.dk
\' Kontakt info@html.dk hvis du er i tvivl
\' ****************************************************************

Dim strUA \' User Agent (Browser Tag)
Dim arrUA \' Array med ord fra nyere browser tags
Dim intUA \' til at gennemløbe array

Function W3C(strUA)
  strUA = LCase(strUA)
  arrUA = Array(\"compatible\",\"msie\",\"netscape\",\"opera\",\"konqueror\",\"gecko\",\"aol\")
  For intUA = 0 to Ubound(arrUA)
  If Instr(strUA,arrUA(intUA)) Or Left(strUA,7) <> \"mozilla\" Then
    W3C = \"true\"
    Exit For
  End If
  Next
End Function

strText = \"Det der skal står i layeret\"

If W3C(Request.Servervariables(\"HTTP_USER_AGENT\")) = \"true\" Then
  Response.Write \"<span>\" & strText & \"</span>\"
Else
  Response.write \"<layer>\" & strText & \"</layer>\"
End If
%>