<%
dim rstRecords, mySql, blnRecordsFound, fld
mySql = "SELECT FIELD1, FIELD2, FIELD3 FROM TESTTABLE;"


Rem -Disconnected Recordset Method

set rstRecords = server.createobject("adodb.recordset")
rstRecords.cursorlocation=aduseclient
rstRecords.open mySQL, my_Conn
Rem -disconnect the recordset
set rstRecords.activeconnection = nothing
if rstRecords.EOF then
  blnRecordsFound = false
else 
  blnRecordsFound = true
end if
if blnRecordsFound then
 do until rstRecords.EOF
  Response.write rstRecords("Field1") & "<BR />"
  Response.write rstRecords("Field2") & "<BR />"
  Response.write rstRecords("Field3") & "<BR /><BR />"
  rstRecords.MoveNext
 loop
end if
rstRecords.Close
Set rstRecords = nothing




Rem -GetRows method

dim arrRecords, iLoop
set rstRecords = server.createobject("adodb.recordset")
rstRecords.cursorlocation=aduseclient
rstRecords.open mySQL, my_Conn
Rem -disconnect the recordset
set rstRecords.activeconnection = nothing
if rstRecords.EOF then
  blnRecordsFound = false
else 
  blnRecordsFound = true
  arrRecords = rstRecords.getRows()
end if
rstRecords.Close
Set rstRecords = nothing
if blnRecordsFound then
 const field1 = 0
 const field2 = 1
 const field3 = 2
 for iLoop = 0 to ubound(arrRecords, 2)
   Response.write arrRecords(field1, iLoop) & "<BR />"
   Response.write arrRecords(field2, iLoop) & "<BR />"
   Response.write arrRecords(field3, iLoop) & "<BR />"
 next
end if
%>

quote:

---

Originally posted by D3mon

Getrows is fast, but can have problems if the number/order of fields changes unexpectedly (e.g. when using a SP)

Recordset is slower but allows referencing to the field name to retrieve data. Apparently, Using RS(0) instead of RS("[fieldname]") is faster in this instance because ASP has to use a 'lookup' table to discover the value of [fieldname] first (or something like that!)

---

quote:

---

set rstRecords.activeconnection = nothing
if rstRecords.EOF then
blnRecordsFound = false
else
blnRecordsFound = true
end if
if blnRecordsFound then
do until rstRecords.EOF
Response.write rstRecords("Field1") & "<BR />"
Response.write rstRecords("Field2") & "<BR />"
Response.write rstRecords("Field3") & "<BR /><BR />"
rstRecords.MoveNext
loop
end if
rstRecords.Close
Set rstRecords = nothing

---

objConnection.execute(strSQL)

ObjCommand.open strSQL

quote:

---

Originally posted by HuwR

yes, but accessing the the resulting array is still faster than looping through the recordset, look in the forums here, Bozden posted test results using various data access methods

---