") i = i+1 rs.MoveNext loop %>