Using GetRows to Build an Array Based on a Recordset:
Code:
Highlight
<%option explicit%> <% dim conn, strSQL, rs dim userArray dim i %> <% set conn = ConnectSQLNT(Application("SQLDatabase"), Application("SQLServer")) strSQL = "sp_Get_List" set rs = server.createobject("adodb.recordset") rs.open strSQL, conn, 2, 2 testArray = rs.GetRows() rs.Close set rs = nothing conn.close set conn = nothing for i = 0 to Ubound(testArray,2) Response.Write (testArray(0,i)) & "<br>" next %>