
Displaying Records - Sorts, Sums, Etc
I'd like to figure a way to sort, sort, display upon.etc
record Fields 1,2,3,4,5,6,7,8,9,10
Alot of Records
fld1 will be 5-6 text values
fld2 will be 20-25 text values
flds3-10 are numbers to total under those
I have tried;
var3 = 0
var4 = 0
etc
rs.MoveFirst
do while not rs.eof
if var1 = rs("1")
'Skip printing "1"
else
Print var1
end if
if var2 = rs("2")
'Skip Printing "2"
load totals
var3 = var3 + rs("3")
var4 = var4 + rs("4")
etc
else
var3 = rs("3")
var4 = rs("4")
end if
if var2 = rs("2")
'Skip Printing
else
Print var2
Print var3
Print var4
etc
'Clear values
var3 = 0
var4 = 0
etc
end if
var1 = rs("1")
var2 = rs("2")
rs.MoveNext
Loop
I always seem to be off by 1 record, or the flds 1,2
are off by 1.
Any Suggestions
Thank you in advance
Matt