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=1
sql=“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 then
response.Write(“nothin here!!!”)
response.End
end if
'rs1记录集
%>
3、<%
ta001=rs(“form_id”)把rs中的form_id定义成变量ta001
ta002=rs(“form_no”)
set rs4=server.CreateObject(“adodb.recordset”)
建立新的记录集rs4
sql4=“数据库查询语句”
set rs4 = connect.Execute(sql4)
1
'rs4记录集
%>
<%
sql2="数据库查询语句 "
Set rs2 = connect.Execute(sql2)
'rs2 记录集
%>
1
2
生产记录
<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>
1
2
3
4
5
6
7
8
9
流水号
<%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 相当于前面的查询纪录集就关闭了