'End' var ventet, men den er der.

Hej!

Jeg får følgende fejl:

Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A03F6)
'End' var ventet
/index.asp, line 42

Og koden er følgende:

<%
'***Browser selector begins***
'Display stylesheet depending on browser

Dim browser_type, browser_version, stylesheet
browser_type = Request.Browser.Type
browser_version = Request.Browser.Version

'Internet Explorer browser check
if browser_version = "5.01" Then
stylesheet = "<link rel='stylesheet' href='styles/css/ie5.css' />"
else if browser_version = "5.5" Then
stylesheet = "<link rel='stylesheet' href='styles/css/ie55.css' />"
else if browser_type = "IE" or browser_type = "IE3" or browser_type = "IE4" or browser_type = "IE6" Then
stylesheet = "<link rel='stylesheet' href='styles/css/ie6.css' />"

'Gecko-based browser_type check
else if browser_type = "Netscape5" or browser_type = "Netscape6" Then
stylesheet = "<link rel='stylesheet' href='styles/css/ns56.css' />"
else if browser_type = "Netscape7" Then
stylesheet = "<link rel='stylesheet' href='styles/css/ns7.css' />"
else if browser_type = "Netscape" or browser_type = "Netscape8" or browser_type = "Mozilla" Then
stylesheet = "<link rel='stylesheet' href='styles/css/mz1.css' />"

else if browser_type = "Opera7" Then
stylesheet = "<link rel='stylesheet' href='styles/css/op7.css' />"
else if browser_type = "Opera" or browser_type = "Opera8" Then
stylesheet = "<link rel='stylesheet' href='styles/css/op8.css' />"

else
stylesheet = "<link rel='stylesheet' href='styles/css/default.css' />"
end if
Response.Write(stylesheet)
'***Browser selector ends***
%>

Koden har jeg sakset et andet sted, det er nok det der er galt ;) Nogen der kan gennemskue hvor problemet ligger?

På forhånd tak!