<% 'Response.Buffer = True %> <% MainItem = Request("MainItem") 'If Len(MainItem) = 0 Then ' MainItem = Request.Cookies(AccountName)("MainItem") 'End If 'If Len(MainItem) > 0 And (MainItem = "flash" Or MainItem = "diensten" Or MainItem = "helpdesk" Or MainItem = "informatie" Or MainItem = "contact") Then ' Response.Cookies(AccountName)("MainItem") = MainItem 'End If SubItem = Request("SubItem") 'If Len(SubItem) = 0 Then ' SubItem = Request.Cookies(AccountName)("SubItem") 'Else ' Response.Cookies(AccountName)("SubItem") = SubItem 'End If %> <%=WebSite_title%> "> "> <% If MainItem = "" Or MainItem = "flash" Then %> <% End If %> <% Select Case MainItem Case "contact" Server.Execute("contact.asp") Case "fotos" Server.Execute("foto_list.asp") Case "links" Server.Execute("link_list.asp") Case "faq" Server.Execute("faq_list.asp") Case "downloads" Server.Execute("download_list.asp") Case "show_text" Server.Execute("show_text.asp") Case "show_picture" Server.Execute("show_picture.asp") Case Else Response.Redirect DefaultPath & "/www/" & Request.Cookies(AccountName)("language") & "/main.asp" End Select Server.Execute("metatraffic.asp") CloseDatabaseConn() %>