• User Newbie

    Aiuto nella paginazione asp in frontpage, help me

    Salve a tutti,
    vi chiedo aiuto per un problema forse banale che ho con l'uso di frontpage e dei moduli asp.
    Vi espongo il problema: ho creato una tabella dbf che viene letta tramite i moduli asp di frontpage. Attraverso una interrogazione estraggo un record univoco, che mi viene correttamente visualizzato. Tuttavia vorrei aggiungere due bottoni che mi permettano di andare al record successivo o precedente a quello visualizzato ma non riesco.
    Preciso però, che dall'interrogazione viene sempre restituito un record unico, quello successivo e precedente non hanno altri legami con esso.
    Faccio un esempio: apro un libro a pagina 10, e voglio poter sfogliare la pagina 9 o 11.
    Vi ringrazio per l'aiuto, non riesco a trovare una risposta
    Ironasp
    Buon anno ad ogni modo


  • Super User

    Ciao ironasp e benvenuto nel forum! Posta un pò di codice e vediamo di aiutarti!


  • User Newbie

    Ciao Cali,
    grazie per l'interesse
    di seguito ti posto il codice generato con FrontPage, spero che puoi, potete aiutarmi.
    Ironasp

    <html>
    <head>
    <% ' FP_ASP -- File ASP generato automaticamente da un componente di FrontPage. Non modificarlo.
    FP_CharSet = "windows-1252"
    FP_CodePage = 1252 %>
    <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
    <title>
    Nuova pagina 3</title>
    <meta name="GENERATOR" content="Microsoft FrontPage 6.0">
    <meta name="ProgId" content="FrontPage.Editor.Document">
    <script language="JavaScript">
    <!--
    function FP_swapImg() {//v1.0
    var doc=document,args=arguments,elm,n; doc.$imgSwaps=new Array(); for(n=2; n<args.length;
    n+=2) { elm=FP_getObjectByID(args); if(elm) { doc.$imgSwaps[doc.$imgSwaps.length]=elm;
    elm.$src=elm.src; elm.src=args[n+1]; } }
    }
    function FP_preloadImgs() {//v1.0
    var d=document,a=arguments; if(!d.FP_imgs) d.FP_imgs=new Array();
    for(var i=0; i<a.length; i++) { d.FP_imgs*=new Image; d.FP_imgs*.src=a*; }
    }
    function FP_getObjectByID(id,o) {//v1.0
    var c,el,els,f,m,n; if(!o)o=document; if(o.getElementById) el=o.getElementById(id);
    else if(o.layers) c=o.layers; else if(o.all) el=o.all[id]; if(el) return el;
    if(o.id==id || o.name==id) return o; if(o.childNodes) c=o.childNodes; if(c)
    for(n=0; n<c.length; n++) { el=FP_getObjectByID(id,c); if(el) return el; }
    f=o.forms; if(f) for(n=0; n<f.length; n++) { els=f.elements;
    for(m=0; m<els.length; m++){ el=FP_getObjectByID(id,els); if(el) return el; } }
    return null;
    }
    // -->
    </script>
    </head>
    <body background="../images/sfondo_fp.jpg" style="background-attachment: fixed" onload="FP_preloadImgs(/url/'../images/buttonE5.jpg', /url/'../images/buttonE6.jpg')">
    <div align="center">
    <table border="0" style="border-collapse: collapse" id="table1" width="680">
    <tr>
    <td>
    <form>
    <i><font color="#008000" size="2">Seleziona la pagina di interesse e premi invia  </font></i></form>
    <form>
    <p><nobr>
    <!--webbot bot="DatabaseRegionStart" s-columnnames="ID,PN,Tomo,Pagina" s-columntypes="3,3,3,202" s-dataconnection="Database1" b-tableformat="FALSE" b-menuformat="TRUE" s-menuchoice="Pagina" s-menuvalue="Pagina" b-tableborder="TRUE" b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE" i-listformat="0" b-makeform="FALSE" s-recordsource s-displaycolumns="ID,PN,Tomo,Pagina" s-criteria s-order s-sql="SELECT * FROM PagVolI where (Tomo = 1) ORDER BY Tomo ASC,PN ASC,ID ASC" b-procedure="FALSE" clientside suggestedext="asp" s-defaultfields s-norecordsfound="Nessun record restituito." i-maxrecords="1000" i-groupsize="0" botid="0" u-dblib="../_fpclass/fpdblib.inc" u-dbrgn1="../_fpclass/fpdbrgn1.inc" u-dbrgn2="../_fpclass/fpdbrgn2.inc" preview=" <span style="color: rgb(0,0,0); background-color: rgb(255,255,0)">Database</span> " b-InForm="TRUE" b-UseDotNET="FALSE" CurrentExt sa-InputTypes b-DataGridFormat="FALSE" b-DGridAlternate="TRUE" sa-CritTypes b-WasTableFormat="FALSE" startspan --><!--#include file="../_fpclass/fpdblib.inc"-->
    <% if 0 then %>
    <SCRIPT Language="JavaScript">
    document.write("<div style='background: yellow; color: black;'>Impossibile visualizzare il contenuto del database nel componente Risultati database della pagina corrente. Il nome file della pagina deve avere estensione '.asp' e il sito Web deve trovarsi in un server che supporta Active Server Pages.</div>");
    </SCRIPT>
    <% end if %>
    <%
    fp_sQry="SELECT * FROM PagVolI where (Tomo = 1) ORDER BY Tomo ASC,PN ASC,ID ASC"
    fp_sDefault=""
    fp_sNoRecords="Nessun record restituito."
    fp_sDataConn="Database1"
    fp_iMaxRecords=1000
    fp_iCommandType=1
    fp_iPageSize=0
    fp_fTableFormat=False
    fp_fMenuFormat=True
    fp_sMenuChoice="Pagina"
    fp_sMenuValue="Pagina"
    fp_sColTypes="&ID=3&PN=3&Tomo=3&Pagina=202&"
    fp_iDisplayCols=4
    fp_fCustomQuery=True
    BOTID=0
    fp_iRegion=BOTID
    %>
    <!--webbot bot="DatabaseRegionStart" endspan i-checksum="33518" --><select NAME="Pagina" SIZE="1"><!--webbot bot="AspInclude" clientside u-incfile="../_fpclass/fpdbrgn1.inc" startspan --><!--#include file="../_fpclass/fpdbrgn1.inc"--><!--webbot bot="AspInclude" endspan i-checksum="52766" -->
    <option><%=FP_FieldHTML(fp_rs,"Pagina")%></option>
    <!--webbot bot="AspInclude" clientside u-incfile="../_fpclass/fpdbrgn2.inc" startspan --><!--#include file="../_fpclass/fpdbrgn2.inc"--><!--webbot bot="AspInclude" endspan i-checksum="52830" --></select><!--webbot bot="DatabaseRegionEnd" b-tableformat="FALSE" b-menuformat="TRUE" u-dbrgn2="../_fpclass/fpdbrgn2.inc" i-groupsize="0" clientside preview=" <span style="color: rgb(0,0,0); background-color: rgb(255,255,0)">Risultati</span> " startspan --><!--webbot bot="DatabaseRegionEnd" endspan --><input type="submit" value="Invia" name="B1"></nobr><!--webbot bot="DatabaseRegionStart" s-columnnames="ID,Opera,Tomo,Pagina,PN,Thumb,Per" s-columntypes="3,202,3,202,3,202,202" s-dataconnection="Database1" b-tableformat="FALSE" b-menuformat="FALSE" s-menuchoice="ID" s-menuvalue="ID" b-tableborder="TRUE" b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE" i-listformat="4" b-makeform="FALSE" s-recordsource s-displaycolumns="ID,Opera,Tomo,Pagina,PN,Thumb,Per" s-criteria s-order s-sql="SELECT * FROM PagineVolumiI WHERE (Tomo = 1) and (Pagina = '::Pagina::')" b-procedure="FALSE" clientside suggestedext="asp" s-defaultfields="Pagina=" s-norecordsfound="Nessun record restituito." i-maxrecords="1000" i-groupsize="1" botid="1" u-dblib="../_fpclass/fpdblib.inc" u-dbrgn1="../_fpclass/fpdbrgn1.inc" u-dbrgn2="../_fpclass/fpdbrgn2.inc" tag="BODY" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00"><font color="#000000">Inizio dell'area risultati database. Per visualizzare correttamente l'area risultati database è necessario accedere alla pagina connettendosi al server Web tramite browser. Il Web corrente è memorizzato nella rete o in un disco locale.</font></td></tr></table>" b-InForm="TRUE" b-UseDotNET="FALSE" CurrentExt sa-InputTypes b-DataGridFormat="FALSE" b-DGridAlternate="TRUE" sa-CritTypes b-WasTableFormat="FALSE" startspan --><!--#include file="../_fpclass/fpdblib.inc"-->
    <% if 0 then %>
    <SCRIPT Language="JavaScript">
    document.write("<div style='background: yellow; color: black;'>Impossibile visualizzare il contenuto del database nel componente Risultati database della pagina corrente. Il nome file della pagina deve avere estensione '.asp' e il sito Web deve trovarsi in un server che supporta Active Server Pages.</div>");
    </SCRIPT>
    <% end if %>
    <%
    fp_sQry="SELECT * FROM PagineVolumiI WHERE (Tomo = 1) and (Pagina = '::Pagina::')"
    fp_sDefault="Pagina="
    fp_sNoRecords="Nessun record restituito."
    fp_sDataConn="Database1"
    fp_iMaxRecords=1000
    fp_iCommandType=1
    fp_iPageSize=1
    fp_fTableFormat=False
    fp_fMenuFormat=False
    fp_sMenuChoice="ID"
    fp_sMenuValue="ID"
    fp_sColTypes="&ID=3&Opera=202&Tomo=3&Pagina=202&PN=3&Thumb=202&Per=202&"
    fp_iDisplayCols=7
    fp_fCustomQuery=True
    BOTID=1
    fp_iRegion=BOTID
    %>
    <!--#include file="../_fpclass/fpdbrgn1.inc"-->
    <!--webbot bot="DatabaseRegionStart" endspan i-checksum="5565" --><dl>
    <dt><font face="Papyrus" style="font-size: 15pt" color="#008000"><a href="<%=FP_FieldLink(fp_rs,"Per")%>">
    <img border="0" id="img1" src="../images/buttonE4.jpg" height="20" width="60" alt="PDF" onmouseover="FP_swapImg(1,0,/id/'img1',/url/'../images/buttonE5.jpg')" onmouseout="FP_swapImg(0,0,/id/'img1',/url/'../images/buttonE4.jpg')" onmousedown="FP_swapImg(1,0,/id/'img1',/url/'../images/buttonE6.jpg')" onmouseup="FP_swapImg(0,0,/id/'img1',/url/'../images/buttonE5.jpg')" fp-style="fp-btn: Soft Capsule 8; fp-proportional: 0" fp-title="PDF" align="right"></a></font><font color="#008000"><b><font face="Papyrus" style="font-size: 15pt">Volume</font></b><font face="Papyrus" style="font-size: 15pt"><b>:</b><!--webbot bot="DatabaseResultColumn" s-columnnames="ID,Opera,Tomo,Pagina,PN,Thumb,Per" s-column="Tomo" b-tableformat="FALSE" b-hashtml="FALSE" b-makelink="FALSE" clientside b-MenuFormat preview="<font size="-1">&lt;&lt;</font>Tomo<font size="-1">&gt;&gt;</font>" startspan --><%=FP_FieldVal(fp_rs,"Tomo")%><!--webbot bot="DatabaseResultColumn" endspan i-checksum="6096" --><b>,
    pagina:</b><!--webbot bot="DatabaseResultColumn" s-columnnames="ID,Opera,Tomo,Pagina,PN,Thumb,Per" s-column="Pagina" b-tableformat="FALSE" b-hashtml="FALSE" b-makelink="FALSE" clientside b-MenuFormat preview="<font size="-1">&lt;&lt;</font>Pagina<font size="-1">&gt;&gt;</font>" startspan --><%=FP_FieldVal(fp_rs,"Pagina")%><!--webbot bot="DatabaseResultColumn" endspan i-checksum="14366" --> 
    </font></font></dt>
    <div align="center">
    <dt><font color="#0000FF" face="Times New Roman">Questa è un'anteprima, usa il tasto pdf per l'alta risoluzione, le funzioni di stampa e salvataggio</font></dt>
    </div>
    <dd><p align="center">
    <!--webbot bot="DatabaseResultColumn" s-columnnames="ID,Opera,Tomo,Pagina,PN,Thumb,Per" s-column="Thumb" b-tableformat="FALSE" b-hashtml="TRUE" b-makelink="FALSE" clientside b-MenuFormat preview="<font size="-1">&lt;&lt;</font>Thumb<font size="-1">&gt;&gt;</font>" s-ColumnTypes="3,202,3,202,3,202,202" startspan --><%=FP_Field(fp_rs,"Thumb")%><!--webbot bot="DatabaseResultColumn" endspan i-checksum="11266" --></dd>
    </dl>
    <!--webbot bot="DatabaseRegionEnd" b-tableformat="FALSE" b-menuformat="FALSE" u-dbrgn2="../_fpclass/fpdbrgn2.inc" i-groupsize="1" clientside tag="BODY" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00"><font color="#000000">Fine dell'area risultati database.</font></td></tr><TR><TD VALIGN=MIDDLE><NOBR><INPUT TYPE=Button VALUE=" |< "><INPUT TYPE=Button VALUE=" < "><INPUT TYPE=Button VALUE=" > "><INPUT TYPE=Button VALUE=" >| "> [1/1]</NOBR><BR></td></tr></table>" startspan --><!--#include file="../_fpclass/fpdbrgn2.inc"-->
    <!--webbot bot="DatabaseRegionEnd" endspan i-checksum="56926" --></form>
    </td>
    </tr>
    <tr>
    <td> </td>
    </tr>
    </table>
    </div>
    </body>
    </html>