pls send me the vb6.0 code for the above for both in data report and crystal