Loop???

2 svar · 170 visningar · startad av katis 17 apr. 2002

katisMedlem sedan apr. 200220 inlägg

Frågan17 apr. 2002 12:27#1

Har kört fast med det här.
Problematik:
En var "varor" kan bestå av flera produkter, alltså den måste läsa in produkter flera gånger. Varje produkt i sin tur består av några uppgifter - de vill jag skilja från varandra. Jag försökte lösa det så här:

for i = 0 to i = 3 '(?hur gör man om man inte vet hur mycket det ska läsas?)'
varor = MinFil.ReadLine
myArray = Split(varor,",")
produkt = myArray(0)
antal = myArray(1)
levdatum = myArray(2)
next

För att infotmation ska visas på nätet skriver jag
<%Response.Write antal %><%Response.Write produkt %>

Som resultat får jag bara en produkt.
Alltså: loop är helt impotent.
Kan någon pigga upp den?

Katja

EkströmMedlem sedan feb. 20022 594 inlägg

17 apr. 2002 12:30#2

Vill du skriva ut ett bestämt antal gör du såhär:

for i = 0 to 3
next

Använder du ett recordset och vill skriva ut alla poster skriver du:

Do Until objRS.EOF
objRS.MoveNext
Loop

Jörgen HPMedlem sedan feb. 20012 412 inlägg

17 apr. 2002 15:20#3

for i = 0 to i = 3 '(?hur gör man om man inte vet hur mycket det ska läsas?)'

Om det är en array du ska loopa ut till sista indexet kan du använda funktionen ubound() (obs, en array börjar på index 0)

for i = 0 to UBound(myArray,2) ' 2:an anger att det är en tvådimentionell array
'#-- datan som ska loopas --
Next