Array

[Peeer]

strSQL = "SELECT ProdID, Antal FROM Korg WHERE AnvId = " & Request.QueryString("id")
set rs = Connection.execute(strSql)
if not rs.eof then
   arr = rs.getrows()
end if
rs.close
For i = 0 To Ubound(arr,1)
  For j = 0 To Ubound(arr,2)
      Response.write "arr("&i&","&j&"): "& arr(i,j)&"<br>"
   Next
Next

ger resultatet

arr(0,0): 8
arr(0,1): 2
arr(0,2): 5
arr(1,0): 15
arr(1,1): 12
arr(1,2): 7

Jag vill ha det så här:

arr(0,0): 8
arr(1,0): 15
arr(0,1): 2
arr(1,1): 12
arr(0,2): 5
arr(1,2): 7
Hur gör jag??

[UlfT]

Vänd på for-looparna:

For j = 0 To Ubound(arr,2)
  For i = 0 To Ubound(arr,1)
      Response.write "arr("&i&","&j&"): "& arr(i,j)&"<br>"
   Next
Next

[Peeer]

Gud vad simpelt!
Tackar, tackar!