webForumDet fria alternativet

Http_refer

0 svar · 202 visningar · startad av His Divine Shadow

His Divine ShadowMedlem sedan sep. 20004 079 inlägg
#1

Här er ett litet urklipp av koden som jag använder för att skilja på IE och NS:
----------------------------------------
Dim Browser,Version
Session("Web_Version")=""
Browser=UCase(Request.ServerVariables("HTTP_USER_AGENT"))

Version=Cint(Mid(Browser, InStr(Browser, "/" )+1, 1))

If Instr(Browser, "MOZILLA") Then
If Version=4 Then
Session("Web_Version")="Netscape"
End If
End If
If Instr(Browser, "MOZILLA") Then
If Version=5 Then
Session("Web_Version")="IE"
End If
End If
If Instr(Browser, "MSIE") Then
If Version=4 Or Version=5 Then
Session("Web_Version")="IE"
End If
End If
If Instr(Browser, "NS") Then
If Version=4 Or Version=5 Then
Session("Web_Version")="Netscape"
End If
End If
----------------------------------------

Det funkar för IE och NS4.x men inte NS6 som använder IE's inställningar.
Vad heter NS6 om Netscape el. mozilla?

------------------
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots.
So far, the Universe is winning.

122 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
118 ms — hämta tråd, inlägg och bilagor (db)