<% rs.movefirst i=0 do until rs.EOF rs2.Open "select count(*) from daf_perush where mik_id="&rs.fields("id")&" or mik_id2="&rs.fields("id"),con,3,3 Response.Write("") Response.Write("") Response.Write(rs.fields("name")&"  ("&rs2.fields(0)&" מסמכים)
") i=i+rs2.fields(0) rs.MoveNext rs2.Close loop Response.Write("") Response.Write("") Response.Write("גיליונות פרשת שבוע של נחמה ליבוביץ  (1500 גיליונות)
") Response.Write("     "&"סך הכל: "&i+1500&" מסמכים "&"       ") rs.Close set rs=nothing set rs2=nothing con.Close set con=nothing %>