dcsimg

ASP Developing for Academic and Business Processes Page 3

By ServerWatch Staff (Send Email)
Posted Jan 25, 1999


T.Mallard




With the connections open...



dim paging, aline, series, sNext, sPrev

while not rsInput.EOF
series = series + 1

The variable 'series' is a page counter, which begins with this while loop. Below is the code to create filenames and Next-Previous links.

for paging =1 to 80
if paging = 1 then
  if series < 100 then
    if series < 10 then
      htmlOut = "D:\Webshare\wwwroot\asp\csfa\csfa_00" & series & ".html"
      sNext = series + 1
      if sNext = 9 then
        htmlNext = "csfa_010.html"
        else
        htmlNext = "csfa_00" & sNext & ".html"
      end if
    sPrev = series - 1
    htmlPrev = "csfa_00" & sPrev & ".html"
    else
    htmlOut = "D:\Webshare\wwwroot\asp\csfa\csfa_0" & series & ".html"
    sNext = series + 1
    htmlNext = "csfa_0" & sNext & ".html"
    sPrev = series - 1
    if sPrev = 9 then
      htmlPrev = "csfa_009.html"
      else
      htmlPrev = "csfa_0" & sPrev & ".html"
    end if
    end if
  else
    htmlOut = "D:\Webshare\wwwroot\asp\csfa\csfa_" & series & ".html"
    sNext = series + 1
    htmlNext = "csfa_" & sNext & ".html"
    if series = 1 then
      htmlPrev = "csfa_001.html"
      else
      sPrev = series - 1
      if sPrev = 99 then
        htmlPrev = "csfa_099.html"
        else
        htmlPrev = "csfa_" & sPrev & ".html"
      end if
    end if
  end if

Getting the Buttons Right.
This section of code above is mainly dealing with getting the automatic paging correct. As the records get processed, I use three digit auto naming so therefore must fill leading zeros for both the filename and for the Next-Previous buttons, so, it's a lot of code for a simple idea. The results are buttons that work and files that sort sequentially by filename. Next is the head portion of the page, which will contain two columns of 40 entries each.



Comment and Contribute

Your name/nickname

Your email

(Maximum characters: 1200). You have characters left.


 

 


Thanks for your registration, follow us on our social networks to keep up-to-date