[RESOLVED] ADOB record sets

I cant get the values from the resultset saved in values(0)(1)(2) . They are shown as empty.
Do you know what the problem is ?
====================

OUTPUT

STARTS{
10,344,2
}END



___________________

Set ObjFSO = CreateObject("Scripting.FileSystemObject")
Set connect = CreateObject("ADODB.Connection")
connect.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\sraha\Desktop\TEST.accdb"
connect.Open
sql="SELECT Table1.Field4, Table1.Field5, Table1.Field6 FROM Table1 WHERE Table1.ID=" & Cstr(1+ (round mod 10) )
round =round +1

Set resultSet = connect.Execute(sql)
On Error Resume Next

WScript.Echo "STARTS{"
Do While Not resultSet.eof
WScript.Echo( resultSet(0) &","& resultSet(1) &","& resultSet(2) )
resultSet.MoveNext
Loop
dim value(10)
WScript.Echo "}END"

value(0) = CStr( resultSet(0))
value(1) = resultSet(1)
value(2) = resultSet(2)
WScript.Echo(value(0))
WScript.Echo(value(1))
WScript.Echo(value(2))
WScript.Echo "___________________"


___________________