Avatar billede kornfreak Nybegynder
14. december 2000 - 19:34 Der er 3 kommentarer og
2 løsninger

Paging / MYSQL

Er der nogen der kan hjælpe med at smide noget paging i dette her?

<%
elseif action = \"search\" then
%>
<table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
  <tr>
    <td width=\"25%\" bgcolor=\"#08335A\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#FFFFFF\"><b>Nick:</b></font></td>
    <td width=\"25%\" bgcolor=\"#08335A\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#FFFFFF\"><b>Køn:</b></font></td>
    <td width=\"25%\" bgcolor=\"#08335A\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#FFFFFF\"><b>Alder:</b></font></td>
    <td width=\"25%\" bgcolor=\"#08335A\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#FFFFFF\"><b>Billede:</b></font></td>
  </tr>
<%
SQL = \"select * from profil where\"
SQL2 = \"select count(*) as num from profil where\"
if len(request(\"antal\")) = 0 Then
antal = 0
end if

if request(\"kon\") = \"1\" Then
SQL = SQL & \" kon = 1\"
SQL2 = SQL2 & \" kon = 1\"
elseif request(\"kon\") = \"2\" Then
SQL = SQL & \" kon = 2\"
SQL2 = SQL2 & \" kon = 2\"
else
response.redirect(\"search.asp\")
end if

if len(request(\"nick\")) <> 0 Then
SQL = SQL & \" and nick LIKE \'%\" & request(\"nick\") & \"%\'\" 
SQL2 = SQL2 & \" and nick LIKE \'%\" & request(\"nick\") & \"%\'\" 
end if

if len(request(\"alder\")) <> 0 Then
SQL = SQL & \" and alder = \" & request(\"alder\")
SQL2 = SQL2 & \" and alder = \" & request(\"alder\")
end if

if len(request(\"h\")) <> 0 Then
SQL = SQL & \" and h > \" & request(\"h\")
SQL2 = SQL2 & \" and h > \" & request(\"h\")
end if

if len(request(\"h2\")) <> 0 Then
SQL = SQL & \" and h < \" & request(\"h2\")
SQL2 = SQL2 & \" and h < \" & request(\"h2\")
end if

if len(request(\"v\")) <> 0 Then
SQL = SQL & \" and v > \" & request(\"v\")
SQL2 = SQL2 & \" and v > \" & request(\"v\")
end if

if len(request(\"v2\")) <> 0 Then
SQL = SQL & \" and v < \" & request(\"v2\")
SQL2 = SQL2 & \" and v < \" & request(\"v2\")
end if

if len(request(\"born\")) <> 0 Then
SQL = SQL & \" and born = \" & request(\"born\")
SQL2 = SQL2 & \" and born = \" & request(\"born\")
end if

if len(request(\"ryge\")) <> 0 Then
SQL = SQL & \" and ryge = \" & request(\"ryge\")
SQL2 = SQL2 & \" and ryge = \" & request(\"ryge\")
end if

if len(request(\"bosted\")) <> 0 Then
SQL = SQL & \" and bosted = \" & request(\"bosted\")
SQL2 = SQL2 & \" and bosted = \" & request(\"bosted\")
end if

if len(request(\"job\")) <> 0 Then
SQL = SQL & \" and job = \" & request(\"job\")
SQL2 = SQL2 & \" and job = \" & request(\"job\")
end if

if len(request(\"parstatus\")) <> 0 Then
SQL = SQL & \" and parstatus = \" & request(\"parstatus\")
SQL2 = SQL2 & \" and parstatus = \" & request(\"parstatus\")
end if

if len(request(\"musiksmag\")) <> 0 Then
SQL = SQL & \" and musiksmag = \" & request(\"musiksmag\")
SQL2 = SQL2 & \" and musiksmag = \" & request(\"musiksmag\")
end if

if len(request(\"stjernetegn\")) <> 0 Then
SQL = SQL & \" and stjernetegn = \" & request(\"stjernetegn\")
SQL2 = SQL2 & \" and stjernetegn = \" & request(\"stjernetegn\")
end if

if len(request(\"hear\")) <> 0 Then
SQL = SQL & \" and hear = \" & request(\"hear\")
SQL2 = SQL2 & \" and hear = \" & request(\"hear\")
end if

if len(request(\"eyes\")) <> 0 Then
SQL = SQL & \" and eyes = \" & request(\"eyes\")
SQL2 = SQL2 & \" and eyes = \" & request(\"eyes\")
end if

if len(request(\"body\")) <> 0 Then
SQL = SQL & \" and body = \" & request(\"body\")
SQL2 = SQL2 & \" and body = \" & request(\"body\")
end if

SQL = SQL & \" LIMIT \" & antal & \", 10\"
set rs = conn.execute( SQL )
set rs2 = conn.execute( SQL2 )
num = rs2(\"num\")
if rs.eof Then
%>
</table>
<font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"000000\">Søgningen gav intet resultat</font><br>
<font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"000000\"><a href=\"search.asp\">Prøv igen</a></font>
<%
else
%>
Der blev fundet <%=num%> resultater af din søgning<br>
<%
do until rs.eof
%>
  <tr>
    <td width=\"25%\"><a href=\"se_profil.asp?uid=<%=rs(\"uid\")%>\"><font face=\"Verdena, Tahoma, arial\" size=\"2\"><%=rs(\"nick\")%></font></a></td>
    <td width=\"25%\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#000000\"><% if rs(\"kon\") = 1 Then%>Kvinde<%elseif rs(\"kon\") = 2 then %>Mand<% end if %></font></td>
    <td width=\"25%\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#000000\"><%=rs(\"alder\")%></font></td>
    <td width=\"25%\"><font face=\"Verdena, Tahoma, arial\" size=\"2\" color=\"#000000\"><%if rs(\"pic\") = 1 Then%>Ja<% else %>Nej<% end if %></font></td>
  </tr>
<%
rs.movenext
loop
end if
rs.close
set rs = nothing
set SQL = nothing
%>
</table>
<%
rs2.close
set rs2 = nothing
set SQL2 = nothing
end if
%>
Avatar billede erikjacobsen Ekspert
14. december 2000 - 21:26 #1
For 2 point kan du få dette link:
http://www.delfs.dk/php/index.php?p=articles&id=3
Avatar billede kornfreak Nybegynder
14. december 2000 - 22:20 #2
Jeg har omskrevet alt lige bortset fra
for($start=0; $total > $start; $start=$start+$pr_side)

og det virker fint :)

Man kan jo ikke lave en for/next sætning med alle variabler i asp, kan man?
Avatar billede kornfreak Nybegynder
14. december 2000 - 22:30 #3
Damn....jeg løste det :)
start = 0
do while total > start
if lcase(start) = lcase(s) then
response.write(page)
else
response.write(\"<a href=\'searh.asp?s=\" & start & \"\'>\" & page & \"</a>\")
end if
start=start+pr_side
page = page+1
loop


takker for hjælpen :)
Avatar billede erikjacobsen Ekspert
14. december 2000 - 22:44 #4
Det er jo flot, Kornfreak! Ja, det var PHP, og derfor måske ikke lige
din kop kamillete. Men det vigtigste, som du opdagede, er jo netop
MySql-delen. Om resten så er PHP eller ASP er knap så vigtigt. Og det
er også korrekt at den for-løkke nok skal laves som en while.

Du har bestemt fortjent de 50 p !-)
Avatar billede kornfreak Nybegynder
14. december 2000 - 23:19 #5
Jeg har arbejdet lidt med php, og kender da syntaxen sårn rimeligt, men det her var nok det hårdeste jeg har lavet indtil videre, utroligt hvad man kan når man først går i gang og bruger de små grå :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester