<%do while not rs.eof
pname=rs("pname")
set rs1=server.createobject("adodb.recordset")
rs1.open "select * from pprogress where status=1 and pname='" &pname&"' order by fbdate desc",conn,1,1
if not rs1.eof then%>
同创高原项目 (6月10日工程进度)
<%
end if
do while not rs1.eof
i=i+1
%>
• 7、8号楼安装施工
• 7、8号楼间土建部分施工
• A2砌体摸灰施工
• A3挖孔桩施工
• B1:12、13号楼四层施工
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
i=0
rs.movenext
loop
rs.close
set rs=nothing
%>