日照党政机关通讯录 日照市区 <% dim ii ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='日照' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1%> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 东港区 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='东港区' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1%> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 开发区 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='开发区' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1%> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 山海天 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='山海天' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1 %> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 莒县 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='莒县' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1 %> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 岚山 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='岚山' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1%> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%> 五莲县 <% ii=0 Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from info where whereee='五莲县' and bigclass='日照党政机关' order by tuijian desc,vip desc, id asc" rs.open sql,conn,1,1 do while not rs.eof ii=ii+1%> <%if ii mod 4 =0 then%><%end if%> <% rs.movenext loop rs.close set rs=nothing %>   "><%=cutstr(rs("company"),42)%>