Create Record Set from Database

todo

Column Names (from rs to array)

tableColumns = ""
Set rsInfo = RS("SELECT Column_name FROM Information_schema.columns WHERE Table_name LIKE 'robsCoolTable'", 0)
While Not rsInfo.EOF
    tableColumns = tableColumns & rsInfo("Column_name") & "|" 
    rsInfo.MoveNext
Wend
tableColumns =  left(tableColumns,len(tableColumns)-1) 'remove last |

arrFields = split(tableColumns,"|") 
for each field in arrFields
    Response.Write "<p>" & field  & "<p>"
next