Why Does my RSS Feed Max Out At 1000?

   My RSS feed will only display the last 1000 posts on my blog. I've looked through the code multiple times, trying to find the solution. I'm not very savy in ASP, so it wouldn't be surprising if I over looked something simple.

Here is my code for rss.asp.
____

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="config.asp" -->
<!--#include file="functions.asp" -->
<%
strURL = "http://serv001/reports/"
strSQL = "SELECT * FROM  T_WEBLOG WHERE  b_published = true ORDER BY b_date DESC, b_time DESC"

 Set Rs = Server.CreateObject("ADODB.Recordset")
 Rs.ActiveConnection = strConn
 Rs.Source = strSQL
 Rs.CursorType = 0
 Rs.CursorLocation = 2
 Rs.LockType = 1
 Rs.Open()

response.ContentType="text/xml"
response.write "<?xml version=""1.0"" encoding=""ISO-8859-1""?>" & vbcrlf
response.Write "<?xml-stylesheet type=""text/xsl"" href=""rss.xsl""?>" & vbcrlf
response.write "<rss version=""0.91""><channel>" & vbcrlf
response.write "<title>Ryder Reports RSS feed</title>" & vbcrlf
response.write "<link>" & strURL & "</link>" & vbcrlf

response.write "<description>An RSS feed for Reports</description>" & vbcrlf
response.write "<language>EN</language>" & vbcrlf

if not Rs.EOF Then
 while not Rs.eof 

 response.write "<item>" & vbcrlf
 response.write "<title><![CDATA[" & Rs("b_headline") & "]]> </title>" 
 response.write "<category><![CDATA[" & Rs("b_category") & "]]></category>"
 response.write "<author><![CDATA[Entered by: " & Rs("b_author") & "]]></author>"

 response.write "<description> <![CDATA[<strong>Requested by:</strong> " & Rs("b_requested") & " &nbsp; &nbsp; &nbsp; <strong>Serial #</strong>" & Rs("b_serial") & " &nbsp; &nbsp; &nbsp; <strong>Location:</strong> " & Rs("b_location") & " &nbsp; &nbsp; &nbsp; <strong>Category:</strong> " & Rs("b_category") & " &nbsp; &nbsp; &nbsp; <strong>Time:</strong> " & Rs("b_minutes") & " Minutes<br>" & Rs("b_content") & "<p>&nbsp;<p>&nbsp;<p> ]]></description>" 

 response.write "<date>" & IntToDate(Rs("b_date")) & "</date>" & vbcrlf
 response.write "<time>" & Rs("b_time") & "</time>" & vbcrlf
 response.write "<link>"&strURL&"?view=plink&amp;id="&Rs("id")&"</link>" & vbcrlf
 response.Write("<id>"&Rs("id")&"</id>")
 response.write "</item>" & vbcrlf

 rs.movenext
Wend
end if
response.write "</channel></rss>" & vbcrlf
rs.close
set rs=nothing
%>

__
Here is the code for rss.xml. It doesn't seem like this page is actually used. Am I wrong there?

__

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
 <xsl:template match="/">
  <html>
   <head>
    <title>RSS</title>
   </head>
   <body>
    <ul>
  <xsl:for-each select="/rss/channel/item">
     <li><a href="{link}"><xsl:value-of select="title" /></a>
   <p><xsl:value-of select="description" /></p>
   </li>
  </xsl:for-each>
    </ul>
   </body>
  </html>
 </xsl:template>
</xsl:stylesheet>

Thanks for looking!