Avatar billede skywalkerdk Nybegynder
22. august 2002 - 11:57 Der er 8 kommentarer

"For - Next" skifter ikke??

Nedenstående skifter IKKE for de første 2 poster, men for hver af de efterfølgende skifter den fint som den skal. Hvor knækker filmen?!?
Det burde være en ganske simpel For - Next loop.

~Thomas


                <%
                strForm = ""
                for Each Felt in RS.Fields
if not right(Felt.Name,10) = "Forklaring" then
                    Select case RS(Felt.Name)
                    Case 1
                        if right(Felt.Name,2) = "ID" then
                            strForm = ""
                        else
                            strForm = "<input type='text' name='"& Felt.Name &"' size='20'>"
                        end if
                    Case 2
                        strForm = "<textarea rows='2' name='"& Felt.Name &"' cols='20'></textarea>"
                    Case 3
                        'if RS(Felt.Name) = 1 then strChecked = "checked" else strChecked = ""
                        strForm = "<input type='checkbox' name='"& Felt.Name &"' " & strChecked & " value=1>"
                    Case 4
                        strForm = "<input type='radio' value='V1' checked name='R1'>"
                    Case 5
                        strForm = "<select size='1' name='D1'></select>"
                    Case 98
                        strForm = ""
                    Case 99
                        strForm = ""
                    End select
                    if strForm = "" then %>
                    <% else %>
                    <tr><td><p><% =right(Felt.Name,len(Felt.Name)-len(request.querystring("table")))%></p></td><td><% = strForm %></td></tr>
                    <% end if %>
<% end if %>
                <% Next %>
Avatar billede skywalkerdk Nybegynder
22. august 2002 - 14:02 #1
Outputtet på siden ser således ud, bemærk "name" for de første to inputkasser er "KlubOverskrift"(?!):

                    <tr><td><p>Overskrift</p></td><td><input type='text' name='KlubOverskrift' size='20'></td></tr>
                   
                    <tr><td><p>Tekst</p></td><td><input type='text' name='KlubOverskrift' size='20'></td></tr>
                   
                    <tr><td><p>Pris</p></td><td><input type='text' name='KlubPris' size='20'></td></tr>
                   
                    <tr><td><p>Start</p></td><td><input type='text' name='KlubStart' size='20'></td></tr>
                   
                    <tr><td><p>Slut</p></td><td><input type='text' name='KlubSlut' size='20'></td></tr>
Avatar billede medions Nybegynder
22. august 2002 - 14:27 #2
Prøv med denne:

            <%
                strForm = ""
                While Not rs.EOF
if not right(Felt.Name,10) = "Forklaring" then
                    Select case RS(Felt.Name)
                    Case 1
                        if right(Felt.Name,2) = "ID" then
                            strForm = ""
                        else
                            strForm = "<input type='text' name='"& Felt.Name &"' size='20'>"
                        end if
                    Case 2
                        strForm = "<textarea rows='2' name='"& Felt.Name &"' cols='20'></textarea>"
                    Case 3
                        'if RS(Felt.Name) = 1 then strChecked = "checked" else strChecked = ""
                        strForm = "<input type='checkbox' name='"& Felt.Name &"' " & strChecked & " value=1>"
                    Case 4
                        strForm = "<input type='radio' value='V1' checked name='R1'>"
                    Case 5
                        strForm = "<select size='1' name='D1'></select>"
                    Case 98
                        strForm = ""
                    Case 99
                        strForm = ""
                    End select
                    if strForm = "" then %>
                    <% else %>
                    <tr><td><p><% =right(Felt.Name,len(Felt.Name)-len(request.querystring("table")))%></p></td><td><% = strForm %></td></tr>
                    <% end if %>
<% end if %>
                <% rs.MoveNext() %>
                <% Wend %>

//>Rune
Avatar billede skywalkerdk Nybegynder
22. august 2002 - 14:37 #3
Det hjælper ikke.
Den skal skifte felt i tabellen ikke post, dvs. den skal køre igennem alle "Felt.Name" og "beregne" RS ud fra indholdet af "Felt.Name".
Avatar billede medions Nybegynder
22. august 2002 - 14:43 #4
Hmm det ved jeg skam ik' helt... -Men prøv at luk dette spm og opret det i ASP kategorien... Det er der det høre hjemme ;o)

Held og lykke med det!

//>Rune
Avatar billede eagleeye Praktikant
22. august 2002 - 23:45 #5
Bemærk også at den ene hedder Overskrift og den anden hedder Tekst:

                    <tr><td><p>Overskrift</p></td><td><input type='text' name='KlubOverskrift' size='20'></td></tr>
                   
                    <tr><td><p>Tekst</p></td><td><input type='text' name='KlubOverskrift' size='20'></td></tr>

Så prøv at tjekke de to kolonner i databasen og tjek der ikke evt kunne være sneget sig en fejl ind evt et forkert Tal så strForm genbruges til i anden kolonne...
Avatar billede medions Nybegynder
25. september 2002 - 13:14 #6
Hmm sker der noget her?

//>Rune
Avatar billede medions Nybegynder
12. november 2002 - 15:14 #7
?
Avatar billede medions Nybegynder
08. januar 2003 - 10:51 #8
Vær venlig at afslutte spm'et hvis du har fået dit svar!

//>Rune
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
Kurser inden for grundlæggende programmering

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