PDA

View Full Version : 2xLoop i samma tabell!


M.Cheraghi
2004-08-09, 18:02
Sitter och funderar ut hur jag ska gå till väga.
jag har en tabell i den är det lagrat lite olika saker.
Jag vill loopa ut dessa i två omgångar. För varje loop skriva ut särskild information.

När man väl har loopat en gång, så är man ju i slutet på recordsetet, och så vill jag gärna flytta upp han igen för att börja på en ny loop. Kod exempel på hur jag vill att det ska se ut!
Jag vill helst slippa att skapa två SQL Select satser. Man borde väl på något sätt kunna köra en "RS.moveTop" eller något liknande!


'## Loop 1
Do until RS.eof
'massa asp kod
RS.movenext
loop

'## Loop 2
Do until RS.eof
'massa asp kod
RS.movenext
loop


10-4 over and out

Jesper T
2004-08-09, 18:27
Du kan kanske använda getrows med en array. <%
Function GetRows(ByVal SQL)
Dim arrRecords, rs
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open ("DRIVER={MySQL ODBC 3.51 Driver};DATABASE=******;UID=******;PWD=******;SERVER=min.ser ver.com;")
Set rs = Connection.Execute(SQL)
If Not rs.BOF Or Not rs.EOF Then
arrRecords = rs.GetRows()
ELSE
arrRecords = ""
End If
rs.Close : Set rs = nothing
Connection.Close : Set Connection = nothing
GetRows = arrRecords
End Function
X=0
myArr = GetRows("SELECT ett,tva,tre FROM tabell")

'Min första loop
For X = 0 To Ubound(myArr,2)
Response.write "Loop ett: "& myArr(0,X) & " | " & myArr(1,X) & " | " & myArr(2,X) & "<br>"
Next
X=0

'Min andra loop
For X = 0 To Ubound(myArr,2)
Response.write "Loop två: "& myArr(0,X) & " | " & myArr(1,X) & " | " & myArr(2,X) & "<br>"
Next
%>

Jesper T
2004-08-09, 18:28
Kolla med: IsArray(myArr) innan lopen också.

M.Cheraghi
2004-08-09, 18:31
Hooookay! Det är va way more advanced än jag trodde!
Ska fnula lite med det hela och kolla vad jag kommer fram till :)

en kort fråga innan jag sätter mig in och gör bort mig själv, denna kod

'Min första loop
For X = 0 To Ubound(myArr,2)
Response.write "Loop ett: "& myArr(0,X) & " | " & myArr(1,X) & " | " & myArr(2,X) & "<br>"
Next
X=0


Istället för response.write, skall jag ha lite HTML tabeller, osv, kan jag använda RS("kolumnnamn") på vanligt vis?
Eller är det mer avancerat än så? :)

Tack för ditt svar Jesper

Jesper T
2004-08-09, 18:34
kan jag använda RS("kolumnnamn") på vanligt vis?Hur gör man då? ;)

M.Cheraghi
2004-08-09, 18:36
kan jag använda RS("kolumnnamn") på vanligt vis?Hur gör man då? ;)
Hehe, blev bara lite fundersam när jag såg


..... myArr(0,X) & " | " & myArr(1,X) .....


Jamen dåså, ddå ska det väl antagligen inte vara några problem :)

Jesper T
2004-08-09, 18:37
Men det är inte svårare.
myArr(0,X) motsvarar RS("ett")
myArr(1,X) motsvarar RS("tva")
myArr(2,X) motsvarar RS("tre")

SELECT ett,tva,tre FROM tabell

M.Cheraghi
2004-08-09, 18:38
Men det är inte svårare.
myArr(0,X) motsvarar RS("ett")
myArr(1,X) motsvarar RS("tva")
myArr(2,X) motsvarar RS("tre")

SELECT ett,tva,tre FROM tabell

Där ser man :)
Danke schöön, ska testa o leka lite och försöka få ihop det med övrig kod :) återkommer om jag kör fast!

Jesper T
2004-08-09, 18:39
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;