ASP中多个记录集查询遍历显示出来
1、此为body里面的内容<% set connect=server.CreateObject(“ADODB.Connection”)connect.open “driver={sql server};server=192.168.50.146;uid=XXXXXX;pwd=XXXXXXX;”‘利用ODBC驱动连接数据库%>连接数据库，这个方式是提前连接了ODBC数据源的<%sn= trim(request(“sn”))%>前面有一个输入框页面我没贴出来，返回这个需要查询的输入值
2、<%seq=1sql=“USE MIS; SELECT maf_master.time_slot_code, maf_master.create_date, maf_master.oper_date,maf_master.form_id, maf_master.form_no, maf_master.status_chk,user_profile.user_name AS user_name, maf_master.operator AS user_id,code_list.descript AS work_center FROM maf_master INNER JOIN user_profile ON maf_master.operator = user_profile.user_id INNER JOIN code_list ON maf_master.work_center = code_list.type_code WHERE (code_list.code = ‘wk’) AND (code_list.type = ‘routing’) AND (rtrim(ltrim(maf_master.sn)) = '”&sn&"’) ORDER BY maf_master.create_date, maf_master.time_slot_code "'在maf_master user_profile code_list这几张表中查找这些字段并符合一下条件的，，，，，INNER JOIN ON 和AS可以了解下SQL语句set rs=connect.Execute(sql)'传回查询到的记录集和rs.open差不多if rs.recordcount=0 thenresponse.Write(“nothin here!!!”)response.Endend if'rs1记录集%>
3、<%ta001=rs(“form_id”)把rs中的form_id定义成筐毙险裆变量ta001ta002=rs(“f泠贾高框orm_no”)set rs4=server.CreateObject(“adodb.recordset”)建立新的记录集rs4sql4=“数据库查询语句”set rs4 = connect.Execute(sql4)1'rs4记录集%><%sql2="数据库查询语句 "Set rs2 = connect.Execute(sql2)'rs2 记录集 %>12生产记录<td width="100">工单号</td><td width="100">版本</td><td width="100">品号</td><td width="100">品名</td><td width="100">工作量</td><td width="100">作业员</td><td width="100">工作段</td><td width="100">检查结果</td><td width="100">作业日期</td>123456789流水号<%while rs.eof=false%>这一句比较重要，重复记录集，当指针未到末尾%=seq%> <%if rs("status_chk")="N" or rs("status_chk")="n" then%> ();> <%end if%> <%=rs("form_id")%>-<%=rs("form_no")%> <%=rs4("board_ver")%> <%=rs2("TA006")%> <%=rs2("TA034")%> <%=rs2("TA015")%> <%=rs("user_name")%> <%=rs("work_center")%> <% if rs("status_chk")="Y" or rs("status_chk")="y" then response.write "PASS" else response.write "FALL" end if %> <%=rs("create_date")%> <%seq=seq+1%> <% rs.movenext wend%> 必须要有这一句完成后，后面的记录及才能重新使用rs rs4 rs2 相当于前面的查询纪录集就关闭了