Asp > Data Access

Convert Records To Arrays Using GetRows

Convert Records To Arrays Using GetRows

'Example on how to convert a recordset into a array.
Set adoCn = Server.CreateObject("ADODB.Connection")

adoCn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.ServerVariables("Appl_Physical_Path") & "\intranet.mdb" 


sSql = "Select Company, Address From Clients"

set adoRs = adoCn.Execute(sSql)

'GetRows Retrieves multiple records of a Recordset object into an array.
arDataArray = adoRs.GetRows


For i = 0 to ubound(arDataArray)
	Response.Write "Client : " & arDataArray(0,i) & " Address : " & arDataArray(1, i) & "<BR>"
Next

adoRs.Close
adoCn.Close

set adoRs = Nothing
Set adoCn = Nothing