Notifikationer

Markér alle som læst Log ud

Slettet bruger

21. april 2007 - 14:19 Der er 8 kommentarer og
2 løsninger

Hvordan laver man et alfabet udtræk fra sin MySQL?

Jeg kunne godt tænke mig at lave et alfabet udtræk.

Altså sådan et hvor man har listen i toppen.

A-B-C-D-E-F osv....

Og når man så trykker på A kommer alle titler der starter med A ud under.

Hvordan laver man sådan et nemmest?

DDD

Synes godt om

mitbrugernavn Praktikant

21. april 2007 - 14:50 #1

prøv denne

<%
bogstav = request("bogstav")
if bogstav = "" then
strQuery = "select * from Film where navn like ''"&bogstav&"'%'"
else
strQuery = "select * from Film "
end if
Set rs = Conn.Execute(strQuery)

do until rs.EOF or rs.BOF
Response.write rs("navn") & " "
rs.movenext
loop
%>

Synes godt om

mitbrugernavn Praktikant

21. april 2007 - 14:54 #2

hov jeg havde lige fået for mange pinger med

bogstav = request("bogstav")
if bogstav = "" then

strQuery = "select * from Film where navn like '"&bogstav&"%'"
else
strQuery = "select * from Film "
end if
Set rs = Conn.Execute(strQuery)

do until rs.EOF or rs.BOF
Response.write rs("navn") & " "
rs.movenext
loop
%>
<a href="index.asp?bogstav=<%="A"%>">A</a> <a href="index.asp?bogstav=<%="B"%>">B</a><a href="index.asp?bogstav=<%="C"%>">C</a>

Synes godt om

Slettet bruger

21. april 2007 - 15:44 #3

Hmmm jeg kan se jeg har sat loop forkert ind.

Men jeg vil gerne have at alle mine titler bliver vist når man går ind på siden.

Og når man trykker på A så skal den kun vise dem der starter med A...

Siden ser ud sådan nu:

<%

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strConnection

'---->Order by start
if trim(request("title")) <> "" then
title = request("title")

strQuery = "Select * from Film order by "& title &" DESC"
Set rs = Conn.Execute(strQuery)
else
strQuery = "Select * FROM Film Order By Tilfoejet Desc"
end if
'Order by slut<------

'---->Alfabet start
bogstav = request("bogstav")
if bogstav = "" then

strQuery = "select * from Film where title like '"&bogstav&"%'"
else
strQuery = "select * from Film "
end if
Set rs = Conn.Execute(strQuery)

'Alfabet slut<------

Set rs = Conn.Execute(strQuery)

%>

<html>

<head>
</head>

<body>
<div align="center">

<center>
 
 
<table border="0" width="575" cellspacing="3" cellpadding="2">
<tr>

<td width="60%" bgcolor="#BECACD">
<center>

<a href="index.asp?bogstav=<%="A"%>">A</a> - <a href="index.asp?bogstav=<%="B"%>">B</a>

</center>
</td>
</tr>
</table>
 

<table border="0" width="575" cellspacing="3" cellpadding="2">
<tr>

<td width="60%" bgcolor="#BECACD"><a href="index.asp?title=<%="title,Tilfoejet"%>">Navn</a></td>

<td width="60%" bgcolor="#BECACD">Genre</td>
<td width="60%" bgcolor="#BECACD"><a href="index.asp?title2=<%="Tilfoejet,title"%>">Tilføjet</a></td>
</tr>

<%

Do While Not rs.EOF
%>

<tr>
<td width="15%" bgcolor="#BECACD"><%=rs("title").Value %> (<%=rs("titleDK").Value %>)</td>

<td width="15%" bgcolor="#BECACD"><%=rs("Genre").Value %></td>

<td width="15%" bgcolor="#BECACD">
<%
hentdato = rs("Tilfoejet")
skrivdato = day(hentdato) & "-" & month(hentdato) & "-" & year(hentdato)

response.write skrivdato
%>
</td>

</tr>

<%
rs.MoveNext
Loop

rs.Close
Conn.Close
Set Conn = Nothing
Set rs = Nothing
%>
</table>
</center>
</div>
 

<a href="index_2.asp">Top 10</a>
</body>

</html>

Hvordan skal det helt præcis sættes ind??

Synes godt om

mitbrugernavn Praktikant

22. april 2007 - 09:09 #4

Synes godt om

Slettet bruger

22. april 2007 - 20:32 #5

'hvis der er valgt en overskrift
if trim(request("title")) <> "" then
title = request("title")
strQuery = "Select * from Film order by "& title &" DESC"
Set rs = Conn.Execute(strQuery)

else

'hvis der er valgt et bogstav
bogstav = request("bogstav")
if trim(request("bogstav")) <> "" then
strQuery = "select * from Film where title like '"&bogstav&"%'"
Set rs = Conn.Execute(strQuery)

else

'hvis der ikke er valgt hverken bogstav eller overskrift, dvs. den side den starter op med
strQuery = "select * from Film order by title"
Set rs = Conn.Execute(strQuery)

end if
end if

--------------------

Nu virker det du hjalp mig med før så ikke. Altså det med at ordre by title og ordre by tilføjet...
Selvom om jeg har <%="Tilfoejet,title"%> som link så er den begyndt at sotere efter den ældste først, det var jo omvendt den skulle..

Ellers virker det andet. Det er helt super.

Synes godt om

Slettet bruger

22. april 2007 - 22:59 #6

Har fundet ud af det..

Vil du lige poste et svar??

DDD

Synes godt om

mitbrugernavn Praktikant

23. april 2007 - 09:22 #7

du får da lige et svar

Synes godt om

mitbrugernavn Praktikant

04. maj 2007 - 11:13 #8

?????

Synes godt om

mitbrugernavn Praktikant

05. juni 2007 - 09:21 #9

og hvordan gik det så ??????

Synes godt om

Slettet bruger

21. august 2007 - 18:35 #10

Undskydl...
Jeg havde glemt at tjekke det hele her inde..
Det virkede perfekt.

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS