Avatar billede nellersteph Nybegynder
18. november 2003 - 10:34 Der er 30 kommentarer og
1 løsning

Sortering i selectboxe !

Hej eksperter...

Jeg er igang med at lave en sortering i et arkiv.

Jeg bruger select/options til det, værdierne i disse skal være dynamiske. Som nedenstående:

<form name="form2" action="default.asp" method="get">
        <td>Vis titler fra
<select name="gruppesort" class="dropdo">
<option value="0">Gruppe</option>
<%
set QueryS = (connect.execute("select * from intra_cd "))
Do until QueryS.EOF
%>
<option value="<%=QueryS("id")%>"><%=QueryS("gruppe")%></option>
<%
QueryS.movenext
loop
QueryS.close
%>
</select>
&nbsp;<input type="submit" value="Vis" class="dropdoknap"></td>   
</form>

Jeg kan simpelt hen ikke finde ud af at kalde det på den rigtige måde... HJÆÆÆLP er der nogen der kan finde ud af det ?

/Neller
Avatar billede paultodobom Nybegynder
18. november 2003 - 10:42 #1
Umiddelbart ser VB koden korrekt ud. Dit problem er vel bare at bruge "order by" i sql-sætningen. Noget i stil med:

set QueryS = (connect.execute("select * from intra_cd order by [navn el. hvad der nu skal sorteres på]"))
Avatar billede nellersteph Nybegynder
18. november 2003 - 10:49 #2
Jeps...
Har flg...

If grSort = "" then
grSort = "gruppe"
Else
grSort = Request.QueryString("gruppesort")
End If

Set QueryGr = Connect.Execute("Select * From "& tabelnavn &" order by "& grSort &" ")


Neller
Avatar billede paultodobom Nybegynder
18. november 2003 - 10:55 #3
Virker det ikke? Eller misforstår jeg noget?!!
Avatar billede nellersteph Nybegynder
18. november 2003 - 10:58 #4
Nope det virker ikke !!
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:00 #5
Får du en script fejl eller er det resultatet af forespørgslen der ikke er korrekt. Hvad får du?
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:03 #6
Der sker ingen ting !!! ingen sortering, jeg syntes at det er vildt mærkeligt, jeg lavede en sortering i går faldende /stigende og den virker opåklageligt
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:05 #7
Det vil sige, at du får en usorteret liste ud i din select?
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:09 #8
den sorter slet ikke... med ovenstående burde den vel kun tage de indslag hvor gruppe er = med den gruppe man sender med !
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:18 #9
"order by" er ikke det samme som "where". Vil du både indsnævre dit output og sortere det? Med "order by" sorterer man; med "where" indsnævrer man. Jeg tror umiddelbart du har misforstået noget. :-)
Beskriv hvad du vil med data fra tabellen, så skal jeg omformulere det til sql.
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:25 #10
Jeg vil kun have listet de indslag der er i gruppen
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:33 #11
OK, så skal du skrive noget i denne stil:

select *
from [tabelnavn]
where [navn på felt som indeholder gruppe] = [gruppeværdi, måske 1, 2 el. 3, el. "æble", "pære" el. "banan"]
order by [gruppe]

Nu medtages kun de poster som tilhører en bestemt gruppe. Posterne som medtages sorteres på gruppenavn.
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:38 #12
hmmmmm
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:39 #13
Er du lost? :-)
Giv mig hele VB koden som henter data og giv mig navnet på tabellen og tabellens feltnavne
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:40 #14
virker ikke får fejl
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:42 #15
<%
tabelnavn = "intra_cd"
Set QueryGr = Connect.Execute("Select * From "& tabelnavn &" where "& grSort &" = gruppe ")

Response.Write "Select * From "& tabelnavn &" where "& QueryGr("gruppe") &" = gruppe"

Do until QueryGr.EOF
%>
    <tr>
        <td align="center"><%=QueryGr("plads")%></td>
        <td><%=QueryGr("dato")%></td>
        <td><i><%=QueryGr("borr")%></i></td>
        <td><%=QueryGr("udg")%></td>
        <td><a href="bestil.asp?id=<%=QueryGr("id")%>"><%=QueryGr("titel")%></a></td>
        <td align="center"><%=QueryGr("ver")%></td>
        <td align="center"><%=QueryGr("lang")%></td>
        <td><%=QueryGr("gruppe")%></td>   
    </tr>
<%
QueryGr.movenext
loop
QueryGr.close
%>
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:47 #16
Lad os koncentrere os om sætningen:

Set QueryGr = Connect.Execute("Select * From "& tabelnavn &" where "& grSort &" = gruppe ")

Jeg skal lige vide om grSort indeholder navnet på et felt i tabellen intra_cd og hvad "gruppe" er.
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:48 #17
If grSort = "" then
grSort = "gruppe"
Else
grSort = Request.QueryString("gruppesort")
End If
Avatar billede paultodobom Nybegynder
18. november 2003 - 11:54 #18
OK, dvs. at grSort indeholder selve den værdi der kan stå i tabel-feltet gruppe. Kan du give mig navnet på tabel-feltet som indeholder disse værdier?
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:56 #19
Jamen det er gruppe !!!
Avatar billede nellersteph Nybegynder
18. november 2003 - 11:59 #20
Er det et problem at alle formularerne som styrer denne sortering ligger på den samme side ?
Avatar billede paultodobom Nybegynder
18. november 2003 - 12:02 #21
Har du mulighed for at sende mig hele koden, både asp filen og db'en, så kan jeg lidt bedre følge dig. Jeg tror vi taler forbi hinanden. Du kan sende til info@axent.dk
Avatar billede nellersteph Nybegynder
18. november 2003 - 12:11 #22
på vej
Avatar billede nellersteph Nybegynder
18. november 2003 - 12:22 #23
Har du modtaget det ???
Avatar billede paultodobom Nybegynder
18. november 2003 - 12:26 #24
jeps og jeg har sendt en forespørgsel på filerne adovbs.inc og connect.asp. Kan du sende dem til mig?
Avatar billede nellersteph Nybegynder
18. november 2003 - 12:32 #25
Hvad var det jeg havde kaldt databasen, den var en test jeg lave til dig !!!
Avatar billede paultodobom Nybegynder
18. november 2003 - 13:02 #26
...var lige til frokost. Databasen har du kaldt intra.mdb. Hvis du sender mig filerne kan jeg selv rette dem til.
Avatar billede nellersteph Nybegynder
18. november 2003 - 13:04 #27
ja det skal jo også passes... he he, filerne er på vej
Avatar billede nellersteph Nybegynder
18. november 2003 - 13:17 #28
Har du nodtaget dem ?
Avatar billede paultodobom Nybegynder
18. november 2003 - 13:21 #29
jeps jeg har modtaget dem
Avatar billede nellersteph Nybegynder
25. november 2003 - 09:33 #30
Hej Paul

Kan du ikke lige skrive et svar så jeg kan give dig point !

Neller
Avatar billede nellersteph Nybegynder
19. december 2003 - 14:44 #31
.
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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