Dim ObjParmArr Dim ArrayCounter Dim i Dim ParmList Dim ParmFields Set ObjParmArr = New DynamicArray ArrayCounter = 0 SQLQuery.CommandText