Expand|Select|Wrap|Line Numbers
- <!--
- This is the "previous" button.
- This retrieves the previous page of documents for the query.
- -->
- <%SaveQuery = FALSE%>
- <%if CurrentPage > 1 and RS.RecordCount <> -1 then
- <td align=left>
- <form action="<%= QueryForm%>" method="POST">
- <INPUT TYPE="HIDDEN" NAME="SearchString" VALUE="<%=SearchString%>">
- <INPUT TYPE="HIDDEN" name="pg" VALUE="<%=CurrentPage-1%>" >
- <input type="submit" value="Previous <%=RS.PageSize%> documents">
- </form>
- </td>
- <%SaveQuery = TRUE%>
- <%end if%>
- <!--
- This is the "next" button.
- This button retrieves the next page of documents for the query.
- If the RS.RecordCount is available, the number of
- documents on the next page will be displayed.
- -->
- <%if Not RS.EOF then%>
- <td align=right>
- <form action="<%= QueryForm%>" method="POST">
- <INPUT TYPE="HIDDEN" NAME="SearchString" VALUE="<%=SearchString%>">
- <INPUT TYPE="HIDDEN" name="pg" VALUE="<%=CurrentPage+1%>" >
- <% NextString = "Next "
- if RS.RecordCount <> -1 then
- NextSet = (RS.RecordCount - NextRecordNumber) + 1
- if NextSet > RS.PageSize then
- NextSet = RS.PageSize
- end if
- NextString = NextString & NextSet & " documents"
- else
- NextString = NextString & " page of documents"
- end if
- %>
- <input type="submit" value="<%=NextString%>">
- </form>
- </td>
- <%SaveQuery = TRUE%>
- <%end if%>