>I want to compare two arrays to see if one
>is different. What is the best way?
lErrorflag=.f.
on error lErrorflag=.t.
for nLoop=1 to max(alen(array1),alen(array2))
if array1[nLoop]<>array2[nLoop]
=messagebox("Non-identical arrays")
on error
return
endif
if lErrorflag=.t.
=messagebox("Non-identical arrays")
on error
return
endif
endfor
=messagebox("Identical arrays")
return
Edward Pikman
Independent Consultant