Fråga databas och spara resultatet i en array istället för en recordset

[mattiasnordin]

Hur gör man det enklast ? Är tydligen för trött för att tänka just nu. För varmt... :)

[LarsG]

getrows

Gör en sökning i forumet

[mattiasnordin]

Tack LarsG.

Vilka tunga trådar jag fick svar på när jag sökte...

Så här verkar det fungera:


<% sql_question = "SELECT * FROM T_list_look "
set rs = Connect.Execute(sql_question)
avarGetRowsArray = rs.GetRows()
%>

<%=Ubound(avarGetRowsArray)%>
<hr>
<%
For x = 0 To Ubound(avarGetRowsArray)
for y = 0 To Ubound(avarGetRowsArray)
Response.Write(avarGetRowsArray(y,x)&", ")
next %> <br>
<% Next %><hr>

[mattiasnordin]

<% sql_question = "SELECT * FROM T_list_look "
set rs = Connect.Execute(sql_question)
avarGetRowsArray = rs.GetRows()
%>

<hr>
<% varColsLen = Ubound(avarGetRowsArray,1)%><br>
<% varRowsLen = Ubound(avarGetRowsArray,2)%><br>
<hr>
<%
For varRowsNum = 0 To varRowsLen
for varColsNum = 0 To varColsLen
Response.Write(avarGetRowsArray(varColsNum,varRowsNum)&", ")
next %> <br>
<% Next %><hr>

[@nders]

Se bara till att kontrollera EOF innan du kör getrows(), annars kommer du få ett felmeddelande.

mvh

[mattiasnordin]

OK, Tack !