hello,
I am creating the following table and want to add buttons (next and previous), so instead of showing all records on one page, It will only show 30, then I can click next to show the next 30, and so on.
can anybody help me ?
thank you in advance.
Jamie.
<TABLE BORDER=2 BGCOLOR=#ffffff CELLSPACING=1 CELLPADDING=3><FONT FACE="Arial" COLOR=#000000>
<THEAD>
<TR>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000>UPN</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000>Forename</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000><FONT SIZE=2 FACE="Arial" COLOR=#000000>Surname</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000><FONT SIZE=2 FACE="Arial" COLOR=#000000>Date Of Birth</FONT></TH>
</TR>
</THEAD>
<TBODY>
<%
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
%>
<TR VALIGN=TOP onMouseover="changeto('yellow')"
onMouseout="changeback('white')">
<a href="./moredetails.asp?G_id=<%=Server.HTMLEncode(rs.Fields("UPN".Value)%>">
<TD BORDERCOLOR=#c0c0c0 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("UPN".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("forename".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("Surname".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("DOB".Value)%>
</FONT></TD>
</TD></a>
</TR>
<%
rs.MoveNext
loop%>
</TBODY>
<TFOOT></TFOOT>
</TABLE>
I am creating the following table and want to add buttons (next and previous), so instead of showing all records on one page, It will only show 30, then I can click next to show the next 30, and so on.
can anybody help me ?
thank you in advance.
Jamie.
<TABLE BORDER=2 BGCOLOR=#ffffff CELLSPACING=1 CELLPADDING=3><FONT FACE="Arial" COLOR=#000000>
<THEAD>
<TR>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000>UPN</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000>Forename</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000><FONT SIZE=2 FACE="Arial" COLOR=#000000>Surname</FONT></TH>
<TH BGCOLOR=royalblue BORDERCOLOR=#000000><FONT SIZE=2 FACE="Arial" COLOR=#000000>Date Of Birth</FONT></TH>
</TR>
</THEAD>
<TBODY>
<%
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
%>
<TR VALIGN=TOP onMouseover="changeto('yellow')"
onMouseout="changeback('white')">
<a href="./moredetails.asp?G_id=<%=Server.HTMLEncode(rs.Fields("UPN".Value)%>">
<TD BORDERCOLOR=#c0c0c0 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("UPN".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0 nowrap><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("forename".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("Surname".Value)%>
</FONT></TD>
<TD BORDERCOLOR=#c0c0c0><FONT SIZE=2 FACE="Arial" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("DOB".Value)%>
</FONT></TD>
</TD></a>
</TR>
<%
rs.MoveNext
loop%>
</TBODY>
<TFOOT></TFOOT>
</TABLE>