30. marts 2003 - 23:06
#7
Du kan istedet benytte Request.ServerVariables("HTTP_USER_AGENT"). Denne returnerer information om browseren. Men denne information indeholder også OS.
Jeg har selv brugt følgende switch for at finde frem til brugerens OS ud fra HTTP_USER_AGENT:
strUserAgent = Request.ServerVariables("HTTP_USER_AGENT")
Select Case true
Case InStr(strUserAgent,"Mac") > 0
strOS = "Mac"
Case InStr(strUserAgent,"Linux") > 0
strOS = "Linux"
Case InStr(strUserAgent,"Unix") > 0
strOS = "Unix"
Case InStr(strUserAgent,"Windows XP") > 0, InStr(strUserAgent,"Win XP") > 0, InStr(strUserAgent,"Windows NT 5.1") > 0
strOS = "Windows XP"
Case InStr(strUserAgent,"Windows NT 5.0") > 0, InStr(strUserAgent,"Win NT 5.0") > 0, InStr(strUserAgent,"Windows 2000") > 0
strOS = "Windows 2000"
Case InStr(strUserAgent,"Windows NT") > 0, InStr(strUserAgent,"Win NT") > 0, InStr(strUserAgent,"WinNT") > 0
strOS = "Windows NT"
Case InStr(strUserAgent,"Windows 98") > 0, InStr(strUserAgent,"Win 98") > 0, InStr(strUserAgent,"Win98") > 0
strOS = "Windows 98"
Case InStr(strUserAgent,"Windows 95") > 0, InStr(strUserAgent,"Win 95") > 0, InStr(strUserAgent,"Win95") > 0
strOS = "Windows 95"
Case Else
strOS = "Other"
End Select
19. april 2003 - 23:43
#8
Ingen svar, der duer?
Hvis der er, vil du så ikke være sød at lukke spørgsmålet?