Hvordan bruges WHERE udtryk i.f.b.m PAGING

Hvordan bruges WHERE udtryk i.f.b.m PAGING ??

Nedenstående script eks. virker fint og efter hensigt. Det viser alle poster i tabellen.
Nu vil jeg gerne have det til at vise udvalgte poster fra kolonen IdCategory

Jeg har prøvet med:
strSQL = "SELECT * FROM Banner WHERE IdCategory = '1'"

Men det virker ikke ??
Hvad gør jeg ??
MVH

Eks:

<%
intPage = Request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
  intPage = 1
End If

Set rs = Server.CreateObject("ADODB.RecordSet")

strSQL = "SELECT * FROM Links"
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("/db/links.mdb")

rs.Open strSQL, strDSN, 1

If Not (rs.BOF Or rs.EOF) Then
  'No of Records on each Page
  rs.PageSize = 3
  rs.AbsolutePage = intPage
  intRecCount = rs.PageSize
  intPageCount = rs.PageCount
 
  Response.Write "<p><b>Side " & intPage & " af " & intPageCount & "</b></p>"
  Do While Not rs.EOF And intRecCount > 0
 
    Response.Write "<a href='" & rs("URL") & "'>" & rs("Headline") & "</a><br>"
    Response.Write "<font size=-1>Hits: " & rs("Clicks") & "<br>" & rs("Description") & "<hr size='3' color='#FFCC00'>"
  intRecCount = intRecCount - 1
  rs.MoveNext
  Loop
End If
rs.Close
Set rs = Nothing

Response.Write "<p>Go to page "
For intNum = 1 To intPageCount
  Response.Write "<a href=Paging.asp?page=" & intNum & ">" & intNum & "</a> "
Next

Response.Write "<p>"
If Clng(intPage) > 1 Then
  Response.Write "<a href=Paging.asp?page=" & intPage - 1 & ">&lt;&lt;</a>"
Else
  Response.Write "&lt;&lt;"
End If

Response.Write "&nbsp;"

If Clng(intPage) < Clng(intPageCount) Then
  Response.Write "<a href=Paging.asp?page=" & intPage + 1 & ">&gt;&gt;</a> "
Else
  Response.Write "&gt;&gt;"
End If
%>