<% for i=1 to 30
' create array
tempString = group
myArray = split(tempString,",")
sql = "Select * From IPI_Action Where ipiId = " & Request.Form("ipiId")
Set rs3 = connSQL2.Execute(sql)
if Not rs3.eof then
if i = rs3("groupno") then
Do while not rs3.EOF
%>
<tr>
<td><% Response.Write(rs3("groupno")) %></td>
<td><% Response.Write(rs3("out_3")) %></td>
<td><% Response.Write(rs3("out_6")) %></td>
<td><% Response.Write(rs3("out_7")) %></td>
<td><% Response.Write(rs3("problem")) %></td>
<td><% Response.Write(rs3("corrective")) %></td>
<td><% Response.Write(rs3("date")) %></td>
<td><% Response.Write(rs3("active")) %></td>
<td><% Response.Write(rs3("production")) %></td>
<td><% Response.Write(rs3("engineer")) %></td>
<td><% Response.Write(rs3("qa")) %></td>
</tr>
<%
rs3.movenext
Loop
else %>
<tr>
<td><% Response.Write(i) %></td>
<td colspan="10"><% Response.Write(i) %></td>
</tr>
<% end if
end if
next
Set rs3= nothing
%>