¿Qué hay mal aquí?

[CHuLoSoY]

Yo les paso todo el código por si quieren mirar el error lo pongo abajo:

Código:

<%
Dim oConn, rs, SQL
Dim PaginaActual
Dim PaginasTotales
Dim TamPagina
Dim CuantosRegistros
TamPagina=1

if Request.Querystring("pagina")="" then
PaginaActual=1
else
PaginaActual=CInt(Request.Querystring("pagina"))
end if

set oConn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source="&Server.MapPath("******.mdb")&";"
SQL="SELECT * FROM Noticias WHERE categoria=" & Request.QueryString("categoria") & " ORDER BY id DESC;"

rs.PageSize=TamPagina
rs.CacheSize=TamPagina

rs.Open SQL, oConn, 1, 2
PaginasTotales=rs.PageCount

if PaginaActual < 1 then 
PaginaActual = 1
end if
if PaginaActual > PaginasTotales then
PaginaActual = PaginasTotales
end if
if PaginasTotales=0 then

Response.Write("No se encontraron resultados.")

else

rs.AbsolutePage=PaginaActual
Response.Write("Pagina " & PaginaActual & " de " & PaginasTotales)
CuantosRegistros=0
do while not rs.EOF and CuantosRegistros < TamPagina
Response.Write "<p><b><font face=Verdana size=1><a href=noticia.asp?id=" &rs.Fields("id") & ">"&rs.Fields("titulo")&"</a></b><br><font color=#696969>• " &rs.Fields("copete") & "</font></font>"		
CuantosRegistros=CuantosRegistros+1
rs.MoveNext
loop
Response.Write("</p>")
end if
rs.Close
oConn.Close
set rs=nothing
set oConn=nothing

Response.Write("<hr>")
if PaginaActual > 1 then
Response.Write("<A HREF=listados.asp?pagina="& PaginaActual-1& _
">Anterior</A>")
end if
if PaginaActual < PaginasTotales then
Response.Write("<A HREF=listados.asp?pagina=" & PaginaActual+1 & _ 
">Siguiente</A>")
end if
%>

Error:

Código:

Microsoft JET Database Engine error '80040e10' 

No value given for one or more required parameters. 

/ommadawn/db/noticias/listados.asp, line 37

<center><hr size="1" color="blue" width="39%"><a href="http://www.ommadawn.es.vg" target="_blank"><font color="red">www.Ommadawn.es.vg[/CODE]</a><hr size="1" color="blue" width="39%">