<%
set rs=server.createobject("adodb.recordset")
sql="Select * from hesaplar2 order by id asc"
rs.open sql,db,1,3
do while not rs.eof%>
<%sid2=rs("sid")%>


<%
set rs2=server.createobject("Adodb.recordset")
sql2="Select * from hesaplar where sid like '%"&sid2&"%'"
rs2.open sql2,db,1,3
%>
<%=rs2.recordcount%>
<%
rs2.close
set rs2 = nothing

%>


<%
rs.movenext
loop
rs.close
set rs = nothing
%>