Mine

sub Indhold
	if request.QueryString("siteID") = 99 then
		response.Write(session("fejl"))
		session("fejl") = ""
	elseif request.QueryString("siteID") = 50 then	
		
		if Session("rank") = 2 then
			
			Admin
		else
			
			response.Redirect("default.asp")
			
		end if

	elseif request.QueryString("siteID") = 9 then
	SkiftKodeord	
	elseif request.QueryString("siteID") = 7 then
		Notesblok				
	elseif request.QueryString("siteID") = 6 then
		Mailbox		
	elseif request.QueryString("siteID") = 5 then
		Soeg
	elseif request.QueryString("siteID") = 4 then
		BilagUpload
	elseif request.QueryString("siteID") = 3 then
		if request.QueryString("start") = "ja" then
			session("kategori") = ""
			session("traad") = ""
		end if
		
		Forum
	elseif request.QueryString("siteID") = 2 then
		Booking
	elseif request.QueryString("dato") <> "" then
		DatoUdskrivning
	else
		Forside
	end if
	

end sub