Det du goer med dette script er at du indsaetter scriptet som det staar:
<%
' ****************************************************************
' 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 HTML.dk hvis du er i tvivl
' ****************************************************************
Function CSSDetect()
strHUA = LCase(Request.Servervariables("HTTP_USER_AGENT"))
' Macintosh
If Instr(strHUA,"mac") Then
strOS = "mac"
' Windows
ElseIf Instr(strHUA,"windows") Then
strOS = "windows"
' Linux
Else
strOS = "linux"
End If
' Netscape 6
If Instr(strHUA,"netscape") Then
strUA = "netscape6"
' Opera
Elseif Instr(strHUA,"opera") Then
strUA = "opera"
' Konqueror
Elseif Instr(strHUA,"konqueror") Then
strUA = "konqueror"
' Microsoft Internet Explorer
ElseIf Instr(strHUA,"msie") Then
strUA = "ie"
ElseIf Instr(strHUA,"gecko") AND Instr(strHUA,"mozilla") Then
strUA = "mozilla"
Else
' Standard (ukendt browser)
If Instr(strHUA,"compatible") Then
strUA = "default"
' Netscape 4
Elseif Left(strHUA,7) = "mozilla" Then
strUA = "netscape4"
End If
End If
CSSDetect = strUA & "." & strOS & ".css"
End Function
%>
<link rel="stylesheet" type="text/css" href="<% =CSSDetect() %>">
Og saa laver du filer der hedder OS.BROWSER.css
Kombinationerne er som foelger:
OS:
mac
windows
linux
derefter et punktum (.)
Browser:
netscape6
opera
konqueror
ie
mozilla
default (ikke kendt browser)
netscape4
derefter endnu et punktum (.)
efterfulgt af css
fx. windows.ie.css eller windows.moxilla.css, dvs du skal oprette en del filer, alt efter hvilken kombination du vil have
