<%=rs("NomeCantiere") %> " onMouseover="changesubm('img/zoom01a.gif','subm01');" onMouseout="changesubm('img/zoom01s.gif','subm01')"> " onMouseover="changesubm('img/zoom02a.gif','subm02');" onMouseout="changesubm('img/zoom02s.gif','subm02')"> " onMouseover="changesubm('img/zoom03a.gif','subm03');" onMouseout="changesubm('img/zoom03s.gif','subm03')"> " onMouseover="changesubm('img/zoom04a.gif','subm04');" onMouseout="changesubm('img/zoom04s.gif','subm04')"> " onMouseover="changesubm('img/zoom06a.gif','subm06');" onMouseout="changesubm('img/zoom06s.gif','subm06')"> " onMouseover="changesubm('img/zoom07a.gif','subm07');" onMouseout="changesubm('img/zoom07s.gif','subm07')"> <% rs.Close rs.Open "SELECT * FROM StatoLavori WHERE IDCantiere = " & idcantiere, conn, adOpenStatic, adLockReadOnly, adCmdText colonna = 1 Do while Not rs.EOF %> <% If ( colonna = 1) Then %> <% End If %> <% If (colonna = 2) Then %> <%=rs("Titolo") %> ">" width="201" border="0"> <%=rs("Descrizione") %> <% End If %> <% colonna = colonna +1 If colonna > 2 Then colonna = 1 %> <% rs.MoveNext Loop rs.Close conn.Close %>