Parametrarna är felaktiga...

		<%	Set Connect = Server.CreateObject("ADODB.Connection") 
		Set RecSet = server.createobject("ADODB.Recordset")
		Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("gastbok.mdb")
		
		SQL = "SELECT * FROM installningar WHERE id = "&request.querystring("id")
		RecSet.Open SQL, Connect

		minfont = RecSet("minfont") 
		minsize = RecSet("minsize")
		mintext = RecSet("mintext") 
		minlink = RecSet("minlink")
		minhover = RecSet("minhover")
		minbg = RecSet("minbg")
		minbgbild = RecSet("minbgbild")
		minform = RecSet("minform") 
		mintbl = RecSet("mintbl") 
		

		

	

%>

		<style type="text/css">
		<!--
		A:Visited { font-family: "<%=minfont%>" ; color:<%=minlink%> ; text-decoration:none ; font-weight:normal ; font-size:<%=minsize%>px ;}
		A:Link { font-family: "<%=minfont%>" ; color:<%=minlink%> ; text-decoration:none ; font-weight:normal ; font-size:<%=minsize%>px ; }
		A:Hover { font-family: "<%=minfont%>" ; color:<%=minhover%> ; text-decoration:none ; font-weight:normal ; font-size:<%=minsize%>px ; }

		BODY { background-color:<%=minbg%> ; background-image:url(<%=minbgbild%> ) ; color:<%=mintext%> ; margin:10 ;}
		BODY { font-family:<%=minfont%> ; font-size:<%=minsize%>px ; }

		table { font-family:<%=minfont%> ; font-size:<%=minsize%>px ; }
		
		.mess { background-color:<%=mintbl%> ; }
		
		form {  font-family:<%=minfont%>; font-size:<%=minsize%>px ; }
		input { font-family:<%=minfont%>; font-size:<%=minsize%>px ; color:<%=minform%> ; border-width:1px ; border-color: Black ; }
		textarea { font-family:<%=minfont%> ; font-size:<%=minsize%>px ; color:<%=minform%> ; border-width:1px ; border-color: Black ; }
		//-->
		</style>

		</head>

<body>

<table width="600" border="0" cellspacing="0" cellpadding="0">
	<tr align="center">
	<td><br>

<%
RecSet.Close	
Set RecSet = Nothing

	'0=================================================================================================0
	'	Öppna databasen
	'0=================================================================================================0
		

	If Request.QueryString("pallebook") = "" Then

	MyPage = Request("nasta_sida")
	If MyPage = "" then
	MyPage = 1
	End If
	MyPagesize = mittantal

		

	SQL = "SELECT * FROM gbook ORDER BY userid DESC"

	Set RecSet = Server.Createobject("ADODB.Recordset")
	RecSet.CursorLocation = 3
	RecSet.CacheSize = 5
	
	RecSet.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("gastbok.mdb")
	
	If RecSet.EOF Then
	

	Response.write "Just nu finns det inga inlägg i gästboken"

	Else
		RecSet.MoveFirst
		[b]RecSet.PageSize = MyPageSize[/b]
		MaxCount = Cint(RecSet.PageCount)
		RecSet.AbsolutePage = MyPage
		HowManyRecs = 0
		HowManyFields = RecSet.Fields.Count -1

		Do While Not RecSet.EOF AND HowManyRecs < RecSet.PageSize
		Counter = Counter + 1

Detta felmeddelande får jag:

ADODB.Recordset fel '800a0bb9' 

Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt. 

/ampy/gratisgastbok/pallebook.asp, line 158

Rad 158 är skriven med fetstil, hoppas någon kan se vad felet är för jag lyckas inte se det.