How to limit the amount of entries listed?

[user65]

I have the following code setup on my homepage. I was wondering if it would be possible to limit the output to say: 10, 15, 25 entries. Right now it seems limitless.

<%
        rsG.open "select OrganizationId,OrganizationName,update_date from tblOrganizations where isFeatured=1 order by update_date",conn
        rsCnt2.Open "select count(*) as cnt from tblOrganizations where isFeatured=1",conn
        if not rsCnt2.eof then
        finalCount=finalcount+rsCnt2("cnt")
        end if
        rsCnt2.close
 
 
        numberRows=finalCount/4
        incr=finalcount mod 4
        numberRows=round(numberRows)+incr
 
        if rsG.eof and rsG.bof then
        else                    
                    iCol=0
                    while not rsG.EOF 
                    if iCol=numberRows and finalCount>4 then
                    Response.Write "</table></td><td valign=top><table border=0>"
                    iCol=0
                    end if 
                    Response.Write "<tr><td valign=top align=left><a href=groupProfile.asp?grpid=" & rsG("OrganizationID") & ">" & rsG("OrganizationName") & "</a></td></tr>"
                    iCol=iCol+1
                    rsG.MoveNext
                    wend
 
        end if
 
        %>

Thanks in advance

[jhardman]

Depending on which type of db you have, one of these might work:

rsG.open "select top 25 OrganizationId,OrganizationName,..."

or

rsG.open "set rowcount 25; select OrganizationId,OrganizationName,...

let me know if this helps.

Jared

[user65]

Greatly appreciate the reply, Thank you Jared. Unfortunately neither of those worked, here is the error I got when implementing them:

I am using microsoft sql 2005 if that helps

Microsoft VBScript compilation error '800a03ea'
 
Syntax error
 
/default-new.asp, line 278
 
rsG.open*"select*top 25 OrganizationId,OrganizationName,update_date from tblOrganizations where isFeatured=1 order by update_date",conn
--------^

Microsoft VBScript compilation error '800a03ea'
 
Syntax error
 
/default-new.asp, line 278
 
rsG.open*"set rowcount 25; select*OrganizationId,OrganizationName,update_date from tblOrganizations where isFeatured=1 order by update_date",conn
--------^

[jhardman]

Tell me what db you are using and we can adapt this.

Otherwise we can set the numberRows variable to any arbitrary number you want.

numberRows=25 

Jared

[user65]

I am using microsoft sql server 2005 on windows 2003 r2.

[jhardman]

Oh duh, stupid mistake! I don't know where those asterisks came from, I didn't notice them when I posted that reply. When I saw it in your reply I thought it was something the error message had inserted to indicate the location of the error. I'll edit my earlier post to correct that.

Both methods should work for sql server.

Jared

[user65]

Worked great!! The asterisks were what was causing my foul up. Many thanks Jared!!