<% 
Set myConn = Server.CreateObject("ADODB.Connection")
		myConn.Open "DRIVER={MySQL}; Server=mydb6.surf-town.net; Database=spoforum; Uid=spoaddict; Password=spassersoren;"
strSQL = "SELECT startsidelayout, startsidesettings FROM spobruger"&_
			" WHERE (username = '" & Session("NAME") & "')"
		Set rs = myConn.Execute(strSQL)

If isEmpty(Session("ID")) Then	
Server.Execute "start-layout0.asp"
Else
	If rs("startsidelayout") = "0" Then
	Server.Execute "start-layout0.asp"
	ElseIf rs("startsidelayout") = "1" Then
	Server.Execute "start-layout1.asp"
	Else
	Server.Execute "start-layout0.asp"
	END IF
END IF			
myConn.Close
Set myConn = Nothing	
%>