<!-- redim x(5) for v = 1 to 4 x(v) = 0 next for i=1 to vrs.recordcount for v = 1 to 4 if cint(vrs("CLOSE_ITEM"))=v then x(v) = vrs("aa") exit for end if next vrs.movenext next vrs.movefirst --> Tags: Share this: a0939901781 About author View all posts