01.<% for i=1 to 30
02.
03. tempString = group
04. myArray = split(tempString,",")
05.
06. sql = "Select * From IPI_Action Where ipiId = " & Request.Form("ipiId")
07. Set rs3 = connSQL2.Execute(sql)
08. if Not rs3.eof then
09. if i = rs3("groupno") then
10. Do while not rs3.EOF
11.
12. %>
13. <tr>
14. <td><% Response.Write(rs3("groupno")) %></td>
15. <td><% Response.Write(rs3("out_3")) %></td>
16. <td><% Response.Write(rs3("out_6")) %></td>
17. <td><% Response.Write(rs3("out_7")) %></td>
18. <td><% Response.Write(rs3("problem")) %></td>
19. <td><% Response.Write(rs3("corrective")) %></td>
20. <td><% Response.Write(rs3("date")) %></td>
21. <td><% Response.Write(rs3("active")) %></td>
22. <td><% Response.Write(rs3("production")) %></td>
23. <td><% Response.Write(rs3("engineer")) %></td>
24. <td><% Response.Write(rs3("qa")) %></td>
25. </tr>
26. <%
27.
28. rs3.movenext
29. Loop
30.
31.
32.
33.
34. else %>
35. <tr>
36. <td><% Response.Write(i) %></td>
37. <td colspan="10"><% Response.Write(i) %></td>
38. </tr>
39.
40.
41. <% end if
42. end if
43.
44. next
45.
46. Set rs3= nothing
47.
48.%>
