15. marts 2005 - 09:59Der er
3 kommentarer og 1 løsning
Liste efter alfabetisk
Hej!
Jeg har lavet mig følgende kode, hvor den henter et ID og sprog fra en database, og ud fra det, henter den teksten til ID'et i en anden database. Men problemet er så, jeg gerne vil have sorteret et hele i alfabetisk orden efter rsHovedmenuSprog.
Hvordan klarer jeg det, når jeg har opbygget min database på denne måde .. ?
<% Set rsHovedmenu = Conn.Execute("select * from Menuer where Sprog LIKE '%" & SetSprog & "%' AND now() between AktivFra and AktivTil") if rsHovedmenu.EOF then response.write "<tr><td colspan=3 align=center>Der er endnu ikke oprettet nogle kategorier!</td></tr>" else Do until rsHovedmenu.eof Set rsHovedmenuSprog = Conn.Execute("select * from MenuSprog where MenuID = " & rsHovedmenu("ID") & " and Sprog = '" & SetSprog & "' order by Navn") %> <tr> <td width="5"> </td> <td><a href="default.asp?s=VisKat&id=<%=rsHovedmenu("ID")%>" class="Hovedmenu" title="<%=rsHovedmenuSprog("beskrivelse")%>"><%=rsHovedmenuSprog("navn")%></a></td> <td width="5"> </td> </tr> <% rsHovedmenu.movenext loop end if rsHovedmenu. close set rsHovedmenu = Nothing %>
Set rsHovedmenuSprog = Conn.Execute("select * from MenuSprog where MenuID = " & rsHovedmenu("ID") & " and Sprog = '" & SetSprog & "' order by Navn ASC")
Tror desværre ikke helt du forstod, for sådan er det jo også typisk måde at gøre det, her holder det bare ikke.
Jeg henter nogle værdier fra tabellen "Menuer". Her får jeg udskrevet forskellige ID numre på de poster jeg skal bruge I Tabellen MenuSprog henter jeg så, ud fra ID fra "menuer", teksten som skal sættes ind.
Så sorteringen skal ske efter rsHovedmenu og tage noget data ind fra rsHovedmenuprog og sortere derfra.
Jeg har lavet en anden løsning. I stedet har jeg byttet om på mine udtræk, så jeg får den i en anden rækkefølge og bedre kan styre det.
sådan her:
<% Set rsHovedmenuSprog = Conn.Execute("select * from MenuSprog where Sprog = '" & SetSprog & "' order by Navn asc") if rsHovedmenuSprog.EOF then response.write "<tr><td colspan=3 align=center>Der er endnu ikke oprettet nogle kategorier!</td></tr>" else Do until rsHovedmenuSprog.eof
Set rsHovedmenu = Conn.Execute("select * from Menuer where Sprog LIKE '%" & SetSprog & "%' AND now() between AktivFra and AktivTil AND ID = " & rsHovedmenuSprog("MenuID") & "") if rsHovedmenu.EOF then else
%> <tr> <td width="5"> </td> <td><a href="default.asp?s=VisKat&id=<%=rsHovedmenu("ID")%>" class="Hovedmenu" title="<%=rsHovedmenuSprog("beskrivelse")%>"><%=rsHovedmenuSprog("navn")%></a></td> <td width="5"> </td> </tr> <% end if rsHovedmenuSprog.movenext loop end if rsHovedmenuSprog. close set rsHovedmenuSprog = Nothing %>
hva med å lage det i en query? Er ikke sikker på feltene dine...
Conn.Execute("select * from MenuSprog where MenuID IN (select * from Menuer where Sprog LIKE '%" & SetSprog & "%' AND now() between AktivFra and AktivTil) order by Navn")
Synes godt om
Ny brugerNybegynder
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.