Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: Page Links...

by OM_Zen (Scribe)
on Mar 02, 2003 at 07:01 UTC ( #239829=note: print w/replies, xml ) Need Help??

in reply to Page Links...

Hi ,

The theortical approach would be by :

First get the rows twenty ($start_limit) starting from a variable that is supplied by a flag when it is the first page or a hidden parameter that can be supplied by the submission of next button at the end of the page for all the other pages .

The page is count incremented for this set
# Just a sample to indicate the flow (untested) my $pages = $cgi->param{'pages'}||1; my $start_limit = shift|| $cgi->param {'start_limit'}; # Get the record info starting from the # $start_limit record and the twenty from it # print "the records \n"; # print "the $pages at the end of the page "; $start_limit += $start_limit; $pages += $pages; # ALSO pass $start_limit and $pages as the hidden paramete +rs to the page occuring next to this

This is just to give an idea of what should be a navigation scheme through maintaining hidden parameters between pages and also the part of select to get the rows within a range which is $start_limit to $start_limit + 20 is done by rownum in oracle and if that is different process it in the perl with $start_limit parameter .The present application which you have written should be posted so that any constructive suggestions could be discussed . Also go through the CGI::FormBuilder API from the CPAN that shall give you some idea to maintain state too among pages , these are just a few suggestions

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://239829]
[1nickt]: So decadent, I love it! "Frequently bought together ..." the biscuits *and* the spread ;-)
[virtualsue]: we had it in belgium a few years ago then realised you could buy it everywhere in the uk

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (8)
As of 2017-11-20 11:57 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (286 votes). Check out past polls.