record set problem of sorts...

i have a thing where you can select multiple offices from a drop down list. then i need to run through the database and run a count based on the office. however, if you select more than one office it doesn't seem to work properly. when it enters the multiple offices into the database it puts a comma between so i just have an if loop set up to check for the comma and if it's there split it at the comma. then i wanted to run through the database however many times there are offices.

i need someway to keep track of the count so i set up a couple variables to do that. however, it doesn't seem to be working properly. i get a mismatch error. here's the code i have, can anyone help out?


if instr(1, toOffice, ",") <> 0 then
offices = split(toOffice, ",")
dim i, tot
for each office in offices
query2 = "select count(*) from leads where office='" & trim(office) & "' and dateTaken >= '" & trim(fromDate) & "' and dateTaken <= '" & trim(rightNow) & "';"
rs2.open query2,con
v1 = rs2.fields(0).value
tot = tot + v1
rs2.close
next
end if



thanks.

which line does it say your mismatch is on?

tot = tot + v1

that line, but i just realized that the value from the record set becomes a string so i just have to cast it as an int.

u sorted it now?