Outputting recordset from mysql

[ziycon]

I'm able to output one value from the database no problem but I can't for the life of me a recordset to ouput from a loop, I've also tried the GetRows() option with and array. Below you can see the way I'm trying now. Any ideas much appreciated at this stage!?

N.B. - The DB connection is working grand.

Sub test()
    Dim sql
    Dim recSet
    Dim arrayRS
 
    sql = "SELECT value FROM system"
 
    dbOpen()
 
    Set recSet = conn.Execute(sql)
    arrayRS = recSet.GetRows()
 
    dbClose()
 
    For i = LBound(arrayRS) To UBound(arrayRS)
        Response.Write arrayRS(0,i)
    Next
 
End Sub

[ziycon]

Finally got it working with the below code.

Sub test()
    Dim sql
    Dim recSet
 
    sql = "SELECT value FROM system"
 
    dbOpen()
 
    Set recSet = conn.Execute(sql)
 
    Do While Not recSet.EOF
        Response.Write recSet("value")+"<br/>"
        recSet.MoveNext
    Loop        
 
    dbClose()
 
End Sub