Notifikationer

Markér alle som læst Log ud

kartolux Nybegynder

01. april 2001 - 16:55 Der er 9 kommentarer og
1 løsning

Kategori kun 1 gang!

Hej!
Jeg åbner databasen og udtrækker med følgende:

<%
Response.AddHeader \"PRAGMA\", \"NO-CACHE\"
\'----------------
\'View Data Code
Set dbConn = Server.CreateObject(\"ADODB.Connection\")
dbConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"/_private/ArticleDB.mdb\")
SQL = \"Select * FROM Articles where accepted=\'accepted\' Order BY Category asc,Title Asc\"
set RS = dbconn.execute(SQL)
\'----------------
%>

Herefter listes med denne kode:

<% do while not rs.eof %>
 <a HREF=\"bladre.asp?ArticleID=<%=RS(\"ArticleID\")%>\"> <%=RS(\"Category\")%> - <%=RS(\"Title\")%>    
 

</a>
<%
RS.Movenext
loop
%>

Resultatet kan evt. ses her:
http://www.erhvervstilbud.dk/webalfaliste.asp

Hvordan gør jeg, så Category kun skrives 1 gang OVER de tre artikler, der er kategorien \"Business\"?

F.eks:

Business (Med fed skrift)
Artikel 1
Artikel 2
Artikel 3
Tom linje
Tom linje
Food (Med fed skrift)
Artikel 1
Artikel 2
osv.

Synes godt om

stigc Nybegynder

01. april 2001 - 17:03 #1

<%
do while not rs.eof
if oldCateogry<> RS(\"Category\") THEN response.write(\"\" & RS(\"Category\") &\"\")
oldCateogry= RS(\"Category\")
%>

<a HREF=\'bladre.asp?ArticleID=<%=RS(\"ArticleID\")%>\"><%=RS(\"Title\")%></a>

<%
RS.Movenext
loop
%>

Synes godt om

burningice Nybegynder

01. april 2001 - 17:12 #2

<%
Response.AddHeader \"PRAGMA\", \"NO-CACHE\"
\'----------------
\'View Data Code
Set dbConn = Server.CreateObject(\"ADODB.Connection\")
dbConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"/_private/ArticleDB.mdb\")
SQL = \"Select * FROM Articles where accepted=\'accepted\' group by category Order BY Category asc,Title Asc\"
set RS = dbconn.execute(SQL)
\'----------------
%>

Herefter listes med denne kode:

<% do while not rs.eof %>
<%=rs(\"category\")%> 
<% sql1 = \"Select * FROM Articles where accepted=\'accepted\' and category = \'\"& rs(\"category\")&\"\'\"
set rs1 = conn.execute(sql1) %>
<% do while not rs1.eof %>
<a HREF=\"bladre.asp?ArticleID=<%=RS1(\"ArticleID\")%>\"><%=RS1(\"Title\")%></a>
<%
rs1.movenext
loop
%>
 
<%
RS.Movenext
loop
%>

Synes godt om

kartolux Nybegynder

01. april 2001 - 18:25 #3

Den virker ikke rigtigt, stigc - se selv, der mangler poster:
http://www.erhvervstilbud.dk/webalfaliste.asp

den gamle:
http://www.erhvervstilbud.dk/webalfalisteold.asp

Synes godt om

kartolux Nybegynder

01. april 2001 - 18:26 #4

Den kommer ud med \"cannot group on items selected with \"*\" eller noget i den stil

Synes godt om

burningice Nybegynder

01. april 2001 - 18:42 #5

lavede du da en group by * ??

Synes godt om

burningice Nybegynder

01. april 2001 - 18:46 #6

SQL = \"Select * FROM Articles where (accepted=\'accepted\') group by category\"

sql1 = \"Select * FROM Articles where (accepted=\'accepted\') and (category = \'\"& rs(\"category\")&\"\') order by title ASC\"

Synes godt om

stigc Nybegynder

01. april 2001 - 19:03 #7

<a HREF=\"bladre.asp?ArticleID=<%=RS(\"ArticleID\")%>\"><%=RS(\"Title\")%></a>

der var en lille fejl! Prøv med ovenstående linie.

Synes godt om

kartolux Nybegynder

01. april 2001 - 19:16 #8

Sorry, cyberfessor - stigc\'s løsning virker - og den er mindst kompliceret. Han kom også først. Så han får points.

Vi kan også dele dem 25/5 eller hvad?

Stigc - vil du ikke lige lave et nyt svar :0)

Synes godt om

stigc Nybegynder

01. april 2001 - 19:19 #9

svar

Synes godt om

kartolux Nybegynder

01. april 2001 - 19:40 #10

Thanx - over and out :0)

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
ASP classic kopiere database fil på server Af bsn i ASP	7	31/10/202610:20	01/11/202620:28
Persits.Upload Af bsn i ASP	9	17/09/202611:37	21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58

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