--- title: "Loopa ut 2st ur getrows, sedan nästa 2" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/116591-loopa-ut-2st-ur-getrows-sedan-nästa-2" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "ConnyFox" published: "2004-11-24T10:29:28.000Z" updated: "2004-11-29T06:21:28.000Z" replies: 21 views: 516 page: 1 pages: 2 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/116591-loopa-ut-2st-ur-getrows-sedan-nästa-2" --- # Loopa ut 2st ur getrows, sedan nästa 2 _Sida 1 av 2._ ## #1 — ConnyFox, 2004-11-24T10:29Z Hur gör jag för att först loopa ut 2st ur getrows och sedan nästa två osv?! Permalänk: https://www.webforum.nu/p/116591 ## #2 — lilja, 2004-11-24T11:04Z jag är inte så inne på getrows men syntaxen är väl getrwos(rad,kolumn)? I så fall fungerar det ju med två For sattser: (10 rader) ``` For x = 0 To 9 For y = 0 To 1 getrows(x,y) Next Next ``` eller med en while och en For-satts: (Skriver väl ut all data?) ``` x=0 While Not objRs.EOF For y = 0 To 1 getrows(x,y) Next x = x +1 Wend ``` Permalänk: https://www.webforum.nu/p/1491751 ## #3 — ConnyFox, 2004-11-26T08:11Z hmm jag får inte till det riktigt.. använder denna koden ``` x = 0 For i=0 to ubound(annons,2) while x < 3 getrows(0,i) x = x+1 wend Next ``` Det funkar bra på så vis att endast 3st skrivs ut, fungerar mindre bra då dessa tre är samma ;) Permalänk: https://www.webforum.nu/p/1492649 ## #4 — Palle, 2004-11-26T08:30Z Hur vill du att resultatet ska bli? Permalänk: https://www.webforum.nu/p/1492655 ## #5 — ConnyFox, 2004-11-26T08:40Z tre poster ur databasen skall skrivas ut, sedan skall man kunna lägga t.ex in kod för annat och sedan loopa ut nästa 3 osv. Permalänk: https://www.webforum.nu/p/1492658 ## #6 — lilja, 2004-11-26T21:42Z lite osäker på vad du vill göra? Om du vill hämta 3 olika poster ur en databas kan du i SQL-sattsen skriva: ``` SQL = "SELECT DISTINCT tabellrad FROM tabellnamn" ``` Permalänk: https://www.webforum.nu/p/1493064 ## #7 — paraxe, 2004-11-26T21:54Z Vill du ha 2 poster sen en radbrytning, forstsätta med 2 poster och en radbrytning .. osv.. ? Permalänk: https://www.webforum.nu/p/1493069 ## #8 — lilja, 2004-11-26T22:07Z Jag är inte så inne på getrows så jag postar hur jag hade gjort med RecordSet: ``` '----- Skriver ut alla poster While Not objRs.EOF '----- Första posten skrivs ut objRs.MoveNext '----- Kontrollerar så att det inte är slut på poster If Not objRs.EOF Then '---- NEJ! Andra posten skrivs ut objRs.MoveNext End If Wend ``` Permalänk: https://www.webforum.nu/p/1493071 ## #9 — lilja, 2004-11-26T22:10Z Är det förresten annonser du vill ha ut med bilder?? Det finns en komponent för det i ASP. Du kan läsa mer om det här: Permalänk: https://www.webforum.nu/p/1493073 ## #10 — ConnyFox, 2004-11-28T12:33Z Mjo men jag använder ju inte recset jag använder getrows :( och nej bilder är ingen viktig del. Permalänk: https://www.webforum.nu/p/1493734 ## #11 — lilja, 2004-11-28T18:51Z borde det inte vara: ``` Dim x, y x = 0 y = 0 For i=0 to ubound(annons,2) while x < 3 getrows(i,x) x = x + 1 wend Next ``` jag ändrade värdena i getrows(värde1, värde2) från (0,x) till (i,x) Permalänk: https://www.webforum.nu/p/1493905 ## #12 — ConnyFox, 2004-11-28T19:18Z Du kanske har rätt men det fungerade inte för mig Det går inte att använda parenteser när en Sub anropas. /webshop2/main.asp, line 66, column 11 annons(i,x) ``` Dim x, y x = 0 y = 0 For i=0 to ubound(annons,2) while x < 3 annons(i,x) x = x + 1 wend Next ``` Permalänk: https://www.webforum.nu/p/1493912 ## #13 — lilja, 2004-11-28T19:38Z Om du vill anropa en funktion som inte returnerar något får du skriva t.ex: funktionsNamn inparameter1, inparameter2, osv... Om du anropar en funktion som ska returnerar något skriver du t.ex: variabel = funktionsNamn(inparameter1, inparameter2, osv...) eller \<%=funktionsNamn(inparameter1, inparameter2, osv...)%\> Permalänk: https://www.webforum.nu/p/1493917 ## #14 — ConnyFox, 2004-11-28T20:07Z ok nu fattar jag ingenting alls :D varför fungerar inte koden säger du? :D Permalänk: https://www.webforum.nu/p/1493925 ## #15 — lilja, 2004-11-28T20:24Z när jag fick problemet som sa att man inte kan använda paranteser så var det för att funktionen som jag anropade inte returnerade någon information... ex om man anropar en funktion som ska räkna ut 1 + 2 och returnera svaret så använder man paranteser... om man ska anropa en parantes som inte returnerr något utan själv gör att så anvnder man inga paranteser.. Det finns alltså två olika sätt att anropa en funktion på beroende vad funktionen gör: 1) funktionsNamn inparameter1, inparameter2 2) variabel = funktionsNamn(inparameter1, inparameter2 ) Permalänk: https://www.webforum.nu/p/1493931 ## #16 — ConnyFox, 2004-11-28T20:44Z Aha ok aja jag har nu denna koden men den gör inte alls det jag vil att den skall göra. Den skriver ut samma post 3 gånger istället för 3 olika poster.. ``` Dim x, y x = 0 y = 0 For i=0 to ubound(annons,2) while x < 3 .write annons(1,i) x = x + 1 wend Next ``` Dvs istället för kanske volvo, saab, toyota så skriver den ut volvo volvo volvo :D Permalänk: https://www.webforum.nu/p/1493935 ## #17 — solbulle, 2004-11-28T21:17Z /red. tänk om man lärde sig uppdatera sidan innan man postade... :OO Permalänk: https://www.webforum.nu/p/1493953 ## #18 — lilja, 2004-11-28T22:35Z du anropar en subrutin med ``` annons(1, i) ``` Hur ser subrutinen ut? Permalänk: https://www.webforum.nu/p/1493976 ## #19 — solbulle, 2004-11-28T22:42Z Nja, han gör väl inte det va? Det är arrayen han skriver ut. Felet som gjordes tidigare var att han inte skrev: response.write annons(1, i) ..skulle jag tro... Nu är felet att han har en loop i loopen som går tre varv utan att påverka arrayen - mao skrivs samma värde ut hela tiden. Permalänk: https://www.webforum.nu/p/1493977 ## #20 — solbulle, 2004-11-28T22:49Z Skulle inte något likt detta fungera: ``` Dim x, y x = 0 y = 0 i = 0 imax = ubound(annons,2) while x < 3 If i =< imax then response.write annons(1,i) End If x = x + 1 i = i + 1 wend x = 0 'lite mer kod while x < 3 If i =< imax then response.write annons(1,i) End If x = x + 1 i = i + 1 wend x = 0 ``` /red. hupp :r Permalänk: https://www.webforum.nu/p/1493979 --- Tråden på webben: https://www.webforum.nu/amne/asp/116591-loopa-ut-2st-ur-getrows-sedan-nästa-2 Nästa sida: https://www.webforum.nu/amne/asp/116591-loopa-ut-2st-ur-getrows-sedan-nästa-2/page2.md