Is there any way to return a recorset into an array instead of doing the following?
rsTT.let_Source(strSQLTT2)
rsTT.Open()
While Not rsTT.EOF
rsTTout = rsTT.Fields(0).Value
strTT.Add(rsTTout)
rsTT.MoveNext()
End While
I am looking for a faster way to bring the values into the strTT variable. The current code is extrememly slow.
What I am doing is creating a list of database entries and ouputting them to an Excell sheet for users.
rsTT.let_Source(strSQLTT2)
rsTT.Open()
While Not rsTT.EOF
rsTTout = rsTT.Fields(0).Value
strTT.Add(rsTTout)
rsTT.MoveNext()
End While
I am looking for a faster way to bring the values into the strTT variable. The current code is extrememly slow.
What I am doing is creating a list of database entries and ouputting them to an Excell sheet for users.