[ASP] Paging systeem filtert niet

[Verwijderd]

Heren (en dames),

Ik heb een paging systeem geschreven en het werkt, alleen niet naar behoren. Ik wil de velden die worden opgehaald namelijk filteren en alleen tonen wat gefilterd wordt. In dit geval filtert hij helemaal niks en toont gewoon alle gegevens. Dus het lijkt wel alsof de filter helemaal niet wordt aangeroepen.

code:

<%
dim oRS, szHuidigePlaats, bFavoriet, recordsonpage, requestrecords, offset, allrecords, hiddenrecords, showrecords, lastrecord, recordcounter, pagelist, pagelistcounter
call OpenXPSRConnection() %>

<%  

    recordsonpage = 8

    allrecords = 0

<!-- Hier worden alle velden opgehaald -->  
    set oRS = GetPagesFromTemplate("SumTV Aflevering", "Peiler,Afleveringnr,Titel,Intro_Tekst,Tonen_in_lijst,Afbeelding_intro","Tonen_in_lijst='1'","XPSR_FirstPublishedDate DESC", 0, 0, 0, "")
    do until oRS.EOF
        allrecords = allrecords + 1 
        oRS.movenext
    loop 

    offset = request.querystring("offset")
      if offset = 0 OR offset = "" then
    requestrecords = 0
      else
    requestrecords = requestrecords + offset
    end if

    hiddenrecords = requestrecords
      ors.movefirst
      do until hiddenrecords = 0 OR oRS.EOF
          hiddenrecords = hiddenrecords - 1
    oRS.movenext
    if oRS.EOF then
    lastrecord = 1
      end if
    loop   
    %>

<!-- Hier pas ik het filter toe, zodra het veld "Peiler" de waarde "_stu" heeft moet hij de volgende code uitvoeren -->
<% if oRS("Peiler") = "_stu" then %>

<!-- Plek waar de waarden getoond worden -->
      <div class="article_intro">
<table cellpadding="0" cellspacing="0" border="0" width="655">

  <% showrecords = recordsonpage
     recordcounter = requestrecords
     do until showrecords = 0 OR oRS.EOF
     recordcounter = recordcounter + 1 %>

  <tr>
    <!-- <td><b><%= recordcounter %></b></td> -->
    <td valign="top" width="150">
      <a href="<%= oRS("XPSR_URL") %>"><img src="<%= oRS("Afbeelding_intro") %>" border="0" width="150" height="100" alt="" style="border: 1px solid #666;"></a>
    </td>
    <td width="10"></td>
    <td valign="top" width="495">

        <div class="article_title"><a href="<%= oRS("XPSR_URL") %>"><%= oRS("Titel") %></a></div>
        <div class="article_text"><%= oRS("Intro_Tekst") %>
          <div class="article_link"><a href="<%= oRS("XPSR_URL") %>">Bekijk de video&gt;&gt;</a></div>
        </div>

    </td>
  </tr>
  <tr><td height="20" colspan="3"></td></tr>
  
  <% showrecords = showrecords - 1
  oRS.movenext
  if oRS.EOF then
    lastrecord = 1
  end if
  loop %>

</table>

<!-- Plek waar het paging systeem getoond wordt -->
<table cellspacing="0" cellpadding="0" border="0" width="655">
 <tr>
  <td><% if requestrecords <> 0 then %><a href="preview.asp?offset=<% = requestrecords - recordsonpage %>">Prev Page</a><% else %>Prev Page<% end if %></td>
  <td><% if lastrecord <> 1 then %>    <a href="preview.asp?offset=<% = requestrecords + recordsonpage %>">Next Page</a><% else %>Next Page<% end if %></td>
 </tr>
 <tr>
  <td colspan="2">pagelist:
<%
pagelist = 0
pagelistcounter = 0
do until pagelist > allrecords  
  pagelistcounter = pagelistcounter + 1
%>
<a href="preview.asp?offset=<%= pagelist %>"><%= pagelistcounter %></a>
<%
  pagelist = pagelist + recordsonpage
loop
%>
  </td>
 </tr>
</table>
      </div>
<% end if %>
            <%
   set oRS = nothing
   call CloseXPSRConnection() %>

Weet iemand wat er misgaat, want ik ben er nu al zo lang mee bezig dat de lettertjes voor mijn ogen dansen. (Bekend probleem niet?)

[TeeDee]

Weet je zeker dat de waarde in oRS("Peiler") _stu bevat? Print dat eens op het scherm? (Ervan uitgaande dat je paging gewoon werkt )

En waarom moeilijk doen? Als je nog een extra parameter in je where clausule mee kan nemen heb je dat alvast getackeld.

Edit: in je andere topics heb je het over "_sta". Weet je zeker dat je geen tikfout hebt gemaakt?

[ Voor 47% gewijzigd door TeeDee op 24-04-2007 10:07 ]

[NMe]

Sorry, maar we zijn hier geen persoonlijke debugservice. Het is niet de bedoeling dat je hier 100 regels code dumpt en maar verwacht dat wij die voor je gaan doorlopen/debuggen. Wat heb je zelf al geprobeerd en wat lukte er niet aan? Heb je Programming FAQ - Debuggen: hoe doe ik dat? al eens doorgelezen en daar wat mee gedaan?

Lees Programming Beleid - De "quickstart" even door en pas je topicstart wat aan, want hier gaan we in deze vorm niet aan beginnen.

VB is niet hetzelfde als VBScript wat in ASP gebruikt wordt.

[Verwijderd]

TeeDee schreef op dinsdag 24 april 2007 @ 09:59:
Weet je zeker dat de waarde in oRS("Peiler") _stu bevat? Print dat eens op het scherm? (Ervan uitgaande dat je paging gewoon werkt )

En waarom moeilijk doen? Als je nog een extra parameter in je where clausule mee kan nemen heb je dat alvast getackeld.

Edit: in je andere topics heb je het over "_sta". Weet je zeker dat je geen tikfout hebt gemaakt?

De waarden waarop gefiltert kan worden zijn o.a. _stu en _sta dus een typefoutje is dit niet

[TeeDee]

Ja, dan nog: staan die waarden in oRS("Peiler") Als je alleen op een de onderste zin gaat reageren gaat het een erg lang topic worden

[NMe]

TeeDee schreef op dinsdag 24 april 2007 @ 10:56:
Als je alleen op een de onderste zin gaat reageren gaat het een erg lang topic worden

Als mijn hele post genegeerd wordt juist niet.

Ik doe dit topic dicht. Triforce, als je een antwoord wil op je vraag kun je de quickstart doorlezen en een nieuw topic openen volgens de richtlijnen die daarin genoemd worden. Zoals ik al zei: we zijn geen persoonlijke debugservice.