Problem getting info out of database

I'm trying to pull records from a database in order to generate a graph of the results. I can connect to the database just fine and write a table of the columns I've selected

<%
Dim oConn, oRs, filePath, Index, i, j
Dim iRecFirst, iRecLast, iFieldFirst, iFieldLast, arrData

filePath = Server.MapPath("/database/database.mdb")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
Set oRs = oConn.Execute("SELECT Reunion_Class, Goal_Donors, Paid_Donors From Reunion_Giving")
arrData =oRs.GetRows()
iRecFirst = LBound(arrData, 2)
iRecLast = UBound(arrData, 2)
iFieldFirst = LBound(arrData, 1)
iFieldLast = UBound(arrData, 1)
%>

Here's my problem - I thought this loop would write the data in the column in the spot in the applet where I need it for the graph, but it isn't working. 

<param name=dataset0yURL value="<%Do while NOT oRs.EOF
Response.Write oRs("Goal_Donors")
oRs.MoveNext
Loop
%>">

What am I missing? I know it has to be something basic.

Thanks in advance!