Notifikationer

Markér alle som læst Log ud

daniel_d Nybegynder

08. januar 2003 - 15:51 Der er 11 kommentarer og
1 løsning

loop problem

Jeg har lavet et loop i et loop som fungerer delvist. Jeg kan ikke rigtig se gennem problemet. Problemet ligger i min dropdownbox som kun finder menunummernyt første gang loopet kører. I resten af dropdownboxene er der ingen option.

Nogen med et kvalificeret gæt ?

her er min kode:
<% Case "retorden" %>
<%
Dim CategoryList, Menulist
Set CategoryList = ListCategories()
Set Menulist = ListMenuorden()
%>
<table width="100%" align="center" id="detailer" border="1" bordercolor="#000000" style="border-collapse: collapse" cellspacing="0" cellpadding="0">
<tr>
<td align="center" id="tdheader" bgcolor="#215D84"><b><font size="2" color="#FFFFFF">ID</font></b></td>
<td align="center" id="tdheader" bgcolor="#215D84"><b><font size="2" color="#FFFFFF">Kategori Navn</font></b></td>
<td align="center" id="tdheader" bgcolor="#215D84"><b><font size="2" color="#FFFFFF">Menuorden</font></b></td>
<td align="center" id="tdheader" bgcolor="#215D84"><b><font size="2" color="#FFFFFF">Ny Menuorden</font></b></td>
</tr>
<% While Not CategoryList.EOF
menunummer = CategoryList("Menuorden")
%>
<tr>
<td id="tddetailer" bgcolor="#99CCFF" style="padding-left: 2; padding-right: 2"><%=CategoryList("ID") %></td>
<td id="tddetailer" bgcolor="#99CCFF" style="padding-left: 2; padding-right: 2"><a href="Admin_Artikler.asp?category=<%=CategoryList("ID") %>"><%=CategoryList("categoryname") %></a></td>
<td align="center" id="tddetailer" bgcolor="#99CCFF" style="padding-left: 2; padding-right: 2"><%=(menunummer)%></td>
<td align="center" id="tddetailer" bgcolor="#99CCFF" style="padding-left: 2; padding-right: 2">
<form action="Admin_kategorier.asp?action=retmenuorden">
<select name="nymenuorden" size="1">
<%
DO While Not Menulist.EOF
menunummernyt = MenuList("Menuorden")
%>
<option value="<%=(menunummernyt)%>"><%=(menunummernyt)%>
<%
Menulist.Movenext
Loop
%>
</option>
</select>
</td>
</tr>
<% CategoryList.Movenext
WEnd %>
<tr>
<td align="center" id="tddetailer" bgcolor="#99CCFF" style="padding-left: 2; padding-right: 2" colspan="4">
<p align="left"><input type="submit" value="Ret menuorden"></form>
</td>
</tr>
</table>

Synes godt om

Spotgun Seniormester

08. januar 2003 - 16:20 #1

Flyt dit "</option>" tag op før "loop", så skulle det virke...

Synes godt om

Spotgun Seniormester

08. januar 2003 - 16:21 #2

Sorry - på samme linie som dit <option>-tag. Sådan her:

<option value="<%=(menunummernyt)%>"><%=(menunummernyt)%></option>
Menulist.movenext
Loop
' Her er </option> fjernet

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 20:29 #3

Stadig samme problem :o(

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 20:38 #4

Fundet fejlen...
Tror den ligger i min
Do While Not Menulist.EOF
Den kører den igennem første gang til der ikke er flere poster.
Anden gang ved den ikke at den skal starte forfra og tror ikke at der er flere poster. Ergo kommer den ikke med mere...

men hvorfor looper den så ikke det mere end denne ene gang ved jeg ikke

Synes godt om

Spotgun Seniormester

08. januar 2003 - 22:45 #5

Når du går videre til næste record i CategoryList, så burde du vel også spole tilbage til starten af Menulist (med MenuList.MoveFirst mener jeg). Ellers kunne jeg godt forestille mig der kunne komme en konflikt!

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 22:50 #6

Ja... men der er ingen konflikter, ingenting...
Men dropdown'en virker kun 1 gang... underligt

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 22:51 #7

Første gang ser det sådan her ud:
vis kilde:

<select name="nymenuorden" size="1">

<option value="0">0
<option value="1">1
<option value="2">2
<option value="3">3
<option value="4">4
<option value="5">5
<option value="6">6
<option value="7">7
</option>

Anden gang:

<select name="nymenuorden" size="1">

</option>

Synes godt om

eagleeye Praktikant

08. januar 2003 - 23:21 #8

Prøv at sætte en Menulist.MoveFirst ind:

Menulist.MoveFirst '<<--------------- HER
DO While Not Menulist.EOF
menunummernyt = MenuList("Menuorden")

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 23:25 #9

<%
Menulist.Movefirst
do While Not Menulist.EOF
menunummernyt = MenuList("Menuorden")
Response.Write (menunummernyt)
loop
%>

Sådan her ?

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 23:26 #10

Det er den i hvert fald ikke glad for... IE vil ikke rigtig loade siden så

Synes godt om

daniel_d Nybegynder

08. januar 2003 - 23:32 #11

Det virker nu...
Syntaxen var sådan her:
<%
If Not Menulist.BOF Then
Menulist.MoveFirst
End If
do While Not Menulist.EOF
menunummernyt = MenuList("Menuorden")
Response.Write (menunummernyt)
Menulist.Movenext
loop
%>

Eagleeye... jeg takker endnu en gang for hjælp.
Post et svar og der er point til dig

Synes godt om

eagleeye Praktikant

09. januar 2003 - 17:37 #12

Jamen ok :)

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
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
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51

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