Código:
<% colorfila =1 While ((Repeat1__numRows <> 0) AND (NOT Telefono.EOF)) if colorfila <> 0 Then color= "#DEDEBE" colorfila=1 End If if Not colorfila then color="#F0F0F0" colorfila=0 End If %> <tr> <td> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("telefono").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("fecha").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("clase_servicio").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("premio").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("fecha_contacto").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("hora_contacto").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("nombre_cliente").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("saldo_diponible").Value)%></font></td> </tr> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Telefono.MoveNext() Wend %>