Søg
Avatar billede petan Nybegynder
18. februar 2004 - 22:23 Der er 15 kommentarer og
3 løsninger

Mellemrum ved hver 10´ende loop

Hej

Jeg har lige et spørgsmål mere, mens jeg nu er herinde...

Jeg har en liste af links som jeg udskriver og hver gang der er udskrevet 10, skal den lave et mellem rum. Jeg har derfor lavet en variabel der hedder taller som tillægges 1 hver gang der er blevet loopet. Min kode ser således ud:

taller = 0
do While not RSlinks.eof and taller < 10000
    Response.Write "<tr> <td>" & "<a href=" & RSlinks("LinkUrl") & ">" & RSlinks("dato") & ".&nbsp;" & strMonth &  ":" & RSlinks("LinkBeskrivelse") & "</a>" & "</td>"
    taller = taller + 1
    If taller = 10 then response.write "<BR><BR><BR><BR><BR>" end if
    RSlinks.MoveNext
loop

Problemet er at den bare udskriver alle linksene (ca. 50) men den starter med at sætte min <BR> i starten af det hele og det er jo først meningen at den skal gøre det efter de første 10... Håber i forstår hvad jeg mener.
Avatar billede steen Nybegynder
18. februar 2004 - 22:28 #1
<%
taller = 0
do While not RSlinks.eof and taller < 10000
    Response.Write "<tr> <td>" & "<a href=" & RSlinks("LinkUrl") & ">" & RSlinks("dato") & ".&nbsp;" & strMonth &  ":" & RSlinks("LinkBeskrivelse") & "</a>" & "</td>"
    taller = taller + 1
    If taller Mod 10 = Null then response.write "<BR><BR><BR><BR><BR>" end if
    RSlinks.MoveNext
loop
%>
Avatar billede petan Nybegynder
18. februar 2004 - 22:32 #2
Nu har jeg skrevet følgende:

taller = 0
do While not RSlinks.eof and taller < 10000
    Response.Write "<tr> <td>" & "<a href=" & RSlinks("LinkUrl") & ">" & RSlinks("dato") & ".&nbsp;" & strMonth &  ":" & RSlinks("LinkBeskrivelse") & "</a>" & "</td>"
    taller = taller + 1
    If taller Mod 10 = Null then response.write "<BR><BR><BR><BR><BR>" end if
    RSlinks.MoveNext
loop

Men nu kommer der ingen mellemrum nogen som helst steder...
Avatar billede eagleeye Praktikant
18. februar 2004 - 22:41 #3
Du skal rette:  Null  til  0
Avatar billede bredum Nybegynder
18. februar 2004 - 22:44 #4
Prøv denne...

taller = 0
do While not RSlinks.eof and taller < 10000
    Response.Write "<tr> <td>" & "<a href=" & RSlinks("LinkUrl") & ">" & RSlinks("dato") & ".&nbsp;" & strMonth &  ":" & RSlinks("LinkBeskrivelse") & "</a>" & "</td>"
    taller = taller + 1
    If taller Mod 10 = Null then response.write vbCrLf end if
    RSlinks.MoveNext
loop
Avatar billede bredum Nybegynder
18. februar 2004 - 22:44 #5
også lige som eagleeye siger.: ret Null  til  0
Avatar billede petan Nybegynder
18. februar 2004 - 22:45 #6
If taller Mod 10 = 0 then response.write "<BR><BR><BR><BR><BR>"    end if

Det medfører bare at den starter med at lave en hel masse <br>
Avatar billede petan Nybegynder
18. februar 2004 - 22:46 #7
hov  - jeg så ikke lige det der var skrevet før - det prøver jeg lige...
Avatar billede eagleeye Praktikant
18. februar 2004 - 22:46 #8
Ja 5 som du har lavet i koden :)
"<BR><BR><BR><BR><BR>"
Avatar billede petan Nybegynder
18. februar 2004 - 22:49 #9
eagleeye: Nej - mere noget der ligner flere hundrede.
Avatar billede petan Nybegynder
18. februar 2004 - 22:50 #10
Hvis jeg gør følgende:
If taller Mod 10 = 0 then response.write vbCrLf end if

kommer der heller ingen mellemrum nogen steder.
Avatar billede petan Nybegynder
18. februar 2004 - 22:51 #11
rettelse:
If taller Mod 10 = 0 then response.write "vbCrLf" end if

Gåseøjnene skulle med. Men de kommer alle i starten og ikke løbende.
Avatar billede eagleeye Praktikant
18. februar 2004 - 22:52 #12
vbCrLf er ikke et HRML mellemrum, det er et "teks"-mellemrum.

Grunden til de kommer før er fordi de bliver udskrevet imellem </tr> og <tr> så kommer de før tabellen, og ikke inde i tabellen så din kode skal være:


taller = 0
do While not RSlinks.eof and taller < 10000
    Response.Write "<tr> <td>" & "<a href=" & RSlinks("LinkUrl") & ">" & RSlinks("dato") & ".&nbsp;" & strMonth &  ":" & RSlinks("LinkBeskrivelse") & "</a>"
    taller = taller + 1
    If taller Mod 10 = 0 then response.write "<BR><BR><BR><BR><BR>" end if
    Response.Write "</td></tr>"
    RSlinks.MoveNext
loop
Avatar billede petan Nybegynder
18. februar 2004 - 22:52 #13
Eller dvs. "" skal ikke med, men hvis jeg skriver dem, kan jeg se en lang række hvor der står vbCrLf
Avatar billede petan Nybegynder
18. februar 2004 - 22:59 #14
eagleeeye: endnu engang må jeg takke dig!! Det var selvfølgeligt det der var problemet, at jeg havde glemt at holde den inden for min table - smid lige et svar.

Tak til jeg andre også!

Jeg fordeler pointne lidt imellem jer.

Det kan være at der er en der lige hurtigt kan skrive hvad "Mod" er eller hvor jeg kan læse om det...
Avatar billede bredum Nybegynder
18. februar 2004 - 23:01 #15
måske her :-) http://www.asp-help.com/getstarted/ms/vbscript/311.asp
Avatar billede petan Nybegynder
18. februar 2004 - 23:05 #16
tak bredum. Pointne falder imorgen når eagleeye har lagt svar.
Avatar billede bredum Nybegynder
18. februar 2004 - 23:05 #17
selv tak
Avatar billede eagleeye Praktikant
18. februar 2004 - 23:06 #18
Ok et svar :)
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
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
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 9 25/06/202622:20 29/06/202621:55
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
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 21:38 webui_forge_cu121_torch231 med AMD Grafikkort. Af jonpet i Andet software
I går 20:06 email adresse Af Malm i Forslag til ændringer
I går 19:54 problem med google crome Af Malm i Andet software
I går 09:36 Alternativ holder til to skærme... Af Don G i Skærme
20/0815:01 Samsung smart TV Af postpeter@outlook.dk i Fri debat
White papers
Flere white papers »